admin_login2.asp

来自「后台路径:admin/login.asp 用户名:manage 密码:fan」· ASP 代码 · 共 33 行

<%@ Language=VBScript %>
<!-- #include file="lwconn.asp" -->
<%
AdminUID=trim(Request.Form("AdminUID"))
AdminPWD=trim(Request.Form("AdminPWD"))

AdminUID=replace(AdminUID,"'","''")
AdminPWD=replace(AdminPWD,"'","''")
 if adminuid="" or adminpwd="" then 
  Response.Write "<script language=javascript>alert('错误号lw013：用户名或密码不能为空！'); history.go(-1) </script>"
    Response.End 
  end if


set rs=server.CreateObject ("ADODB.RecordSet")
rs.Source="select * from user where userid='" & AdminUID & "' and  pass1='" & AdminPWD & "'"
rs.Open rs.Source,conn,1,1

if not rs.EOF then 
   response.Cookies("user_name")=AdminUID
   response.Cookies("ttype")=rs("ttype")
   Response.Redirect "info_add.asp"
else
   Response.Write "<script language=javascript>alert('错误号lw024：用户名或密码错误！'); history.go(-1) </script>"
   
   Response.End 
end if
 rs.close
 set rs=nothing
 conn.close
 set conn=nothing
%>