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 + -
显示快捷键?