loginmacnet.asp

来自「国内第一数字点卡销售程序。功能强大。 完整无错！数据文件经MD5加密！经严格测」· ASP 代码 · 共 43 行

<!--#include file="conn.asp"-->
<%
if session("user_name")<>"" then
   response.redirect("index.asp")
   response.end
end if

user_name=srequest(trim(request("user_name")),0)
user_pass=trim(request("user_pass"))
macnetip=trim(request("macnetaddress"))

if user_name="" or len(request("user_name"))<4 or user_pass="" or macnetip="" then
   response.write("<script>alert('您提交的信息不全面或用户名长度小于4，请审核后再提交！');window.close()</script>")
   response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select * from [user] where user_name='"&user_name&"'"
rs.open sql,conn,3,3
if rs.eof then
   response.write("<script>alert('您提交的用户名不对，请审核后再提交！');window.close()</script>")
   response.end
else
   if rs("user_jy")&"1"="1" then
	  rs("user_jy")=macnetip
	  rs.update
   end if
   if rs("user_jy")<>macnetip then
	       response.write("<script>alert('您的网卡登陆不正确，请确认您是用上一次的电脑来登陆的，如果不是请与管理员联系。');window.close()</script>")
           response.end	      
   end if	
   if user_pass=rs("user_pass") then
      session("user_name")=rs("user_name")
      session("user_vip")=rs("user_vip")
      rs("user_lasttime")=now()
      rs("user_lastip")=request.servervariables("remote_addr")
      rs.update
      response.redirect "vipfirst.asp"
   else
	  response.write("<script>alert('密码错误！请确认后再提交。');window.close()</script>")
	  response.end
   end if
   rs.close
end if%>