版主帮我看看:内部服务器错!

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&lt;a href="login.asp"&gt;这里&lt;/a&gt;

返回!"
response.write "对不起,错误的用户名!请按

1&lt;a href="login.asp"&gt;这里&lt;/a&gt;

返回!"
'or
'response.write "对不起,错误的用户名!请按

1&lt;a href="" login.asp""=""&gt;这里&lt;/a&gt;

返回!"
response.end
else
if password<>rs("password") then
'Error 4 同上
response.write "对不起,错误的密码!请按

1&lt;a href="login.asp"&gt;这里&lt;/a&gt;

返回!"
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--&gt;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是否正确

Published At
Categories with Web编程
Tagged with
comments powered by Disqus