borrowbookcount.asp
来自「借阅系统,可以很方便的管理书籍」· ASP 代码 · 共 31 行
ASP
31 行
<% response.buffer=ture%>
<%response.expires=0%>
<%
studentid=session("studentid")
set cn=server.createobject("adodb.connection")
set rst=server.createobject("adodb.recordset")
rst.cursortype=1
rst.locktype=3
strconn= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("wsm.mdb")
strsql="select * from student where studentid='"& studentid &"'"
rst.open strsql,strconn,,,adcmdtable
if not rst.eof then
if rst.recordcount>=3 then
response.write"<p align=center><font color=red>您已经借书超过三本了,请归还一部份再借</font></P>"
response.write"<p align=center><font color=red><a href='显示页面.asp'>返回</a></font></P>"
else
response.redirect"borrowbook4.asp"
end if
else
response.redirect"borrowbook4.asp"
end if
%>
<head>
<title></title>
</head>
<body bgcolor="#000000">
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?