📄 as_insert_user.asp
字号:
<!-- #include file="conn.asp" -->
<body bgcolor="">
<SCRIPT LANGUAGE="vbScript">
Sub insert()
If f1.t1.value="" Then
msgbox"用户名不能为空"
else
f1.action="as_insert_user.asp?q=1"
end if
End Sub
</SCRIPT>
<style>
table tr{text-align:center}
</style>
<FORM METHOD=POST ACTION="" name="f1">
<TABLE border="1" align="center" bordercolor="#CC00FF">
<TR>
<TD height="55"><CENTER><FONT SIZE="5" COLOR="red">添加用户</FONT></CENTER></TD>
</TR>
<TR>
<TD height="50">用户姓名：<INPUT TYPE="text" NAME="t1"> <FONT COLOR="red">*</FONT></TD>
</TR>
<TR>
<TD height="50">用户单位：<INPUT TYPE="text" NAME="t2"> </TD>
</TR>
<TR>
<TD height="80" width="340">备 注：(可以不填写)<br><TEXTAREA NAME="t3" ROWS="3" COLS="40"></TEXTAREA></TD>
</TR>
<TR height="40">
<TD><CENTER><INPUT TYPE="submit" value=" 添加 " onclick="insert()"> <INPUT TYPE="reset" value=" 取消 "></CENTER></TD>
</TR>
<TR>
<TD><FONT SIZE="4" COLOR="red"><CENTER>*为必填内容</CENTER></FONT></TD>
</TR>
</TABLE>
<%
If request("q")="1" Then
conn.execute("insert into [user](user_Name,User_Address,User_Remarks) values('" & request("t1") & "','" & request("t2") & "','" & request("t3") & "')")
'成功后跳转
response.write"<SCRIPT LANGUAGE='JavaScript'>"
response.write"alert('你已经成功添加用户!');"
response.write "location.href='see_user.asp'"
response.write"</SCRIPT>"
End If
%>
</FORM>
</body>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -