📄 zhuanyeadd.asp
字号:
<!--#include file="../conn.asp"-->
<!--#include file="../check.asp"-->
<%
dim zid,sql,theACT,zhuanye,rs,temp
theACT=request("theACT")
if theACT="SAVE" then
zhuanye=request("zhuanye")
response.write zhuanye
If zhuanye="" Then
response.write "请<a href='javascript:history.go(-1);'>返回</a>按照提示填写完整，如果禁用了javascript，请启用"
response.End
End If
call LinkData()
sql="select * from zhuanye where zid=1"
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.open sql,conn,1,3
rs.addnew
rs("zhuanye")=zhuanye
rs.update
rs.close
temp="zhuanye.asp"
response.Redirect (temp)
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>专业增加</title>
<link href="../teacher.css" rel="stylesheet" type="text/css">
<script language="javascript">
function notNull(fieldname,string)
{
if (string.value == "") {
alert(fieldname+"不能为空");
string.focus();
return false;
}
return true;
}
function check(myform)
{
if (notNull(" 专业 ",myform.zhuanye))
return true;
return false;
}
</script>
</head>
<body>
<form method="post" action="zhuanyeadd.asp" name="form1" onsubmit="return check(this)">
<table border="0" width="500" cellspacing="2" cellpadding="2" align="center">
<tr>
<td colspan="2" align="center">专业增加</td>
</tr>
<tr>
<td width="65">专业</td>
<td width="421"><input name="zhuanye" type="text" id="zhuanye" size="40"></td>
</tr>
<tr>
<td colspan="2" align="center">
<input type="submit" value="提交">
<input type="reset" value="重写">
<input name="theACT" type="hidden" id="theACT" value="SAVE">
</td>
</tr>
</table>
</form>
</body>
</html>
<%
call CloseData()
'call Timenum()
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -