<!--#include virtual="Conn.asp"-->
If Request("username")<>"" Then
username=Request("username")
password=Request("password")
Set rs=server.createobject("adodb.recordset")
SQL_Text="select * from table where username='"&username&"' and password='"&password&"'"
rs.Open SQL_Text,Conn,3,3
If Not(rs.Eof and rs.Bof) Then
Response.Redirect("error.asp")
End If
rs.Close
Set rs = Nothing
End If
%>
<form action="" method="post">
<input type="text" name="username" value="">
<input type="password" name="password" value="">
<input type="submit" value="提交">
</form>