📄 0000.asp
字号:
<!--#include file="../66hc.asp"-->
<card id="main" title="管理登陆" >
<p>
<%
name=request("name1")
dlmm=request("dlmm1")
yzms=request("dlyz1")
yzmz=request("dlyzg")%>
<%if yzmz="" or yzms="" or name="" or dlmm="" then%>
错误啦!全部必须填写!
<%elseif yzmz<>yzms then%>
验证码错误!
<%end if%>
<%if yzms<>yzmz or yzmz="" or yzms="" or name="" or dlmm="" then
cw=1%>
<br/><a href="index.asp">返回登陆</a>
<%end if%>
<%
if cw="" then
set rsp=Server.CreateObject("ADODB.Recordset")
rsppl="select * from [66hc_admin] where [66hc_name]='"&name&"' and [66hc_pass]='"&dlmm&"'"
rsp.open rsppl,conn,1,2
if rsp.eof then%>
账号或密码错误<br/><a href="index.asp">返回登陆</a>
<%else%>
登陆成功
<br/>
上次登陆时间:<%=rsp("66hc_sj")%><br/>
上次登陆IP:<%=rsp("66hc_ip")%><br/>
<%if rsp("66hc_ql")=0 then%><a href="../index.asp?sb=<%=rsp("66hc_sb")%>">进入管理</a><%else%><a href="00000.asp?sb=<%=rsp("66hc_sb")%>">进入管理</a><%end if%>
<%end if%>
<%end if%>
<br/>-----------
<!--#include file="bq.gif"-->
</p></card></wml>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -