<!--#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 NowAddr,HomeAddr,QQ,MSN,Tel,Mobile,Email
Set Rs = server.CreateObject("ADODB.recordset")

If Request.Form <> "" Then
	
	QQ = Qsite.chgStr(Trim(Request.Form("QQ")))
	
	If QQ <> "" And Not IsNumeric(QQ) Then
		Qsite.ShowMsg "输入的QQ号码不正确，请返回重新输入" , ""
	End If
	
	Conn.Execute("update PersonTbl set QQ = '"& QQ &"' where PerId = "& Session("PerId") &" and UserName = '"& Session("UserName") &"'")
		
	
	Qsite.ShowMsg "资料修改成功" , "ChgPerInfo_9.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
	QQ = Rs("QQ")
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("QQ" , "QQ" , 0 , 20))
			return false;
		if(!checkInteger("QQ" , "QQ" , 10000 , "*"))
			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>我的在线QQ</b></span><span style="font-size:14px;color:#333333"> 
                      <strong>QQ</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" />友情提示：输入QQ号码招聘企业可随时于您取得联系！</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_9.asp" style="margin:0" onsubmit="return CheckForm();">
									<table width="100%" align=center border="0" cellpadding="5" cellspacing="3">
										<tr>
											<td width="17%" height="30" >QQ：</td>
											<td width="83%" height="30" ><input name="QQ" type="text"  id="QQ" size="25" value="<%=QQ%>" />
												<input type="submit" name="Submit" value=" 修  改 " />
&nbsp;
<input type="reset" name="Submit" value=" 重  置 " /></td>
										</tr>
										<tr>
											<td height="30" colspan="2"><span style="line-height:25px;">·输入QQ号码，将会在您的简历页面中显示您的QQ在线状态，招聘企业可进行直接的QQ交谈！<br />
</span></td>
										</tr>
								</table>
						</form><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()
%>