📄 zhuanyeedit.asp
字号:
<!--#include file="../conn.asp"-->
<!--#include file="../check.asp"-->
<%
dim zid,sql,theACT,zhuanye,rs,temp
call LinkData()
Set rs = Server.CreateObject("ADODB.RecordSet")
zid=request("zid")
sql="select * from zhuanye where zid="&zid
rs.open sql,conn,1,1
zhuanye=rs("zhuanye")
rs.close
%>
<%
theACT=request("theACT")
if theACT="SAVE" then
zhuanye=request("zhuanye")
sql="select * from zhuanye where zid="&zid
rs.open sql,conn,1,3
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">
</head>
<body>
<form method="post" action="zhuanyeedit.asp" name="createForm">
<input type="hidden" name="zid" value="<%=zid%>">
<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" value="<%=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 + -