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

📄 appointment.asp

📁 管理登录system 管理员:admin 密码:admin888 数据库链接文件: conn.asp 内容数据库前台链接文件 systemconn.asp 内容数据库后台链接文件 sy
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="siteinfo.asp"-->
<%
Sm=session("my_system")
Su=session("Uname")
%>

<SCRIPT language=javaScript>

function CheckJob()
{
	if (document.form1.jobname.value.length < 3 || document.form1.jobname.value.length > 30){
		alert ("提示:\n\n职位必须在3-30字之间!");
		document.form1.jobname.focus();
		return false;
	}
	if (document.form1.name.value.length < 2 || document.form1.name.value.length > 16){
		alert ("提示:\n\n姓名必须在2-16字之间!");
		document.form1.name.focus();
		return false;
	}
	if (document.form1.date.value.length!=10){
		alert ("提示:\n\n出生日期格式不对!");
		document.form1.date.focus();
		return false;
	}
	if (document.form1.stature.value.length != 3){
		alert ("提示:\n\n身高格式不对!");
		document.form1.stature.focus();
		return false;
	}
	if (document.form1.residence.value.length < 4 ||document.form1.residence.value.length > 30 ){
		alert ("提示:\n\n户籍所在地在4-30个符之间!");
		document.form1.residence.focus();
		return false;
	}
	if (document.form1.edu_level.value.length < 20 ){
		alert ("提示:\n\n教育经历必须在20字以上!");
		document.form1.edu_level.focus();
		return false;
	}
	if (document.form1.job_level.value.length < 20 ){
		alert ("提示:\n\n工作经历必须在20字以上!");
		document.form1.job_level.focus();
		return false;
	}
	if (document.form1.tel.value == ""|| document.form1.tel.value.length < 8){
		alert ("提示:\n\n联系电话必须在8个字符以上!");
		document.form1.tel.focus();
		return false;
	}

    if(document.form1.email.value.length!=0)
     {
       if (document.form1.email.value.charAt(0)=="." ||        
            document.form1.email.value.charAt(0)=="@"||       
            document.form1.email.value.indexOf('@', 0) == -1 || 
            document.form1.email.value.indexOf('.', 0) == -1 || 
            document.form1.email.value.lastIndexOf("@")==document.form1.email.value.length-1 || 
            document.form1.email.value.lastIndexOf(".")==document.form1.email.value.length-1)
        {
         alert("Email地址格式不正确!");
         document.form1.email.focus();
         return false;
         }
      }
    else
     {
      alert("Email不能为空!");
      document.form1.email.focus();
      return false;
      }
 }
</SCRIPT>
<%
function ChangeChr(str) 
   ChangeChr=replace(replace(replace(replace(str,"<","&lt;"),">","&gt;"),chr(13),"<br>")," ","&nbsp;") 
end function
%>
<HTML>
<HEAD>
<TITLE><%=sitename%></TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<link href="images/CSS.css" type=text/css rel=stylesheet>
</HEAD>
<BODY >
<!--#include file="top.asp" -->

<table width="778" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td width="179" valign="top" background="images/BGline01.gif"><!--#include file="Resourceleft.asp" --></td>
    <td width="598" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr background="images/BGline04.gif">
          <td width="20" height="24" background="images/BGline04.gif">&nbsp;</td>
          <td background="images/BGline04.gif"><span class="ABOUT_01"><img src="images/GO_03.gif" width="11" height="11" align="absmiddle"> 当前位置:<a href="index.asp">首页</a> &gt; <a href="resource.asp">人力资源</a> &gt; 在线应聘</span><span class="ABOUT_01"></span></td>
          <td width="20" background="images/BGline04.gif">&nbsp;</td>
        </tr>
        <tr>
          <td width="20">&nbsp;</td>
          <td>&nbsp;</td>
          <td width="20">&nbsp;</td>
        </tr>
        <tr>
          <td width="20" height="300">&nbsp;</td>
          <td align="center" valign="top">
<%
if Sm<>"" or sm="my_system2008" or Su<>"" then
   set rsU=Server.CreateObject("Adodb.Recordset")
   sql = "select * from UserInfo where Uname='"&Su&"'" 
   rsU.open sql,conn,1,1
   if not rsu.eof then
      Uid=rsU("id")
      if rsU("Uname1")="" then
         Uname=rsU("Uname")
      else
         Uname=rsU("Uname1")
      end if
      Ucom=rsU("Ucom")
      Uadd=rsU("Uadd")
      Utel=rsU("Utel")
      Umtel=rsU("Umtel")
      Ufax=rsU("Ufax")
      Ucode=rsU("Ucode")
      Uemail=rsU("Uemail")
      rsU.close
      set rsU=nothing
   end if
end if
%>
<%    
dim addation,jobname
jobname=trim(request.QueryString("jobname"))
addation=trim(request.QueryString("addation"))
	   
if addation="addok" then
      if request("VCodes")="" or (not IsNumeric(request("VCodes"))) then
         response.write "<script language=javascript> alert('提示:\n\n非法的验证码,正确验证码应该是由4位数字组成!');history.back(-1);</script>"
         response.end
	  else 
	     if (int(session("VCodes"))<>int(request("VCodes")))   then
            response.write "<script language=javascript> alert('提示:\n\n验证码错误,请重新输入黄色区域内的数字!');history.back(-1);</script>"
		    response.end
         end if
	  end if
   jobname=trim(request.Form("jobname"))
   name2=trim(request.Form("name"))
   marriage=trim(request.Form("marriage"))
   gender=trim(request.Form("gender"))
   datetime=trim(request.Form("date"))
   stature=trim(request.Form("stature"))
   residence=trim(request.Form("residence"))
   edu_level=trim(request.Form("edu_level"))
   edu_level=trim(ChangeChr(edu_level))
   job_level=trim(request.Form("job_level"))
   job_level=trim(ChangeChr(job_level))
   tel=trim(request.Form("tel"))
   mobiletel=trim(request.Form("mobiletel"))
   email=trim(request.Form("email"))
   address=trim(request.Form("address"))
   zip=trim(request.Form("zip"))
 '=================================   
   set rs=server.createobject("adodb.recordset")
       sql="select * from Recommend where (id is null)" 
       rs.open sql,conn,1,3
       rs.addnew
	   rs("jobname")=jobname
	   rs("name")=name2
	   rs("Uid")=Uid
	   rs("marriage")=marriage 
	   rs("gender")=gender
	   rs("date")=datetime
	   rs("stature")=stature 
	   rs("residence")=residence
	   rs("edu_level")=edu_level
	   rs("job_level")=job_level
	   rs("tel")=tel
	   rs("mobiletel")=mobiletel
	   rs("email")=email
	   rs("address")=address
	   rs("zip")=zip
       rs("addtime")=date()
       rs.update
	   rs.close
	   set rs=nothing
       Response.Write "<br><br><br><font style='FONT-SIZE: 13px;'>您的简历提交成功,如果合适我们会尽快通知您面试!</font><br><br><br><a href='Resource.asp' ><font style='FONT-SIZE: 14px;' color='#ff0000' >≡继续查看招聘信息≡</font></a>  <a href='../' ><font style='FONT-SIZE: 14px;' color='#ff0000' >≡返回首页≡</font></a>"
	   

⌨️ 快捷键说明

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