infoupdate.asp

功能最强大的ASP网站

<!--#include file="../inc/conn.asp"-->
<%FunCode="F102"
session("title")="会员资料修改"
session("headline")="首页 -> 注册系统 -> 会员资料修改"%>


<!--#include file="../inc/func.asp"-->
<!--#include file="../inc/head2.asp"-->

<%
if request("act")="edit" then
	call update()
else
	call list()
end if

sub update()
username=request("username")
if username<>session("username") then
	mesg="请从正确的链接进入修改"
	session("mesg")=mesg
	Response.Redirect "../result.asp"
end if

chname=request("chname")
enname=request("enname")
rchname=request("rchname")
chcountry=request("chcountry")
encountry=request("encountry")
chprovince=request("chprovince")
enprovince=request("enprovince")
chcity=request("chcity")
encity=request("encity")
chaddress=request("chaddress")
enaddress=request("enaddress")
postcode=request("postcode")
telephoneno=request("telephoneno")
email=request("email")
faxno=request("faxno")


'需要增加字段校验信息
set rs=server.createobject("adodb.recordset")
sql="select * from [user] where username='"&username&"'"
rs.open sql,conn,3,3
rs("chname")=chname
rs("enname")=enname
rs("rchname")=rchname
rs("chcountry")=chcountry
rs("encountry")=encountry
rs("chprovince")=chprovince
rs("enprovince")=enprovince
rs("chcity")=chcity
rs("encity")=encity
rs("chaddress")=chaddress
rs("enaddress")=enaddress
rs("postcode")=postcode
rs("telephoneno")=telephoneno
rs("email")=email
rs("faxno")=faxno

rs.update
rs.close
set rs=nothing

conn.execute ("update [user] set web='" & web & "' where manageuser='" & session("username") & "' ")
	mesg="用户资料修改成功"&Err.description
	session("mesg")=mesg
	Response.Redirect "../result.asp"
end sub

sub list()
set rs=server.createobject("adodb.recordset")
sql="select * from [user] where username='"&session("username")&"'"
rs.open sql,conn,1,1
%>

<br>
<script language='JavaScript'>
<!--
function checkemail(name, data, allowednull)
{
  var datastr = data;
  var lefttrim = datastr.search(/\S/gi);
  
  if (lefttrim == -1) {
    if (allowednull) {
      return (true);
    } else {
      alert("请输入一个正确的E-mail地址！");
      return (false);
    }
  }
  var myRegExp = /[a-z0-9](([a-z0-9]|[_\-\.][a-z0-9])*)@([a-z0-9]([a-z0-9]|[_\-][a-z0-9])*)((\.[a-z0-9]([a-z0-9]|[_\-][a-z0-9])*)*)/gi;
  var answerind = datastr.search(myRegExp);
  var answerarr = datastr.match(myRegExp);
  
  if (answerind == 0 && answerarr[0].length == datastr.length)
  {
    return (true);
  }
  
  alert("请输入一个正确的E-mail地址！");
  return (false);
}

function IsTel(str,strname) {
  var l=str.length;
  var i,s;
  
  if (str == '' ) {
  	alert(strname + "不能为空");
	return (false);
	}
  
  if(isNaN(str))
	{
		alert(strname+'只能为数字');
		return false;
	}

  s=str.charAt(0);
  if (s=='0')
  {
  	alert(strname+'第一位不能为0');
	return false;
  }
  
  if (str.length != 9 && str.length != 10 && str.length != 11)
  {
  	alert(strname+'只能为9至11位的数字');
	return false;
  }
  return (true);

}

function IsCh (str,strname)
{
var len;
var i;
if (str == '' ) {
  	alert(strname + "不能为空");
	return (false);
	}
  
  
for (i=0;i<str.length;i++)
{
if (str.charCodeAt(i)>255) return (true);
}
alert(strname+"必须含有汉字");
return (false);
}

function IsNotCh (str,strname)
{
var len;
var i;
if (str == '' ) {
  	alert(strname + "不能为空");
	return (false);
	}
for (i=0;i<str.length;i++)
{
if (str.charCodeAt(i)>255){ 
	alert(strname + "不能含有汉字");
	return (false);
}
}
return (true);
}

function IsPost(str,strname)
{
	var len;
	var i;
	if (str == '' ) {
  		alert(strname + "不能为空");
		return (false);
	}
	
	if(isNaN(str))
	{
		alert('邮政编码只能为数字');
		return false;
	}
	
	if (str.length != 6)
	{
		alert('邮政编码只能为6位数字');
		return false;
	}
	return true;
}

function checkPass(str,strname)
{
	var len;
	var i;
	if (str == '' ) {
  		alert(strname + "不能为空");
		return (false);
	}

	if (str.length < 6)
	{
		alert(strname+"不能小于6位");
		return (false);
	}
	return true;
}


function check_input()
{
	newuserreg=document.userreg_in;
	if(newuserreg.username.value=='')
	{
		alert('用户名不能为空');
		newuserreg.username.focus();
		return false;
	}
	
	

	if(IsCh(newuserreg.chname.value,"用户中文名")==false)
	{
		newuserreg.chname.focus();
		return false;
	}
	 
	if(IsNotCh(newuserreg.enname.value,"用户英文名")==false)
	{
		newuserreg.enname.focus();
		return false;
	}
	
	if(IsCh(newuserreg.rchname.value,"联系人中文名")==false)
	{
		newuserreg.rchname.focus();
		return false;
	}
	
	if(IsCh(newuserreg.chcity.value,"中文所在城市")==false)
	{
		newuserreg.chcity.focus();
		return false;
	}
	
	if(IsNotCh(newuserreg.encity.value,"英文所在城市")==false)
	{
		newuserreg.encity.focus();
		return false;
	}
	
	if(IsCh(newuserreg.chaddress.value,"中文联系地址")==false)
	{
		newuserreg.chaddress.focus();
		return false;
	}

	if(IsNotCh(newuserreg.enaddress.value,"英文联系地址")==false)
	{
		newuserreg.enaddress.focus();
		return false;
	}

	if(IsPost(newuserreg.postcode.value,"邮政编码")==false)
	{
		newuserreg.postcode.focus();
		return false;
	}
	
	if(IsTel(newuserreg.telephoneno.value,"联系电话")==false)
	{
		newuserreg.telephoneno.focus();
		return false;
	}
	
	if (checkemail("电子邮件", newuserreg.email.value, false)==false) 
	{
    	newuserreg.email.focus();
   		return false;  
	} 
	
	if(IsTel(newuserreg.faxno.value,"传真")==false)
	{
		newuserreg.faxno.focus();
		return false;
	}
		

	
	
}


//-->
</script>
<img src='../images/dotdb.gif' width='10' height='10'> 
            <font color='#000000'>若您是单位用户请正确填写<font color='#FF0000'>联系人中文名</font>，以方便与您联系，个人用户可不输入。</font>
<br><br>

<form method='POST' name='userreg_in'  action='infoupdate.asp?act=edit'   onsubmit='return check_input()'>    
<table border=1 bordercolor=#3770A9 bordercolordark=#ffffff cellpadding=3 
      cellspacing=0 width=100% class='size09' align='center'>
      <tr><td width='25%' bgcolor='#efefef'>会员登录名</td>        
	  <td width='25%' ><%=rs("username")%><input type='hidden' class='form' name='username' size='20' value='<%=rs("username")%>'></td>   
	<td width='25%' bgcolor='#efefef'>管理会员</td>        
	  <td ><%=rs("Manageuser")%><input type='hidden' class='form' name='Manageuser' size='20' value='<%=rs("Manageuser")%>'></td>    
	</tr>     

 <tr>        <td width='25%' bgcolor='#efefef'>中文名*</td>        <td width='25%'><input type='text' class='form' name='chname' size='20' value='<%=rs("chname")%>'></td>        <td width='25%' bgcolor='#efefef'>英文全名*</td>        <td width='25%'><input type='text' class='form' name='enname' size='20' value='<%=rs("enname")%>'></td>      </tr>      <tr>
        <td width='25%' bgcolor='#efefef'>联系人中文名</td>
        <td colspan='3'><input type='text' class='form' name='rchname' size='20' value='<%=rs("rchname")%>'></td>
      </tr>
      <tr>        <td width='25%' bgcolor='#efefef'>国家、地区（中文）*</td>        <td width='25%'>        <select class='form' size='1' name='chcountry' onchange='this.form.encountry.selectedIndex=this.form.chcountry.selectedIndex'>
<%print_chcountry rs("chcountry")%>
          </select>
        </td>        <td width='25%' bgcolor='#efefef'>国家、地区（英文）*</td>        <td width='25%'>        <select class='form' size='1' name='encountry' onchange='this.form.chcountry.selectedIndex=this.form.encountry.selectedIndex'>
<%print_encountry rs("encountry")%>
          </select>
        </td>      </tr>      <tr>        <td width='25%' bgcolor='#efefef'>省份（中文）*</td>        <td width='25%'>        <select class='form' size='1' name='chprovince' onchange='this.form.enprovince.selectedIndex=this.form.chprovince.selectedIndex'>
<%print_chprovince rs("chprovince")%>
          </select>
        </td>        <td width='25%' bgcolor='#efefef'>省份（英文）*</td>        <td width='25%'>        <select class='form' size='1' name='enprovince' onchange='this.form.chprovince.selectedIndex=this.form.enprovince.selectedIndex'>
<%print_enprovince rs("enprovince")%>
          </select>
        </td>      </tr>      <tr>        <td width='25%' bgcolor='#efefef'>城市（中文）*</td>        <td width='25%'><input type='text' class='form' name='chcity' size='20' value='<%=rs("chcity")%>'></td>        <td width='25%' bgcolor='#efefef'>城市（英文）*</td>        <td width='25%'><input type='text' class='form' name='encity' size='20' value='<%=rs("encity")%>'></td>      </tr>      <tr>        <td width='25%' bgcolor='#efefef'>联系地址（中文）*</td>        <td width='25%'><input type='text' class='form' name='chaddress' size='20' value='<%=rs("chaddress")%>'></td>        <td width='25%' bgcolor='#efefef'>联系地址（英文）*</td>        <td width='25%'><input type='text' class='form' name='enaddress' size='20' value='<%=rs("enaddress")%>'></td>      </tr>      <tr>        <td width='25%' bgcolor='#efefef'>邮政编码*</td>        <td width='25%'><input type='text' class='form' name='postcode' size='20'  value="<%=rs("postcode")%>"></td>        <td width='25%' bgcolor='#efefef'>联系电话(如:1081234567)*</td>        <td width='25%'><input type='text' class='form' name='telephoneno' size='20'value='<%=rs("telephoneno")%>'></td>      </tr>      
<tr><td width='25%' bgcolor='#efefef'>联系E-mail*</td>
<td width='25%'><input type='text' class='form' name='email' size='20' value='<%=rs("email")%>'></td>
<td width='25%' bgcolor='#efefef'>传真(如:1081234567)*</td>        
<td width='25%'><input type='text' class='form' name='faxno' size='20' value='<%=rs("faxno")%>'></td>
</tr>
</table>  <p align='center'><input type='submit' value='确认修改' name='B1' style='text-align: center'></p>
</form>
<%rs.close
set rs=nothing
end sub%>
<!--#include file="../inc/bottom2.asp"-->