<!--#include file="conn.asp"-->
<!--#include file="ini/md5.asp"-->
<!--#include file="ini/fun.asp"-->
<% if (chkstr(Request.Form("name"))<>"" and chkstr(Request.Form("pwd"))<>"") then
Session("name")=chkstr(Request.Form("name"))
Session("pw")=md5(chkstr(Request.Form("pwd")),16)
set show=conn.execute("select userpass from gongsi where username='"&Session("name")&"'")
if (show.eof=true) then
Session("name")=""
Session("pw")=""
Response.Redirect("error.asp")
response.end
else
if Session("pw")=show("userpass") then
Response.Redirect("index.asp")
else
Response.Redirect("error.asp")
end if
end if
else
Response.Redirect("index.asp")
end if
%>