<!--#include file="../Conn.asp" -->
<!--#include file="../Comm/Site_Class.asp" -->
<%
Dim strMenu,PageTitle
strMenu = ""
PagePath = "../"

Set Qsite = New Site_Class

Qsite.SiteConfig()
Qsite.GotoErrPage()

PageTitle = Qsite.SiteName & " - 个人会员管理中心"
Qsite.SiteTopPerson()
%>
<!--#include file="Check_Login.asp" -->
<%
Dim Rs
Dim Salary,Nature,Position_b,Position_s,JobPost,Province,City,County
Set Rs = server.CreateObject("ADODB.recordset")

If Request.Form <> "" Then
	
	Salary = Qsite.chgStr(Trim(Request.Form("Salary")))
	Nature = Qsite.chgStr(Trim(Request.Form("Nature")))
	Position_b = Qsite.chgStr(Trim(Request.Form("Position_b")))
	Position_s = Qsite.chgStr(Trim(Request.Form("Position_s")))
	JobPost = Qsite.chgStr(Trim(Request.Form("JobPost")))
	Province = Qsite.chgStr(Trim(Request.Form("Province")))
	City = Qsite.chgStr(Trim(Request.Form("City")))
	County = Qsite.chgStr(Trim(Request.Form("County")))
	
	If Len(Salary) > 5 Then
		Qsite.ShowMsg "月薪不能超过5位数字" , ""
	End If
	If Salary = "" Or IsNull(Salary) Or Not IsNumeric(Salary) Then
		Qsite.ShowMsg "请输入要求月薪，要求月薪只能输入数字" , ""
	End If
	If Nature = "" Or IsNull(Nature) Then
		Qsite.ShowMsg "请选择工作性质" , ""
	End If
	If Position_b = "" Or IsNull(Position_b) Or Position_s = "" Or IsNull(Position_s) Then
		Qsite.ShowMsg "请选择拟定职业" , ""
	End If
	If JobPost = "" Or IsNull(JobPost) Then
		Qsite.ShowMsg "请输入求职意向岗位" , ""
	End If
	If Province = "" Or IsNull(Province) Or City = "" Or IsNull(City) Or County = "" Or IsNull(County) Then
		Qsite.ShowMsg "请输入工作地区" , ""
	End If
	
	Conn.Execute("update PersonTbl set Salary = "& Salary &" , Nature = '"& Nature &"' , Position_b = '"& Position_b &"' , Position_s = '"& Position_s &"' , JobPost = '"& JobPost &"' , Province = '"& Province &"' , City = '"& City &"' , County = '"& County &"' where PerId = "& Session("PerId") &" and UserName = '"& Session("UserName") &"'")
		
	
	Qsite.ShowMsg "资料修改成功" , "ChgPerInfo_3.asp"
	
End If

Rs.Open "select * from PersonTbl where PerId = "& Session("PerId") &" and UserName = '"& Session("UserName") &"'" , Conn , 1 , 1
If Rs.Eof Then
	Qsite.ShowMsg "请不要提交非法参数" , "../Index.asp"
Else
	Salary = Rs("Salary")
	Nature = Rs("Nature")
	Position_b = Rs("Position_b")
	Position_s = Rs("Position_s")
	JobPost = Rs("JobPost")
	Province = Rs("Province")
	City = Rs("City")
	County = Rs("County")
End If
Rs.Close
%>
<table width="974" height="413" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr> 
        <td width="185" valign="top"> 
<!--#include file="Left_Menu.asp" -->
        </td>
        <td width="789" valign="top"><script language="javascript" src="../Comm/Job_All.js"></script>
<script language="javascript" src="../Comm/Job_Function.js"></script>
<script language="javascript" src="../Comm/Area_All.js"></script>
<script language="javascript" src="../Comm/Area_Function.js"></script>
<script language="javascript" src="../Comm/Comm.js"></script>
<script language="javascript">
	function CheckForm()
	{
		if(!checkLength("Salary" , "要求月薪" , 1 , 5))
			return false;
		if(!checkInteger("Salary" , "要求月薪" , 0 , 100000))
			return false;
		if(RegForm.Nature.value == "")
		{
			alert("请选择工作性质");
			return false;
		}
		if(RegForm.Vocational.value == "")
		{
			alert("请选择拟定职业");
			return false;
		}
		if(!checkLength("JobPost" , "求职意向岗位" , 1 , 100))
			return false;
		if(!checkLength("WorkAddr" , "工作地区" , 1 , 100))
			return false;
		return true;
	}
</script>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td height="26" background="../images/Member_Center_r7_c8.jpg"><table width="768" border="0" cellspacing="0" cellpadding="0">
                  <tr>
                    <td width="60">&nbsp;</td>
                    <td width="708"><span style="font-size:14px;color:#FF7706"><b>求职意向</b></span><span style="font-size:14px;color:#333333"> 
                      <strong>Employment</strong></span></td>
                  </tr>
                </table></td>
            </tr>
            <tr>
              <td height="136" align="left" valign="top" background="../images/Member_Center_r10_c8.jpg" style="padding-top:5px;padding-left:10px;padding-right:10px;padding-bottom:5px;">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
                  <tr> 
                    <td width="100%" height="23"><img src="../images/ico_2.gif" width="15" height="12" align="absmiddle" />友情提示：请在联系方式请至少填写一项，建议您填写手机号码，并多填几种联系方式，以便招聘单位能在第一时间与您取得联系！</td>
                  </tr>
                </table>
                <table width="100%" height="7" border="0" cellpadding="0" cellspacing="0">
                  <tr height="1">
                    <td background="../images/ico_point.gif"></td>
                  </tr>
				  <tr height="6">
                    <td></td>
    
                </table>
							<form id="PerForm" name="PerForm" method="post" action="ChgPerInfo_3.asp" style="margin:0" onsubmit="return CheckForm();">
									<table width="100%" align=center border="0" cellpadding="5" cellspacing="3">
										<tr>
											<td width="19%" height="30" ><font color="#FF0000">*</font>要求月薪：</td>
											<td width="81%" height="30" >不低于
						<input name="Salary" type="text"  id="Salary" value="<%=Salary%>" size="10" />
						元/月(如果面议请填“0”)</td>
										</tr>
										<tr>
											<td height="30" ><font color="#FF0000">*</font>工作性质：</td>
											<td height="30" ><select name="Nature"  id="Nature">
						<option value="" <%If Nature = "" Then Response.Write("selected")%>>请选择</option>
						<option value="不限" <%If Nature = "不限" Then Response.Write("selected")%>>不限</option>
						<option value="全职" <%If Nature = "全职" Then Response.Write("selected")%>>全职</option>
						<option value="兼职" <%If Nature = "兼职" Then Response.Write("selected")%>>兼职</option>
						<option value="临时" <%If Nature = "临时" Then Response.Write("selected")%>>临时</option>
					</select></td>
										</tr>
										<tr>
											<td height="30" ><font color="#FF0000">*</font>拟定职业：</td>
											<td height="30" ><select name="Position_b"  id="Position_b" onChange="SelectChange('Position_s' , document.all.Position_b.options[document.all.Position_b.selectedIndex].value , arrPosition_b , arrPosition_s);">
												<option value="">-请选择工作职能-</option>
											</select>
												<select name="Position_s"  id="Position_s">
													<option value="">-请选择工作职位-</option>
											</select></td>
										</tr>
										<tr>
											<td height="30" ><font color="#FF0000">*</font>求职意向岗位：</td>
											<td height="30" ><input name="JobPost" type="text"  id="JobPost" value="<%=JobPost%>" /></td>
										</tr>
										<tr>
											<td height="30" ><font color="#FF0000">*</font>意向工作地区：</td>
											<td height="30" ><select name="Province"  id="Province" onChange="SelChgCity('City' , document.all.Province.options[document.all.Province.selectedIndex].value , arrProvince , arrCity , 'County');">
											</select>
												<select name="City"  id="City" onChange="SelChgCounty('County' , document.all.City.options[document.all.City.selectedIndex].value , arrCity , arrCounty);">
												</select>
												 <select name="County"  id="County">
												</select>
						(填写您希望的工作地区)</td>
										</tr>
										<tr>
											<td height="30">&nbsp;</td>
											<td height="30"><input type="submit" name="Submit" value=" 修  改 " />
												&nbsp;
											<input type="reset" name="Submit" value=" 重  置 " /></td>
										</tr>
								</table>
						</form>
<script language="javascript">
	InitPosition("Position_b" , "Position_s" , arrPosition_b , arrPosition_s , "<%=Position_b%>" , "<%=Position_s%>")
	InitArea("Province" , "City" , "County" , arrProvince , arrCity , arrCounty , "<%=Province%>" , "<%=City%>" , "<%=County%>")
</script>
<table width="100%" height="1" border="0" cellpadding="0" cellspacing="0">
                  <tr height="1">  
                    <td background="../images/ico_point.gif"></td>
                  </tr>
                </table></td>
            </tr>
            <tr height="14">
              <td height="14" background="../images/Member_Center_r18_c8.jpg"></td>
            </tr>
          </table></td>
      </tr>
    </table>
 
<table width="974" height="8" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr height="8">
        <td height="8"></td>
      </tr>
    </table>
<%
Qsite.Bottom()
%>