<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% if request("submit")<>empty then %> <% function changechr(str) changechr=replace(replace(replace(replace(str,"<","<"),">",">"),chr(13),"
")," "," ") changechr=replace(replace(replace(replace(changechr,"[img]",""),"[red]",""),"[big]","") changechr=replace(replace(replace(replace(changechr,"[/img]",">"),"[/b]",""),"[/red]",""),"[/big]","") end function Set rs=Server.CreateObject("ADODB.Recordset") Sql="select * from tbl_yingpin" rs.open Sql,conn,3,2 rs.addnew rs("name")=changechr(request("name")) rs("xingbie")=changechr(request("xingbie")) rs("nianling")=changechr(request("nianling")) rs("minzu")=changechr(request("minzu")) rs("mianmao")=changechr(request("mianmao")) rs("birthday")=changechr(request("birthday")) rs("zhuanye")=changechr(request("zhuanye")) rs("jiguan")=changechr(request("jiguan")) rs("xueli")=changechr(request("xueli")) rs("tel")=changechr(request("tel")) rs("email")=changechr(request("email")) rs("address")=changechr(request("address")) rs("youbian")=changechr(request("youbian")) rs("yixiang")=changechr(request("yixiang")) rs("pingjia")=changechr(request("pingjia")) rs("dengji")=changechr(request("dengji")) rs("jineng")=changechr(request("jineng")) rs("jingli")=changechr(request("jingli")) rs("jiangfa")=changechr(request("jiangfa")) rs("kecheng")=changechr(request("kecheng")) rs("ganxiang")=changechr(request("ganxiang")) rs("qita")=changechr(request("qita")) rs("addtime")=date() rs("username")=clng(session("id")) rs.update rs.close set rs=nothing msg "简历填写成功。","GoUrl","zxzp.asp" response.end end if %> TT

应聘人姓名: *
性  别: *
身份证号: *
民  族: *
政治面貌: *
出生日期: *
专  业: *
籍  贯: *
学  历: *
联系电话: *
E_mail: *
联系地址: *
邮政编码: *
应聘职位: " maxlength=50> *
自我评价: *
外语及计算机等级: *
主要技能: *
奖罚简介: *
主修课程: *
学习及实践经历: *
其他简介: