📄 pagemod3.asp
字号:
<!-- #include file="func/db.fun" -->
<%
name=session("name")
pws=session("pws")
if name="" then
%>
<script language="VBScript">
MsgBox "你是非法用户。"
history.back()
</script>
<% end if
if Request("学生证号") = empty or Request("学生姓名")=empty or Request("学制")=empty or Request("学号")=empty or Request("毕业证号")=empty or Request("颁证时间")=empty then
%>
<script language="VBScript">
MsgBox "请输入完整信息~~~!"
history.back()
</script>
<%
end if
set rs=GetMdbStaticRecordset("data/user.mdb","userdase")
If rs Is Nothing Then
Response.Write "哈哈~~出错了哟~~:(~~!"
Response.End
End If
rs.PageSize = 10
Page = CLng(Request("Page"))
If Page > rs.PageCount Then Page = rs.PageCount
If Page < 1 Then Page = 1
rs.addnew
rs("学生姓名") = Request("学生姓名")
rs("学号") = Request("学号")
rs("学生证号") = Request("学生证号")
rs("学制") = Request("学制")
rs("毕业证号") = Request("毕业证号")
rs("颁证时间") = Request("颁证时间")
rs.Update
%>
<script language="VBScript">
MsgBox "添加成功!"
location.href="guanli.asp"
</script>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -