?? huanshu1.asp
字號:
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>圖書借閱</title>
</head>
<!--#include file="conn.asp"-->
<!--#include file="checkuser.asp" -->
<style>
BODY{
font-family:verdana,arial,helvetica;
margin:0;
}
td {
font-family:Tahoma,Verdana, Arial;
font-size:11px;
border: 1px solid #CCCCCC;
}
A:link, A:active,A:visited
{
color: #CCCCCC;
text-decoration: none;
padding-left:6px;
padding-right:6px;
}
A:hover
{
color: #FF3300;
text-decoration: none;
padding-left:6px;
padding-right:6px;
}
.STYLE1 {color: #FFFFFF}
</style><title>圖書歸還</title>
<%
'圖書歸還處理
if trim(request.querystring("action"))="huanshu" then
logid=request.form("logid")
tiaoxingma=request.form("tiaoxingma")
Set rs=conn.execute("update booklog set leixing=false where id="&logid&"")
set rs=conn.execute("update ebook set yijie=yijie-1 where tiaoxingma='"&tiaoxingma&"'")
response.Write "<script>"
response.Write "alert('還書成功!');"
response.write "window.location.href='huanshu.asp';"
response.write "</script>"
response.end
end if
tiaoxingma=request.form("tiaoxingma")
set rs=server.CreateObject("adodb.recordset")
sql="select * from [ebook] where tiaoxingma='"&tiaoxingma&"'"
rs.open sql,conn,1,1
if rs.eof then
response.Write "<script>"
response.Write "alert('該書暫未加入系統(tǒng)，請先加入系統(tǒng)！');"
response.write "window.location.href='huanshu.asp';"
response.write "</script>"
rs.close
set rs=nothing
response.end
else
if rs("yijie")=0 then
response.Write "<script>"
response.Write "alert('該書沒有借出！');"
response.write "window.location.href='huanshu.asp';"
response.write "</script>"
rs.close
set rs=nothing
response.end
end if
bookid=rs("id")
logid=rs("logid")
shuming=rs("shuming")
rs.close
set rs=nothing
end if
'獲取借閱信息
Set rs=conn.execute("select * from booklog where id="&logid&"")
if rs("leixing")=false then
response.Write "<script>"
response.Write "alert('該書已經(jīng)歸還！請聯(lián)系管理員');"
response.write "window.location.href='huanshu.asp';"
response.write "</script>"
response.end
end if
%>
<form id="form1" name="form1" method="post" action="?action=huanshu">
<p> </p>
<p> </p>
<table width="307" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="24" colspan="2" align="center" bgcolor="#003366"><span class="STYLE1">借閱信息</span></td>
</tr>
<tr>
<td height="26" align="center">書名：</td>
<td><a href="bookinfo.asp?bookid=<%=bookid%>" target="_blank"><font color=red><%=shuming%></font></a>
<input name="logid" type="hidden" id="logid" value="<%=logid%>" />
<input name="tiaoxingma" type="hidden" id="tiaoxingma" value="<%=tiaoxingma%>" />
</td>
</tr>
<tr>
<td align="center">姓名：</td>
<td><input name="xingming" type="text" id="xingming" value="<%=rs("xingming")%>" /></td>
</tr>
<tr>
<td align="center">備注：</td>
<td><textarea name="beizhu" rows="3" id="beizhu"><%=rs("beizhu")%></textarea>
* 班級等信息 </td>
</tr>
<tr>
<td colspan="2" align="center"><input type="submit" name="Submit" value="確認" />
<input name="fanhui" type="button" id="fanhui" value="返回" onClick="window.location.href='huanshu.asp';" /></td>
</tr>
</table>
</form>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -