<%
'乘风多用户计数器 Sql版
'作者QQ：178575
'作者EMail：yliangcf@163.com
'作者网站：http://www.qqcf.com
'详细简介：http://www.qqcf.com/cfcount.htm
'上面有程序在线演示，安装演示，使用疑难解答，最新版本下载等内容
'因为这些内容可能时常更新，就没有放在程序里，请自己上网站上查看
'有完整版本的演示
%>
<%
If Session("CFCountUser_View")<>"" Then'为独立查看者时
 Call AlertBack("独立查看者无法对此操作",1)
End If
%>
          <script language="JavaScript">
function modifyuser()
{
if ((document.form2.email.value)=="")
{
window.alert ('email必须填写');
document.form2.email.focus();
return false;
}
else if (!isValidEmail(document.form2.email.value)){
 window.alert ('email的格式不正确!');
 document.form2.email.focus();
 return false;
}
else if ((document.form2.pagename.value)=="")
{
window.alert ('主页名称必须填写');
document.form2.pagename.focus();
return false;
}
else if ((document.form2.pageurl.value)=="")
{
window.alert ('主页网址必须填写');
document.form2.pageurl.focus();
return false;
}
else
return true;
}


function isValidEmail(s)
{
 var reg1 = new RegExp('^[a-zA-Z0-9][a-zA-Z0-9@._-]{3,}[a-zA-Z]$');
 var reg2 = new RegExp('[@.]{2}');
 if (s.search(reg1) == -1
  || s.indexOf('@') == -1
  || s.lastIndexOf('.') < s.lastIndexOf('@')
  || s.lastIndexOf('@') != s.indexOf('@')
  || s.search(reg2) != -1)
  return false;		
 return true;
}
</script>

<%Set Rs= Server.CreateObject("Adodb.RecordSet")
Sql="Select * From CFCount_User Where UserName='"&UserName&"'"
Rs.Open Sql,Conn,1,1%>


  <form name="form2" method="post" action="User.aspx?Action=datamodifysave" onsubmit="return modifyuser()">
<table class="tb_1"><tr class="tr_1">
              <td colspan="2"> 修改注册资料(带*为必填项）</td>
            </tr>
            <tr> 
              <td  width="10%">Email：</td>
              <td>
                <input name="email" type="text"  value="<%=rs("email")%>" size="30">
                <font color="#0000FF">*</font></td>
            </tr>
            <tr> 
              <td>QQ号码：</td>
              <td>
                <input name="qq" type="text" id="qq"  value="<%=rs("qq")%>" size="30">
                </td>
            </tr>
            <tr> 
              <td>主页名称：</td>
              <td>
                <input name="pagename" type="text"  value="<%=rs("pagename")%>" size="30">
                <font color="#0000FF">*</font></td>
            </tr>
            <tr> 
              <td>网　址：</td>
              <td>
                <input name="pageurl" type="text"  value="<%=rs("pageurl")%>" size="30">
                <font color="#0000FF">*</font></td>
            </tr>
	<tr> 
              <td>&nbsp;</td>
              <td>
                <input type="submit" name="Submit2" value="修　改" >
                　 
                <input type="reset" name="Submit22" value="取　消" >
                </td>
            </tr>
</table></form>