1response.buffer=ture
1
2username=request.form("username")
3password=request.form("password")
4set rs=server.createobject("adodb.recordset")
5sql="select * from user where name='&username&' order by userid"
6rs.open sql,conn,3,3
7if rs.eof or rs.bof then
8response.write"对不起,错误的用户名!请按
<a href="login.asp">这里</a>
1返回!"
2response.end
3else
4if password<>rs("password") then
5response.write"对不起,错误的密码!请按
<a href="login.asp">这里</a>
1返回!"
2response.end
3end if
4Response.Cookies("kaihua")("username") =username
5Response.Cookies("kaihua")("password") =rs("password")
6Response.Cookies("kaihua")("usergrade") =rs("grade")
7response.redirect "list.asp"
8end if
9rs.close
10set rs=nothing
11conn.close
12set conn=nothing
---------------------------------------------------------------
'Error 1 ture-->true
'```
response.buffer=ture
response.buffer=true
1<!--#include file="conn.asp" -->
username=request.form("username")
password=request.form("password")
set rs=server.createobject("adodb.recordset")
'Error 2
'因为一般username不允许重复,"order by userid"就不必要了
'"user"是SQL的保留关键字,使用时要加"[]",建议不要使用此类关键字做表名等
'sql="select * from user where name='&username&' order by userid"
sql="select * from [user] where name='" & username & "'"
rs.open sql,conn,3,3
if rs.eof or rs.bof then
'Error 3
'response.write的内容中如果有双引号,请使用单引号代替,或
'用两个双引号表示一个双引号
'response.write"对不起,错误的用户名!请按
1<a href="login.asp">这里</a>
返回!"
response.write "对不起,错误的用户名!请按
1<a href="login.asp">这里</a>
返回!"
'or
'response.write "对不起,错误的用户名!请按
1<a href="" login.asp""="">这里</a>
返回!"
response.end
else
if password<>rs("password") then
'Error 4 同上
response.write "对不起,错误的密码!请按
1<a href="login.asp">这里</a>
返回!"
response.end
end if
Response.Cookies("kaihua")("username") =username
Response.Cookies("kaihua")("password") =rs("password")
Response.Cookies("kaihua")("usergrade") =rs("grade")
response.redirect "list.asp"
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
1另外再确认conn.asp是否正确
2'Error 1 ture-->true
3'```
4response.buffer=ture
1response.buffer=true
1
2username=request.form("username")
3password=request.form("password")
4set rs=server.createobject("adodb.recordset")
5
6'Error 2
7'因为一般username不允许重复,"order by userid"就不必要了
8'"user"是SQL的保留关键字,使用时要加"[]",建议不要使用此类关键字做表名等
9'sql="select * from user where name='&username&' order by userid"
10sql="select * from [user] where name='" & username & "'"
11rs.open sql,conn,3,3
12if rs.eof or rs.bof then
13
14'Error 3
15'response.write的内容中如果有双引号,请使用单引号代替,或
16'用两个双引号表示一个双引号
17'response.write"对不起,错误的用户名!请按
<a href="login.asp">这里</a>
1返回!"
2response.write "对不起,错误的用户名!请按
<a href="login.asp">这里</a>
1返回!"
2'or
3'response.write "对不起,错误的用户名!请按
<a href="" login.asp""="">这里</a>
1返回!"
2response.end
3else
4if password<>rs("password") then
5'Error 4 同上
6response.write "对不起,错误的密码!请按
<a href="login.asp">这里</a>
1返回!"
2response.end
3end if
4Response.Cookies("kaihua")("username") =username
5Response.Cookies("kaihua")("password") =rs("password")
6Response.Cookies("kaihua")("usergrade") =rs("grade")
7response.redirect "list.asp"
8end if
9rs.close
10set rs=nothing
11conn.close
12set conn=nothing
另外再确认conn.asp是否正确