joby.asp

台讯企业全站管理系统V2006 供下载时经过了严格的测试

<%@ LANGUAGE=VBScript CodePage=936%>
<!--#include file="Inc/Const.asp"-->
<!--#include file="Inc/System.asp"-->
<!--#include file="Head.asp"-->
<%
'***********************************************************************************
' 产品名称：台讯企业全站管理系统（V2006简体中文版）
' 程序开发：HECHENn（QQ：34103037　Emial：[e-mail]）
' Copyright 2006 txcodes.com - 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="770"  BORDER="0" ALIGN="center" cellpadding="0" CELLSPACING="0">
        <TR>
		<Form NAME=guestsave method=post action="Joby.asp?Action=save&Id=<%=Id%>" >
            <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> 男　　<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> 未婚　<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"><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>
        </TD>
		</Form>
        <TD WIDTH="5"></TD>
        <TD WIDTH="195" ALIGN="center" VALIGN="top" CLASS="TABLE-Side">
                <DIV CLASS='TABLE-side1'><SPAN CLASS="type-color1">产品搜索</SPAN></DIV>
                <DIV CLASS='TABLE-side3'><%Call page_Search("Products")%></DIV>
                <DIV CLASS='TABLE-side1'><SPAN CLASS="type-color1">订单搜索</SPAN></DIV>
                <DIV CLASS='TABLE-side3'><%Call page_Search("ShopCode")%></DIV>
        </TD>
        </TR>
    </TABLE>
    <%
            Rs_p.Close
            Set Rs_p=Nothing
	End IF
    Call Page_iBottom()
    Call Page_Bottom()
    Call CloseConn()
    %>