📄 card.asp
字号:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<!--对用户的身份进行判断，如为非法用户则返回登录页面-->
<%if not session("user_session_id")=Session.SessionID then%>
<SCRIPT LANGUAGE=javascript>
parent.window.location.href="../default.asp"
</SCRIPT>
<%end if%>
<!--没有提交数据，显示添加页面-->
<%if Request.Form("hid")="" then%>
<HEAD>
<TITLE>图书馆管理系统</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="../css/scss.css" type=text/css rel=stylesheet>
<style TYPE="text/css">
<!--
.in
{
BORDER-RIGHT: rgb(127,127,127) 1px solid;
BORDER-TOP: rgb(127,127,127) 1px solid;
FONT-SIZE: 9pt;
BORDER-LEFT: rgb(127,127,127) 1px solid;
BORDER-BOTTOM: rgb(127,127,127) 1px solid;
BACKGROUND-COLOR: #ffffff
}
//-->
</STYLE>
<SCRIPT LANGUAGE=javascript>
<!--
function cli()
{
if(document.form1.card_id.value=="")
{
alert("请填写卡片编号！")
document.form1.card_id.focus()
return false;
}
if(document.form1.card_name.value=="")
{
alert("请填写卡片拥有者名称！")
document.form1.card_name.focus()
return false;
}
if(document.form1.status_id.value=="")
{
alert("请填写身份证号！")
document.form1.status_id.focus()
return false;
}
if(document.form1.phone.value=="")
{
alert("请填写联系电话！")
document.form1.phone.focus()
return false;
}
if(document.form1.address.value=="")
{
alert("请填写联系地址！")
document.form1.address.focus()
return false;
}
document.form1.submit()
}
//-->
</SCRIPT>
</HEAD>
<!--显示主窗口信息-->
<BODY text=#000000 bgColor=#f7f7f7 leftMargin=0 topMargin=0
onload="document.form1.card_id.focus();">
<!--#include file=../inc/top.asp-->
<DIV ID="commentsboard" CLASS="popcomments"> </DIV>
<center><h4>借书卡办理系统</h4></center>
<form name=form1 action=card.asp method=post>
<table cellspacing=0 cellpadding=0 width=100% border=0>
<tr align=center>
<td valign=center bgcolor=#f7f7f7 height=30>
卡片编号
<input name=card_id class=in size=16 maxlength=10>
</td>
</tr>
<tr align=center>
<td height=30 valign=center bgcolor=#f7f7f7>
卡拥有者
<input class=in name=card_name maxlength=40 size=16>
</td>
</tr>
<tr align=center>
<td height=30 valign=center bgcolor=#f7f7f7>
性 别
<input type=radio name=sex value="男" checked>
男
<input type=radio name=sex value="女">
女
</td>
</tr>
<tr align=center>
<td height=30 valign=center bgcolor=#f7f7f7>
身份证号
<input class=in maxlength=20 size=16 name=status_id>
</td>
</tr>
<tr align=center>
<td height=30 valign=center bgcolor=#f7f7f7>
联系电话
<input class=in maxlength=20 size=16 name=phone >
</td>
</tr>
<tr align=center>
<td height=30 valign=center bgcolor=#f7f7f7>
联系地址
<input class=in maxlength=20 size=16 name=address >
</td>
</tr>
<tr>
<td height=30 align=middle valign=center
bgcolor=#f7f7f7 colspan=2>
<input type=hidden name=hid value="ok">
<input type=button name=butt value=" 提交 "
class=in onclick="javascript:cli()">
<input type=reset name=re value=" 取消 " class=in>
</td>
</tr>
</table>
<center><%=Request.QueryString("comm")%></center>
</form>
</BODY>
</HTML>
<%'获取卡片信息
else
card_id=Request.Form("card_id")
card_name=Request.Form("card_name")
sex=Request.Form("sex")
status_id=Request.Form("status_id")
phone=Request.Form("phone")
address=Request.Form("address")
'判断卡号是否登记过
sql="select count(*) from card where card_id='"&card_id&"'"
set rs=session("cn").execute(sql)
if rs(0)<>0 then
'已登记过要求重新登记信息
Response.Redirect "card.asp?comm=此卡信息已登记过！"
else
'没有登记过，将卡号信息添加到数据库中
sql="insert into card(card_id,card_name,sex,status_id"
sql=sql&",phone,address) values ('"&card_id&"','"&card_name&"'"
sql=sql&",'"&sex&"','"&status_id&"','"&phone&"','"&address&"')"
session("cn").execute(sql)
Response.Redirect "card.asp?comm=信息添加成功！"
end if
end if%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -