usersave.asp
来自「留言簿毕业设计用ASP和SQL2000开发的能够链接」· ASP 代码 · 共 34 行
ASP
34 行
<html>
<head>
<title></title>
</head>
<body>
<%
Dim sql,UserId,UserName,xingbie,bumen,riqi,jiguan,xueli,zhuanye,mianmao,zhicheng
UserId = Request("UserId")
UserName = Request("UserName")
xingbie = Request("xingbie")
bumen = Request("bumen")
riqi = Request("riqi")
jiguan = Request("jiguan")
xueli = Request("xueli")
zhuanye = Request("zhuanye")
mianmao = Request("mianmao")
zhicheng = Request("zhicheng")
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="driver={SQL Server};server=(local);UID=sa;PWD=13513343483;Database=学院人事管理系统"
Conn.Open
sql="INSERT INTO 人员基本信息 (UserId, UserName, xingbie, bumen, riqi, jiguan, xueli, zhuanye, mianmao, zhicheng) VALUES('" & UserId & "','" & UserName & "','" & xingbie & "','" & bumen & "','" & riqi & "','" & jiguan & "','" & xueli & "','" & zhuanye & "','" & mianmao & "','" & zhicheng & "')"
Conn.Execute(sql)
Response.Redirect"success.asp"
%>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?