📄 up_add_user.asp
字号:
<!--#include file="inc/conn.asp"-->
<%
id=Trim(Request.Form("id"))
username=Trim(Request.Form("username"))
sex=Trim(Request.Form("sex"))
xueyuan=Trim(Request.Form("xueyuan"))
xi=Trim(Request.Form("xi"))
intime=Trim(Request.Form("time"))
zhengzhi=Trim(Request.Form("zhengzhi"))
zhiwu=Trim(Request.Form("zhiwu"))
area=Trim(Request.Form("area"))
info=Trim(Request.Form("info"))
minzu=Trim(Request.Form("minzu"))
homeadd=Trim(Request.Form("homeadd"))
homephone=Trim(Request.Form("homephone"))
bedadd=Trim(Request.Form("bedadd"))
mobliephone=Trim(Request.Form("mobliephone"))
image=id&".gif"
if username<>"" then
openDB
set rs = Server.CreateObject("adodb.recordset")
rs.open "stu",conn,1,3
rs.addnew
rs("stu_idnum")=id
rs("stu_name")=username
rs("stu_sex")=sex
rs("stu_area")=area
rs("stu_homeadd")=homeadd
rs("stu_minzu")=minzu
rs("stu_zhengzhi")=zhengzhi
rs("stu_zhiwu")=zhiwu
rs("stu_xyname")=xueyuan
rs("stu_xname")=xi
rs("stu_time")=intime
rs("stu_homephone")=homephone
rs("stu_mobliephone")=mobliephone
rs("stu_info")=info
rs("stu_bedadd")=bedadd
rs("stu_image")=image
rs.update
rs.close
set rs=nothing
Response.Redirect "add_user.asp"
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -