joby.asp

整站源码jsp 有兴趣的可以看看

<%@ LANGUAGE=VBScript CodePage=936%>
<!--#include file="Inc/Const.asp"-->
<!--#include file="Inc/Sysconn.asp"-->
<!--#include file="Head.asp"-->
<%
'***********************************************************************************
' 产品名称：CSYS.COM.CN企业全站管理系统（V2007简体中文版）
' 联系：QQ：61128110　Emial：[e-mail]
' Copyright 2006 www.csys.com.cn - All Rights Reserved. 
'***********************************************************************************
    IF Action="save" THEN
        IF trim(request.form("J_AddName"))="" THEN
            error_title="对不起，请输入您的真实姓名？"
            founderr=true
        ElseIF trim(request.form("J_Nation"))="" THEN
            error_title="对不起，请输入您所属的民族？"
            founderr=true
        ElseIF trim(request.form("J_Lives"))="" THEN
            error_title="对不起，请输入您现在的居住地点？"
            founderr=true
        ElseIF trim(request.form("J_Culture"))="" THEN
            error_title="对不起，请输入您的文化程度？"
            founderr=true
        ElseIF trim(request.form("J_Specialized"))="" THEN
            error_title="对不起，请输入您所属的专业？"
            founderr=true
        ElseIF trim(request.form("J_GraduationSchool"))="" THEN
            error_title="对不起，请输入您毕业的学校？"
            founderr=true
        ElseIF trim(request.form("J_GraduationTime"))="" THEN
            error_title="对不起，请输入您毕业的时间？"
            founderr=true
        ElseIF trim(request.form("J_Tel"))="" THEN
            error_title="对不起，请输入您的联系电话？"
            founderr=true
        ElseIF IsValidEmail(trim(request.form("J_Email")))=false THEN
            error_title="对不起，请输入正确的电子邮件地址！"
            founderr=true
        ElseIF trim(request.form("J_Resume"))="" THEN
            error_title="对不起，请输入您的个人简介！"
            founderr=true
        End IF
        IF founderr=true THEN
	        Call Page_check(3,0)
        Else
	        Set Rs=Server.createobject("adodb.recordset")
            Sql="Select * From Tx_Joby"
            Rs.open Sql,Conn,1,3
			Rs.addnew
			    Rs("Joby_JobId")=Id
			    Rs("Joby_AddName")=checkfSQLStr(trim(request.form("J_AddName")))
			    Rs("Joby_Nation")=checkfSQLStr(trim(request.form("J_Nation")))
			    Rs("Joby_Lives")=checkfSQLStr(trim(request.form("J_Lives")))
			    Rs("Joby_Culture")=checkfSQLStr(trim(request.form("J_Culture")))
			    Rs("Joby_Specialized")=checkfSQLStr(trim(request.form("J_Specialized")))
			    Rs("Joby_GraduationSchool")=checkfSQLStr(trim(request.form("J_GraduationSchool")))
			    Rs("Joby_GraduationTime")=checkfSQLStr(trim(request.form("J_GraduationTime")))
			    Rs("Joby_Tel")=checkfSQLStr(trim(request.form("J_Tel")))
			    Rs("Joby_Email")=checkfSQLStr(trim(request.form("J_Email")))
			    Rs("Joby_Sex")=request.form("J_Sex")
			    Rs("Joby_Age")=request.form("y") & "-" & request.form("m") & "-" & request.form("d")
			    Rs("Joby_Marriage")=request.form("J_Marriage")
			    Rs("Joby_Email")=checkfSQLStr(trim(request.form("J_Email")))
			    Rs("Joby_Resume")=dvHTMLEncode(checkfSQLStr(request.form("J_Resume")))
			    Rs("Joby_UserId")=Loginuser_Id
			    Rs("Joby_Ress")=VisitorsRess
			    Rs("Joby_Ip")=VisitorsIp
			    Rs("Joby_Date")=Now()
		    Rs.UpDate
		    Rs.Close
		    Set Rs=Nothing
		    ToHistory="Jobi.asp?Id=" & Id
		    saveok="您的应聘信息已成功提交，我们会尽快处理！"
	        Call Form_Saveok()
        End IF
    Else
    Set Rs_p=server.Createobject("Adodb.Recordset")
    Sql="Select * from Tx_Job where Job_Flag=1 and Job_Id=" & Id
    Rs_p.open Sql,Conn,1,1
    IF Rs_p.RecordCount=0 THEN Call Page_check(1,0)
    Class_Name="<A HREF=Job.asp>招聘信息</A> > <A HREF=Jobi.asp?Id=" & Rs_p("Job_Id") & ">" & Rs_p("Job_Name") & "</A> > 填写应聘信息"
	Page_Name="招聘 -- " & Rs_p("Job_Name") & " -- 填写应聘信息 -- " & Web_Const(0)
    Call Page_Head()
    Call Page_iHead()
    Call Page_nHead()
    %>
    <table width="990" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td width="321" valign="bottom" bgcolor="#082421"><span>
          <%Call Page_Login()%>
        </span><img src="Skins/blak/leftad.jpg" width="321" /></td>
        <td valign="top" bgcolor="#003333"><table width="100%"  border="0" align="center" cellpadding="5" cellspacing="0">
          <tr>
            <form action="Joby.asp?Action=save&amp;Id=<%=Id%>" method="post" name="guestsave" id="guestsave" >
              <td valign="top" class="TABLE-Main"><div class="page-head">填写应聘信息</div>
                  <div class="TABLE-Mainall">
                    <div class="joby-content"> 应聘职位： <b><%=Rs_p("Job_Name")%></b><br />
                      请认真填写下面的应聘信息：<br />
                      真实姓名：
                      <input name="J_AddName" type="text" class="INPUTimage1" id="J_AddName" size="14" maxlength="25" />
　　　　
性　　别：
            <input type="radio" name="J_Sex" value="男" checked="checked" />
                      男　　
                      <input name="J_Sex" type="radio" value="女" />
                      女<br />
                      出生年月：
                      <select name="y" class="INPUTimage1">
                        <%For y=1949 To 2010%>
                        <option value="<%=y%>" <%IF y=1983 THEN%>selected<%End IF%>><%=y%></option>
                        <%Next%>
                      </select>
                      <select name="m" class="INPUTimage1">
                        <%For m=1 To 12%>
                        <option value="<%=m%>" <%IF m=11 THEN%>selected<%End IF%>><%=m%></option>
                        <%Next%>
                      </select>
                      <select name="d" class="INPUTimage1">
                        <%For d=1 To 31%>
                        <option value="<%=d%>" <%IF d=8 THEN%>selected<%End IF%>><%=d%></option>
                        <%Next%>
                      </select>
                      <br />
                      民　　族：
                      <input name="J_Nation" type="text" class="INPUTimage1" id="J_Nation" size="14" maxlength="25" />
　　　　
婚姻状况：
            <input type="radio" name="J_Marriage" value="未婚" checked="checked" />
                      未婚　
                      <input name="J_Marriage" type="radio" value="已婚" />
                      已婚<br />
                      现居住地：
                      <input name="J_Lives" type="text" class="INPUTimage1" id="J_Lives" size="44" maxlength="50" />
                      <br />
                      文化程度：
                      <input name="J_Culture" type="text" class="INPUTimage1" id="J_Culture" size="14" maxlength="25" />
　　　　
所属专业：
            <input name="J_Specialized" type="text" class="INPUTimage1" id="J_Specialized" size="14" maxlength="25" />
                      <br />
                      毕业院校：
                      <input name="J_GraduationSchool" type="text" class="INPUTimage1" id="J_GraduationSchool" size="14" maxlength="25" />
　　　　
毕业时间：
            <input name="J_GraduationTime" type="text" class="INPUTimage1" id="J_GraduationTime" size="14" maxlength="25" />
                      <br />
                      联系电话：
                      <input name="J_Tel" type="text" class="INPUTimage1" id="J_Tel" size="14" maxlength="25" />
　　　　
电子邮件：
            <input name="J_Email" type="text" class="INPUTimage1" id="J_Email" size="14" maxlength="25" />
                      <br />
                      <br />
                      个人简介：
                      <textarea name="J_Resume" class="INPUTimage" cols="50" rows="8" id="J_Resume"></textarea>
                      <br />
                      <br />
                      <div class="TABLE-tstd">
                        <div align="center">
                          <input type="image" src="Skins/Blue/go.gif" width="51" height="21" name="Ok" align="absmiddle" />
                          <input type="image" src="Skins/Blue/cl.gif" width="51" height="21" name="Ok" align="absmiddle" onclick="vbscript:location.reload" />
                          </div>
                      </div>
                    </div>
                  </div></td>
            </form>
          </tr>
        </table></td>
      </tr>
    </table>
    <%
            Rs_p.Close
            Set Rs_p=Nothing
	End IF
    Call Page_iBottom()
    Call Page_Bottom()
    Call CloseConn()
    %>