|
小弟最近用ASP编写一程序,在程序登陆时遇到如下问题.
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
Microsoft OLE DB Provider for SQL Server 错误 '80040e4d'
用户 'IUSR_SVR-TJ-ERP02' 登录失败。
/fst/main/login.asp，行19
文件login内容为
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<title>用户登录</title>
</head>
<%
dim CONN
dim SQL_SET
dim SQL_STR
dim userid,username,password
dim login_flag
userid=trim(request("t_username"))
password=trim(request("t_psw"))
set CONN=Server.CreateObject("ADODB.Connection")
set SQL_SET=Server.Createobject("ADODB.Recordset")
CONN.Provider="sqloledb"
CONN.open application("CONN_STR")
SQL_STR="SELECT * FROM USER_TABLE WHERE user_id='" + userid + "' AND password='" + password + "'"
SQL_SET.CursorType=3
SQL_SET.LockType=2
SQL_SET.open SQL_STR,CONN
if SQL_SET.recordcount>0 then
response.cookies("user_id")=SQL_SET("user_id")
response.cookies("user_name")=SQL_SET("user_name")
response.cookies("user_duty")=SQL_SET("user_duty")
SQL_SET.close
SQL_STR="SELECT * FROM POWER WHERE user_id='" + userid + "'"
SQL_SET.CursorType=3
SQL_SET.LockType=2
SQL_SET.open SQL_STR,CONN
response.cookies("material_input_power")=SQL_SET("material_input_power")
response.cookies("material_power")=SQL_SET("material_power")
response.cookies("material_output_power")=SQL_SET("material_output_power")
response.cookies("cloth_input_power")=SQL_SET("cloth_input_power")
response.cookies("cloth_power")=SQL_SET("cloth_power")
response.cookies("cloth_output_power")=SQL_SET("cloth_output_power")
response.cookies("produce_power")=SQL_SET("produce_power")
response.cookies("company_input_info_power")=SQL_SET("company_input_info_power")
response.cookies("company_input_account_info_power")=SQL_SET("company_input_account_info_power")
response.cookies("company_output_info_power")=SQL_SET("company_output_info_power")
response.cookies("company_output_account_info_power")=SQL_SET("company_output_account_info_power")
response.cookies("user_manage_power")=SQL_SET("user_manage_power")
response.cookies("power_manage_power")=SQL_SET("power_manage_power")
response.Cookies("base_power")=SQL_SET("base_power")
%>
<script language="JavaScript1.2">
function window_open()
{
window.open("main.asp","windows","top=0,left=0,width=800,height=600,screenX=0,screenY=0,location=0,menubar=0,resizable=1,scrollbars=1,toolbar=1");
}
</script>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<body>
<p align="center"> </p>
<p align="center"> </p>
<p align="center"> </p>
<p align="center"> </p>
<p align="center"><font size="2">登录成功！</font></p>
<div align="center">
<input type="button" name="Button" value="进入" onclick="window_open();">
<input type="button" name="Button" value="注销" onclick="javascript:window.location='../index.asp'">
</div>
<p align="center"><font size="2"></font></p>
<% 'response.redirect("main.asp") %>
<% else %>
<body>
<p align="center"> </p>
<p align="center"> </p>
<p align="center"> </p>
<p align="center"> </p>
<p align="center"><font size="2">您的用户名或口令出现错误，无法登录！</font></p>
<p align="center"><input type="button" name="Button" value="返回" onclick="javascript:window.location='../index.asp'"></p>
<% end if %>
<% CONN.close %>
</body>
</html>
我自认没有问题,请高手指点 |
|
转播
分享
淘帖
分享到新浪微博
