⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 borrowbookcount.asp

📁 借阅系统,可以很方便的管理书籍
💻 ASP
字号:
<% 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 + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -