<!--#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
Set Rs = server.CreateObject("ADODB.recordset")

Dim EduId,EduBeginDate,EduEndDate,EduSchool,EduProfession,EduQualification,EduNote

If Request.Form <> "" Then
	EduId = Qsite.chgStr(Trim(Request.Form("EduId")))
	EduBeginDate = Qsite.chgStr(Trim(Request.Form("EduBeginDate")))
	EduEndDate = Qsite.chgStr(Trim(Request.Form("EduEndDate")))
	EduSchool = Qsite.chgStr(Trim(Request.Form("EduSchool")))
	EduProfession = Qsite.chgStr(Trim(Request.Form("EduProfession")))
	EduQualification = Qsite.chgStr(Trim(Request.Form("EduQualification")))
	EduNote = Qsite.chgStr(Trim(Request.Form("EduNote")))
	
	If EduId = "" Or IsNull(EduId) Or Not IsNumeric(EduId) Then EduId = 0
	
	If EduBeginDate = "" Or IsNull(EduBeginDate) Then
		Qsite.ShowMsg "请输入开始时间" , ""
	End If
	If EduEndDate = "" Or IsNull(EduEndDate) Then EduEndDate = "至今"
	If EduSchool = "" Or IsNull(EduSchool) Then
		Qsite.ShowMsg "请输入学校" , ""
	End If
	If EduProfession = "" Or IsNull(EduProfession) Then
		Qsite.ShowMsg "请输入专业" , ""
	End If
	If EduQualification = "" Or IsNull(EduQualification) Then
		Qsite.ShowMsg "请选择学历" , ""
	End If
	
	Conn.Execute("update EduTbl set EduBeginDate = '"& EduBeginDate &"' , EduEndDate = '"& EduEndDate &"' , EduSchool = '"& EduSchool &"' , EduProfession = '"& EduProfession &"' , EduQualification = '"& EduQualification &"' , EduNote = '"& EduNote &"' where EduId = "& EduId &" and PerId = "& Session("PerId"))
	
	Qsite.ShowMsg "修改成功" , "ChgPerInfo_5.asp"
End If

EduId = Qsite.chgStr(Trim(Request.QueryString("EduId")))

If EduId = "" Or IsNull(EduId) Or Not IsNumeric(EduId) Then EduId = 0

Rs.Open "select * from EduTbl where EduId = "& EduId &" and PerId = "& Session("PerId") , Conn , 1 , 1
If Rs.Eof Then
	EduBeginDate = ""
	EduEndDate = ""
	EduSchool = ""
	EduProfession = ""
	EduQualification = ""
	EduNote = ""
Else
	EduBeginDate = Rs("EduBeginDate")
	EduEndDate = Rs("EduEndDate")
	EduSchool = Rs("EduSchool")
	EduProfession = Rs("EduProfession")
	EduQualification = Rs("EduQualification")
	EduNote = Rs("EduNote")
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/Comm.js"></script>
<script language="javascript">
	function CheckForm()
	{
		if(!checkLength("EduBeginDate" , "开始时间" , 1 , 20))
			return false;
		if(!checkLength("EduSchool" , "学校" , 1 , 100))
			return false;
		if(!checkLength("EduProfession" , "专业" , 1 , 100))
			return false;
		if(PerForm.EduQualification.value == "")
		{
			alert("请选择学历");
			return false;
		}
		if(!checkLength("EduNote" , "专业描述" , 0 , 500))
			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>Edit Education</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_5_Edit.asp" style="margin:0" onsubmit="return CheckForm();">
						<table width="100%" align=center border="0" cellpadding="5" cellspacing="3">
									<tr>
										<td width="13%" height="30"><font color="#FF0000">*</font>时间：
										<input name="EduId" type="hidden" id="EduId" value="<%=EduId%>" /></td>
										<td width="87%" height="30">从
											<input name="EduBeginDate" type="text"  id="EduBeginDate" value="<%=EduBeginDate%>" size="16" />
											到
											<input name="EduEndDate" type="text"  id="EduEndDate" value="<%=EduEndDate%>" size="16" />
										(格式：2007-09，后面一项目不填表示至今)</td>
									</tr>
									<tr>
										<td height="30"><font color="#FF0000">*</font>学校：</td>
										<td height="30"><input name="EduSchool" type="text"  id="EduSchool" value="<%=EduSchool%>" size="50" /></td>
									</tr>
									<tr>
										<td height="30"><font color="#FF0000">*</font>专业：</td>
										<td height="30"><input name="EduProfession" type="text"  id="EduProfession" value="<%=EduProfession%>" size="30" /></td>
									</tr>
									<tr>
										<td height="30"><font color="#FF0000">*</font>学历：</td>
										<td height="30"><select name="EduQualification"  id="EduQualification">
						<option value="" <%If EduQualification = "" Then Response.Write("selected")%>>请选择</option>
						<%
						Rs.Open "select * from QualificationTbl order by QualificationId asc" , Conn , 1 , 1
						Do While Not Rs.Eof
							Response.Write("<option value="""& Rs("QualificationName") &""" ")
							If Rs("QualificationName") = EduQualification Then Response.Write("selected")
							Response.Write(">"& Rs("QualificationName") &"</option>")
						Rs.MoveNext
						Loop
						Rs.Close
						%>
					</select></td>
									</tr>
									<tr>
										<td height="30">&nbsp;</td>
										<td height="30">专业描述您可以填写您所学专业包括什么课程，您的毕业设计等等。</td>
									</tr>
									<tr>
										<td height="30">专业描述：</td>
										<td height="30"><textarea name="EduNote" cols="50" rows="10" id="EduNote"><%=EduNote%></textarea></td>
									</tr>
									<tr>
										<td height="30">&nbsp;</td>
										<td height="30"><input type="submit" name="Submit" value=" 修  改 " />
												&nbsp;
												<input type="reset" name="Submit" value=" 重  置 " />
												&nbsp;
										<input type="button" name="Submit" value=" 返  回 " onclick="javascript:location.href='ChgPerInfo_5.asp';" /></td>
									</tr>
							</table>
								</form></td>
				</tr>
			</table></td>
	</tr>
</table>
<%
Qsite.Bottom()
%>