⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 inforchange.asp

📁 本文件为利用ASP开发的管理信息系统项目,文件名为校友录,按照说明"校友录系统_数据表创建方法"来进行数据表的创建.
💻 ASP
字号:
<%@ Language=VBScript %>
<%if not session("user_session_id")=Session.SessionID then%>
<SCRIPT LANGUAGE=javascript>
 parent.window.location.href="default.asp"
</SCRIPT>
<%end if%>
<%if Request.Form("hid")="" then%>
<HTML>
<HEAD>
<TITLE>校友录-资料修改:::</TITLE>
<LINK href="inc/css.css" type=text/css rel=stylesheet>
<style TYPE="text/css"> 
<!-- 
 .popcomments 
{ 
position : absolute; width:130;
visibility : hidden; 
border: 1 solid #000001
} 
.in 
{
BORDER-RIGHT: rgb(127,127,127) 1px solid;
BORDER-TOP: rgb(127,127,127) 1px solid;
 FONT-SIZE: 9pt; 
 BORDER-LEFT: rgb(127,127,127) 1px solid; 
 BORDER-BOTTOM: rgb(127,127,127) 1px solid;
 BACKGROUND-COLOR: #ffffff
}
//--> 
</STYLE>
 <script language="javascript">
function ischinese(s)
{
	var ret=true;
	for(var i=0;i<s.length;i++)
	ret=ret && (s.charCodeAt(i)>=10000);
	return ret;
}
function isemail (s)
{        
	if (s.length > 100)
	{
	        window.alert("email地址长度不能超过100位!");
	        return false;
	}

	 var regu = "^(([0-9a-zA-Z]+)|([0-9a-zA-Z]+[_.0-9a-zA-Z-]*[0-9a-zA-Z]+))@([a-zA-Z0-9-]+[.])+([a-zA-Z]{2}|net|NET|com|COM|gov|GOV|mil|MIL|org|ORG|edu|EDU|int|INT)$"
	 var re = new RegExp(regu);
	 if (s.search(re) != -1) {
	       return true;
	 } else {
	       window.alert ("请输入有效合法的E-mail地址 !")
	       return false;
	 }
}
function isNumber(s) 
{
    var digits = "0123456789";
    var i = 0;
    var sLength = s.length;

    while ((i < sLength))
    {
            var c = s.charAt(i);
            if (digits.indexOf(c) == -1) return false;
            i++;
    }

    return true;
}
function go(){
	if (document.form1.sname.value==""||!ischinese(document.form1.sname.value)){
	 alert ("为了联系方便,请填入您的真实姓名!\n谢谢合作!")
	 document.form1.sname.focus()
	 return false;
	 }
	if (document.form1.oicq.value.length<5||!isNumber(document.form1.oicq.value)){
	alert ("为了联系方便,请您填入真实的QQ号码,如果没有请填入8个0!\n谢谢合作!")
	document.form1.oicq.focus()
	return false;
	}
	if (!isemail(document.form1.email.value)){
	document.form1.email.focus()
	return false;
	}
  if (document.form1.homephone.value.length!=0){
       if(!isNumber(document.form1.homephone.value)||document.form1.homephone.value.length<5){
           alert ("请填入正确的联系号码!\n谢谢合作!")
            document.form1.homephone.focus()
             return false;}
 }
	if (document.form1.homeaddr.value==""){
	alert ("为了联系方便,请您把信息填完整!\n谢谢合作!")
	document.form1.homeaddr.focus()
	return false;
	}
	if (document.form1.homezip.value.length!=6||!isNumber(document.form1.homezip.value)){
	alert ("为了联系方便,请填入正确的邮政编码!\n谢谢合作!")
	document.form1.homezip.focus()
	return false;
	}
	 if (document.form1.newzip.value.length!=0){
	      if(document.form1.newzip.value.length!=6||!isNumber(document.form1.newzip.value)){
	          alert ("请填入正确的邮政编码!\n谢谢合作!")
	           document.form1.newzip.focus()
	            return false;}
	}
	if (document.form1.newphone.value.length!=0){
	      if(!isNumber(document.form1.newphone.value)||document.form1.newphone.value.length<5){
	          alert ("请填入正确的联系号码!如果没有可以填入8个0\n谢谢合作!")
	           document.form1.newphone.focus()
	            return false;}
 }
 document.form1.submit();
}
</script>
<body leftMargin=0 topMargin=0>
<!--#include file="inc/top.asp"-->
<center>
<table width="750" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr align=center>
    
    <td height="75" valign=top width="517"> 
      <%
   ecid=session("ecid")
 Dim studentid
 if ecid<>"" Then
  sql="select * from ec where studentid='"&ecid&"'"
  Set rs=session("cn").execute(sql)
 %>
      <br>
      <form name=form1 action="inforchange.asp" method="post">
        <table align=center border="1" cellpadding="3" cellspacing="1" style="border-collapse: collapse"  width="100%" id="AutoNumber1">
          <tr> 
            <td width="121">姓 名:</td>
            <td width="347">
              <input name="sname" value=<%=rs(1)%> class=in>
               </td>
          </tr>
          <tr> 
            <td width="121">头 像:</td>
            <td width="347"><img src="img/<%=rs("pic")%>.bmp"></td>
          </tr>
          <tr> 
            <td width="121">OICQ:</td>
            <td width="347">
              <input name="oicq" value=<%=rs(3)%> class=in>
               </td>
          </tr>
          <tr> 
            <td width="121">E-Mail:</td>
            <td width="347">
              <input name="email" value=<%=rs(4)%> class=in>
               </td>
          </tr>
          <tr> 
            <td width="121">家庭电话:</td>
            <td width="347">
              <input name="homephone" value=<%=rs(5)%> class=in>
               </td>
          </tr>
          <tr> 
            <td width="121">家庭邮编:</td>
            <td width="347">
              <input name="homezip" value=<%=rs(7)%> class=in>
               </td>
          </tr>
          <tr> 
            <td width="121">家庭住址:</td>
            <td width="347">
              <input name="homeaddr" value=<%=rs(6)%> class=in>
               </td>
          </tr>          
          <tr> 
            <td width="121">目前联系号码:</td>
            <td width="347">
              <input name="newphone" value=<%=rs(8)%> class=in>
               </td>
          </tr>
           <tr> 
            <td width="121">目前联系邮编:</td>
            <td width="347">
              <input name="newzip" value=<%=rs(10)%> class=in>
            </td>
          </tr>
          <tr> 
            <td width="121">目前联系地址:</td>
            <td width="347">
              <input name="newaddr" value=<%=rs(9)%> class=in>
               </td>
          </tr>
         
          <tr> 
            <td width="121" valign="top"> 更改头像:</td>
            <td width="347">
        <%for i=1 to 60
            if i=Cint(rs("pic")) then 
               checked="checked" 
            else 
               checked="" 
            end if
            Response.Write "<input type=radio "&checked&" value="&i&" name=pic >"&_
                          "<img src=img/"&i&".bmp>"
            if i mod 5=0 then Response.write "<br>"
         next
        %>
            </td>
          </tr>
        </table>
        <br>
        <input type="hidden" name=ecid value=<%=ecid%>>
        <p align=center> 
        <input type=hidden name=hid value="ok">
          <input type=button name=submit1 value="确认修改" class=in onclick="javascript:go()">         

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -