careers.asp

一个不错的企业网站源代码！

<%@ Language=VBScript%>
<%
Response.Buffer=false
Response.Expires=0
%>
<!-- #include file="dsnroot.asp" -->
<!-- #include file="links.asp" -->
<%
set cn=Server.CreateObject("ADODB.Connection")
cn.Open mycnstr
set rs=server.CreateObject("ADODB.Recordset")
set rs2=server.CreateObject("ADODB.Recordset")
menu="11111121"
keyno=Request.QueryString ("keyno")
detail=Request.QueryString ("detail")
sendok=Request.QueryString ("sendok")
if keyno="" then
		keyno=0
	else
		keyno=cint(keyno)
end if
if detail="" then
		detail=0
	else
		detail=cint(detail)
end if		
if sendok="" then
		sendok=0
	else
		sendok=cint(sendok)
end if		
if keyno=0 then
		sqltext="select keyno from engage where state=1 order by sortnum"
		rs.Open sqltext,cn,1,1
		if not rs.EOF then
				keyno=rs("keyno")
		end if
		rs.Close 
end if
sqltext="select * from engage where state=1 and keyno="&keyno
rs.Open sqltext,cn,1,1
if not rs.EOF then
		title=rs("title")
		if rs("content")<>"" then
				content=checkstr1(rs("content"))
		end if
		dept=rs("dept")
		city=rs("city")
		yxq=rs("yxq")
		email=rs("email")
end if		
rs.Close 
engageno=keyno
if Request.ServerVariables("REQUEST_METHOD")="POST" then
	bz=0
	username=Lcase(Request.Form("username"))
	address=Request.Form("address")
	zip=Request.Form("zip")
	phone=Request.Form("phone")
	gender=Request.Form("gender")
	nd=Request.Form("nd")
	yf=Request.Form("yf")
	dd=Request.Form("dd")
	educode=Request.Form("educode")
	city=Request.Form("city")
	certcode=Request.Form("certcode")
	email=Request.Form("email")
	intro=Request.Form("intro")
	education=Request.Form("education")
	workexp=Request.Form("workexp")
	skill=Request.Form("skill")
	salary=Request.Form("salary")
	wantpay=Request.Form("wantpay")
	corpview=Request.Form("corpview")
	english=Request.Form("english")
	
		if userkeyno="" or userkeyno=0 then
			sqltext="select top 1 keyno from engage_user order by keyno desc"
			rs.Open sqltext,cn,1,1
			if rs.EOF then
				userkeyno=1
			else
				userkeyno=rs(0)+1
			end if
			rs.Close
			rs.Open "engage_user",cn,3,3
			rs.AddNew
			rs("keyno")=userkeyno
			rs("creadate")=Now()
			rs("engageno")=engageno
		else	
			rs.Open "select * from engage_user where keyno="&userkeyno,cn,3,3
		end if	
		rs("username")=username
		rs("address")=address
		rs("zip")=zip
		rs("phone")=phone
		rs("gender")=gender
		rs("educode")=educode
		rs("city")=city
		rs("certcode")=certcode
		rs("email")=email
		birthday=nd+"-"+yf+"-"+dd
		if IsDate(birthday) then
			rs("birthday")=cdate(birthday)			
		end if
		rs("intro")=intro
		rs("workexp")=workexp
		rs("skill")=skill
		rs("education")=education
		rs("english")=english
		rs("corpview")=corpview
		if isnumeric(salary) then
			rs("salary")=salary
		end if
		if isnumeric(wantpay) then
			rs("wantpay")=wantpay
		end if
		
		rs.Update
		rs.Close 
		Response.Redirect linkcareers&"?sendok=1&detail=1&keyno="&keyno
		
end if

%>
<!-- #include file="design.asp" -->
<table width="778" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF">
  <tr> 
    <td bgcolor="#66cc00" width="1"></td>
    <td width="190" valign="top" background="images/group/left_p_group.jpg" style="background-repeat: no-repeat; background-position: bottom"> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td><img src="images/group/left_top_p.jpg" width="190" height="45"></td>
        </tr>
      </table>
      <table width="180" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td><img src="images/careers/tp_careers.jpg" width="180" height="39"></td>
        </tr>
        <tr> 
          <td background="images/group/left_nav_bg.jpg"> 
             <%sqltext="select keyno,title from engage where state=1 order by sortnum"
			  rs.Open sqltext,cn,1,1
			  do while not rs.EOF 
			  if keyno=rs("keyno") then
					fontcolor="#ff9900"
				else
					fontcolor="#000000"
			  end if			
			  %>
            <table width="78%" border="0" cellspacing="0" cellpadding="0" align="center">
              <tr> 
                <td colspan="2" height="6"></td>
              </tr>
              <tr> 
                <td width="15" class="font3" valign=top>※</td>
                <td><a href="<%=linkcareers%>?keyno=<%=rs("keyno")%>" class="anews2"><font color="<%=fontcolor%>"><%=trim(rs("title"))%></font></a></td>
              </tr>
            </table>
            <%rs.MoveNext 
              loop
              rs.Close %>
          </td>
        </tr>
        <tr> 
          <td><img src="images/group/left_nav_bot.jpg" width="180" height="89"></td>
        </tr>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0" height="50">
        <tr>
          <td>&nbsp;</td>
        </tr>
      </table>
    </td>
    <td background="images/line_v.gif" width="1"></td>
    <td valign="top" background="images/bot_bg.jpg" style="background-repeat: repeat-x; background-position: bottom">
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td><img src="images/careers/careers_p.jpg" width="585" height="130"></td>
        </tr>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td><img src="images/group/line3.gif" width="585" height="22"></td>
        </tr>
      </table>
      <table width="96%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td height="10" colspan="2"></td>
        </tr>
        <tr> 
          <td class="font5ecb" height="36" colspan="2"><%=title%></td>
        </tr>
        <tr> 
          <td class="font1" height="10" width="230" valign="top">岗位名称：<%=title%><br>
            <%if dept<>"" then%>
					招聘部门：<%=dept%><br>
			<%end if%>
			<%if city<>"" then%>		
					工作地点：<%=city%><br>
			<%end if%>
			<%if yxq<>"" then%>		
					有效时限：<%=yxq%><br>
		    <%end if%>			
		    <%if email<>"" then%>
					联系信箱：<a href="mailto:<%=email%>" class=anews><%=email%></font>
			<%end if%>
			</td>
          <td class="font1" height="10" valign="top">岗位要求：<br>
            <%=content%></td>
        </tr>
		<%if detail=0 and keyno<>0 then%>
        <tr> 
          <td class="font1" height="36" colspan="2"> <a href="<%=linkcareers%>?detail=1&keyno=<%=keyno%>"><img src="images/careers/bt_wantjob.gif" width="70" height="18" border="0"></a></td>
        </tr>
        <%end if%>
        <%if detail=1 and keyno<>0 then%>
    
		<table width="96%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td>
			<table width="96%" border="0" cellspacing="0" cellpadding="0">
		      <tr>
				<td><img src="images/group/line3.gif" width="585" height="22"></td>
			  </tr> 
		    </table>  
          <table width="96%" border="0" cellspacing="0" cellpadding="0" align="center">
          <%if sendok=0 then%>
          <form action="<%=htmlname%>" method=post name=form1 onsubmit="javascript:return checkinput(form1)" autocomplete="off">
              <tr> 
                <td colspan=2 height=18><font class="font5ecb"><b>填写您的个人资料:</b></font></td>
              </tr>
              <tr> 
                <td colspan=2 height=18><font class="t1"></font></td>
              </tr>
              <tr> 
                <td class=td1 width=60>姓名</td>
                <td class=font1> 
                  <input type="text" name=username maxlength=20 size=20 class="font1">
                  <font color=red>*</font></td>