%
if request("login") <> "" then
username=request("username")
password=request("password")
sql = "Select * From info Where 用户名='"&Username&"' And 密码='"&Password&"'"
set rs=conn.execute (sql)
If rs.EOF Then
response.write ""
response.end
Else
session("pass")="passed"
session("username")=username
response.redirect"test.htm"
End If
Conn.Close
Set Conn=Nothing
else
%>