📄 resureg.asp
字号:
<!--#include file="../dbconn.asp"-->
<%
sql="select username from resume where username='" & Request("username") & "'"
set Rs=conn.Execute(sql)
%>
<html>
<head>
<link rel="stylesheet" type="text/css" href="../css/cdol.css">
<META content="Microsoft FrontPage 4.0" name=GENERATOR>
<title>注册结果</title>
</head>
<body bgColor=#E6E5B8 text="#383098">
现在位置：<a href="index.asp">首页</a>—<a href="login.htm">会员注册</a>--注册结果
<p> </p>
<p> </p>
<p align="center">
<%If not Rs.Eof Then
Response.Write "<center>您的用户名已经有人使用,请使用其他名称注册!<p>"
Response.Write "<center><a href='postresu.htm'> 请重新登陆好吗？ </a>"
else
%>
<%
login=trim(Request.Form("username"))
passwd=trim(Request.Form("passwd_1"))
name=trim(Request.Form("cname"))
sex=trim(Request.Form("sex"))
old=trim(Request.Form("old"))
marry=trim(Request.Form("marry"))
address=trim(Request.Form("address"))
phone=trim(Request.Form("phone"))
bp=trim(Request.Form("bp"))
email=trim(Request.form("email"))
gradu=trim(Request.Form("gradu"))
edu=trim(Request.Form("edu"))
school=trim(Request.Form("school"))
subject=trim(Request.Form("subject"))
work_year=trim(Request.Form("work_year"))
company=trim(Request.Form("company"))
position=trim(Request.Form("position"))
computer=trim(Request.Form("computer"))
english=trim(Request.Form("english"))
other=trim(Request.Form("other"))
job_area=trim(Request.Form("job_area"))
salary_wish=trim(Request.Form("salary_wish"))
jobname_wish=trim(Request.Form("jobname_wish"))
jobclass_wish=trim(Request.Form("jobclass_wish"))
sz = "'" & login & "', '"& passwd & "', '"& name & "','"& sex & "','"& old & "','"& marry & "', '"& address & "','"& phone & "','"& bp & "','"& email & "','"& gradu & "','"& edu & "', '"& school & "', '"& subject & "', '"& work_year & "', '"& company & "', '"& position & "','"& computer & "', '"& english & "', '"& other & "','"& job_area & "','"& salary_wish & "','"& jobname_wish & "','"& jobclass_wish & "'"
sql1 = "insert into resume(username,pwd,name,sex,old,marry,address,phone,bp,email,gradu,edu,school,"
sql1=sql1 &" subject,work_year,company,position,computer,english,other,job_area,salary_wish,jobname_wish,jobclass_wish) values (" & sz & ")"
'Response.Write sql1
'Response.End
conn.Execute(sql1)
conn.Close
set conn=nothing
Response.Write "<center>您的简历已经注册到我们的数据库里!<p>"
Response.Write "<center><a href='../index.asp'> 返回 </a>"
end if%>
</p>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -