高校问答绿朱自清 课文:asp连接数据库
来源：百度文库 编辑：高校问答 时间：2024/04/20 15:34:27
<html>
<head>
<title>帐号验证是否正常</title>
</head>
<body>
<%
dim conn
'声明connection对象变量
set conn=server.createobject
("adodb.connection")
'通过odbc数据来源名称chll连接数据库
conn.open "customer"
'声明recordset对象变量rs
set rs=server.createobject
("adodb.recordset")
sqlstr="select id from user where power=1
and login like '"&request("login")&"'and
password like '"&request("password")&'"
set rs=conn.execule(sqlstr)
if.rs.eof=true then
session("confirm")="fall"
%>
<script language="javascript">
alert("帐号或密码输入错误，重新输入")
location.href="index.html"
</script>
<%
else
session("confirm")="ok"
%>
<script language="javascript">
alert("登陆成功！！")
location.href="main.asp"
</script>
<%end if%>
</body>
</html>
错误为
错误类型：
Microsoft VBScript 编译器错误 (0x800A0400)
缺少语句
/会员管理系统/login.asp, line 12
("adodb.connection")
<head>
<title>帐号验证是否正常</title>
</head>
<body>
<%
dim conn
'声明connection对象变量
set conn=server.createobject
("adodb.connection")
'通过odbc数据来源名称chll连接数据库
conn.open "customer"
'声明recordset对象变量rs
set rs=server.createobject
("adodb.recordset")
sqlstr="select id from user where power=1
and login like '"&request("login")&"'and
password like '"&request("password")&'"
set rs=conn.execule(sqlstr)
if.rs.eof=true then
session("confirm")="fall"
%>
<script language="javascript">
alert("帐号或密码输入错误，重新输入")
location.href="index.html"
</script>
<%
else
session("confirm")="ok"
%>
<script language="javascript">
alert("登陆成功！！")
location.href="main.asp"
</script>
<%end if%>
</body>
</html>
错误为
错误类型：
Microsoft VBScript 编译器错误 (0x800A0400)
缺少语句
/会员管理系统/login.asp, line 12
("adodb.connection")
set conn=server.createobject("adodb.connection") 不要分行写
server.createobject("adodb.connection") 不要分行~~~~~
set conn=server.createobject("adodb.connection")