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 + -
显示快捷键?