⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dj.asp

📁 林林网络招聘系统(源码+毕业论文+开题报告)使用ASP技术,数据库使用Access,不错的网络招聘系统
💻 ASP
字号:
<html>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<head>
<title>用户管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style1 {font-size: 12px}
.style3 {color: #FF0000}
.style6 {font-size: 14px}
.style8 {
	font-size: 18px;
	font-weight: bold;
	color: #0000FF;
}
.style9 {font-size: 18px}
.style7 {	font-size: 18px;
	color: #0000FF;
}
-->
</style>
</head>
<!--#include file="conn.asp"-->
<%
'毕业设计:林林在线网络招聘系统
'毕业设计:林林在线网络招聘系统
if session("user")="" then
      Response.write("<center>使用错误,请先登陆")  
      Response.End
end if
%>
<%
   dim uid
   dim rs,rs1,sql
   dim rs2
   Set rs=Server.CreateObject("Adodb.RecordSet")   
   sql="select * from alluser where user='"&session("user")&"'"   
   rs.Open sql,conn,1,1
   
   Set rs1=Server.CreateObject("Adodb.RecordSet")   
   sql="select classid from userinfo where user='"&session("user")&"' "   
   rs1.Open sql,conn,1,1   
%>
<body>
<table width="500" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <th><font style=line-height:150%><span class="style6">
	<%dim edit		
		Set edit = Conn.Execute("Select * from userinfo where user='"&session("user")&"'")
		If Not edit.Eof then
		  Response.Redirect("edit.asp?classid="&rs1("classid"))
		  Response.End
	  end if
	%>
	</span></font></th>
  </tr>
</table>
<table width="496" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td scope="col"><div align="center"><span class="style9">
          <%
		  Response.Write "<table width='100%' border='0' cellpadding='2' cellspacing='1' bgcolor='#CCCCCC'>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"
		  Response.Write "<td><span class='style9'>登记资料<br>登记资料后才能修改资料,不必再登记了</span><FORM METHOD='POST' TARGET= '_self' ACTION='djok.asp?id=" & RS("id") & "&User=" & RS("user") & "'></td>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"		  
		  Response.Write "<td><span class='style1'>性别:</span><select name='select'><option value='1' selected='selected'>男</option><option value='0'>女</option></select></td>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"
			Response.Write "<TD><span class='style1'>姓名:</span><input id='text12' name='username' style='height:21px;width:103px'><span class='style3'>*</span></TD>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"
		  Response.Write "<td><span class='style1'>年龄:</span><input id='text13' name='userage' style='height:21px;width:103px'><span class='style3'>*</span></td>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"
		  %><td><span class="style1">学历:</span>
		  <select name="level" id="level">
		    <option value="博士">博士</option>
		    <option value="硕士">硕士</option>
		    <option value="研究生">研究生</option>
		    <option value="本科" selected>本科</option>
		    <option value="大专">大专</option>
		    <option value="高中及以下">高中及以下</option>
          </select></td>
		  <%
		  'Response.Write "<tr bgcolor='#EEEEEE'>"
		  'Response.Write "<td><span class='style1'>学历:</span><input id='text14' name='userlevel' style='height:21px;width:103px'><span class='style3'>*</span></td>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"
		  Response.Write "<td><span class='style1'>专业:</span><input id='text15' name='usermajor' style='height:21px;width:103px'><span class='style3'>*</span></td>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"
		  %>
	  <td><span class="style1">请选择分类:</span>
	    <select  id="select" name="classid">
          <%
    set rs2 = server.createobject("adodb.recordset")
    rs2.source = "select * from jobs order by classid asc " '从数据库中取得分类工作信息
    rs2.open rs2.source,conn,1,1
    while not rs2.eof
%>
          <option value="<%=rs2("classid")%>" selected><%=rs2("class")%></option>
          <%
    rs2.movenext
    wend
%>
        </select></td>
		  <%
		  Response.Write "<tr bgcolor='#EEEEEE'>"
		  Response.Write "<td><span class='style1'>想找的工作:</span><input id='text16' name='job1' style='height:21px;width:223px'><span class='style3'>*</span></td>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"
		  Response.Write "<td><span class='style1'>想找的其它工作:</span><input id='text17' name='job2' style='height:21px;width:203px'></td>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"
		  Response.Write "<td><span class='style1'>E-mail:</span><input id='text15' name='email' style='height:21px;width:103px'></td>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"
		  Response.Write "<td><span class='style1'>电话:</span><input id='text15' name='phone' style='height:21px;width:103px'></td>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"
		  Response.Write "<td><span class='style1'>地址:</span><input id='text15' name='addr' style='height:21px;width:303px'><span class='style3'>*</span></td>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"
		  Response.Write "<td><span class='style1'>个人简历:</span><span class='style3'>*</span><br><textarea name='resume' id='textarea4' style='height:135px;width:434px'></textarea></td>"
		  Response.Write "<tr bgcolor='#EEEEEE'>"
		  Response.Write "<td><INPUT TYPE='SUBMIT' VALUE='登记资料'></td></FORM>"
		  %>		  
      </td>
    </tr>
</table>
  <%  
  rs.Close
  set rs=Nothing  
  conn.Close
  set conn=Nothing
%>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -