loginok.asp

来自「一个用jsp 编写的个人主页网站哦。希望对大家有所帮助啊」· ASP 代码 · 共 20 行

<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<% if request.Form("user")="" or request.form("pwd")="" then
    response.Write"<script language=javascript>alert('请填写完整');history.back(-1);</script>"
 response.End()
 end if
    user=Replace(Request.Form("user"),"'","''")
    pwd=md5(Replace(Request.Form("pwd"),"'","''"))
 sql="select * from admin where user='"&user&"' and pwd='"&pwd&"'"
 set rs=server.CreateObject("adodb.recordset")
 rs.open sql,conn,1,1
 if rs.eof then
 response.Write"<script> alert('用户名或密码错误');history.back(-1);</script>"
 response.End()
 else  
    session("user")=rs("user")
    session("pwd")=rs("pwd")
    response.write"欢迎您的光临，"%><%=session("user")%>
 <%response.redirect"admin.asp"%>
 <%end if%>