<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#Include File="include/connect.asp"-->
<!--#Include File="include/md5code.asp"-->
<%
Username=Request.Form("Username")
Password=md5(Request.Form("Password"))
Set Rs = Server.CreateObject("ADODB.Recordset")
sql="select * from Show5_ALLUser where Username='"&Username&"' and Password='"&Password&"'"
rs.open sql,cn,1,1
if rs.bof or rs.eof then
	Response.write("<script>alert('用户名或密码错误！请返回重新输入');window.location.replace('default.asp');</script>")
	Response.End()
else
Session.Timeout = 30
session("Username")=Rs("Username")
session("Userpic")=rs("Userpic")
session("Admin")=rs("Isadmin")
response.redirect "default.asp"
Response.End()
end if
%>