最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
一个登陆窗口的记数判断登录(有用哦),了解"IF"语句的用应
时间:2022-06-30 10:29:06 编辑:袖梨 来源:一聚教程网
<%
n=0
adminID=Request("adminID")
password=Request("password")
if adminID="" then %>
<%elseif password="" then%>
<%end if%>
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
<%
'session.timeout=10'session对象的超时值
'on error resume next
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("examination.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")
%>
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
<%rs.Open "Select * From 管理 where adminID='"&adminID&"'", conn, 3,3%>
<% if rs.bof or rs.eof then%>
<% elseif rs("password")<>password then%>
<% if rs("登陆次数")>3 then %>
<% else %>
n=0
adminID=Request("adminID")
password=Request("password")
if adminID="" then %>
<%elseif password="" then%>
<%end if%>
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
<%
'session.timeout=10'session对象的超时值
'on error resume next
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("examination.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")
%>
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
<%rs.Open "Select * From 管理 where adminID='"&adminID&"'", conn, 3,3%>
<% if rs.bof or rs.eof then%>
<% elseif rs("password")<>password then%>
<% if rs("登陆次数")>3 then %>
<% else %>