📄 djok.asp
字号:
<%
'毕业设计:林林在线网络招聘系统
'毕业设计:林林在线网络招聘系统
dim name,user,job1,job2,major,sex,age,level,id,email,addr,resumes,phone,classid
name = Request("username")
user = Request("user")
job1 = Request("job1")
job2 = Request("job2")
major = Request("usermajor")
age = Request("userage")
level = Request("level")
id = Request("id")
email = Request("email")
addr = Request("addr")
resumes = Request("resume")
phone = Request("phone")
classid = Request("classid")
%>
<HTML>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<style type="text/css">
<!--
.style1 {font-size: 14px}
.style3 {color: #FF0000}
-->
</style>
<BODY BGCOLOR="LightYellow">
<!-- #include file="conn.asp" -->
<%
if session("user")="" then
Response.write("<center>使用错误,请先登陆")
Response.End
end if
%>
<%
dim rs, sql
Set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from userinfo"
rs.Open sql,conn,1,3
if request.Form("username")="" or request.Form("userage")="" or request.Form("job1")="" or request.Form("usermajor")="" _
or request.Form("addr")="" or request.Form("resume")="" then
Response.write "<CENTER><P><span class='style2'>带 <span class='style3'>*</span> 都不能为空！</span></p>" & _
"<P><a href='javascript:onclick=history.go(-1)'><span class='style2'>返回</span></a></P></CENTER>"
Response.End
end if
dim add
Set add = Conn.Execute("Select * from userinfo where user='"&Request.QueryString("user")&"' or user='"&session("user")&"'")
If Not add.Eof then
response.write " <html><head><link rel='stylesheet' href='style.css'></head><body>"
response.write " <br><br><br>"
response.write " <table align='center' width='300' border='0' cellpadding='4' cellspacing='0' class='border'>"
response.write " <tr > "
response.write " <td class='title' colspan='2' height='15'> "
response.write " <div align='center'><span class='style1'>您已经登记过了!</span></div>"
response.write " </td>"
response.write " </tr>"
response.write " <tr> "
response.write " <td class='tdbg' colspan='2' height='23'> "
response.write " <div align='center'><br><br>"
response.write " <span class='style1'>返回修改您的资料!!!</span><br><br>"
response.write " <a href='javascript:onclick=history.go(-1)'><span class='style2'>返回</span></a>"
response.write " <br><br></div></td>"
response.write " </tr></table></body></html>"
Response.End
End If
RS.AddNew Array("user","username","userage","userlevel","usermajor","job1","job2","time","userid","email","addr","resume","phone","classid"), _
Array(user, name,age,level,major,job1,job2,Now(),id,email,addr,resumes,phone,classid)
if Request.Form("select") = "1" then
Rs("usersex")="男"
else
Rs("usersex")="女"
end if
RS.Update
'关闭数据库连接并释放对象
RS.Close
Set RS = Nothing
Conn.Close
Set Conn = Nothing
%>
<CENTER>
<P class="style1"><span class="style3">*</span>资料登记成功<span class="style3">*</span><br>
<P class="style1">返回</P>
</CENTER>
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -