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

📄 useredit.asp

📁 本同学录系统演示地址: http://class.19870123.cn/ 下载后请在Web.Config里更改设置,如数据库路径等 如果要换sql数据库,请将app_code里的MyPage
💻 ASP
字号:
<!--#include File="../ConnDB.asp"-->
<!--#include file="../class/Person.asp"-->
<html>
<head>
<link rel="stylesheet" href="../style.css">
<title>修改用户注册</title>
</head>
<script Language="JavaScript">
function ChkFields() {
	if (document.myform.username.value=='') {		
		window.alert ("请输入用户姓名!")
		myform.username.focus()
		return false
	}
	if (document.myform.email.value=='') {		
		window.alert ("请输入电子邮件!")
		myform.email.focus()
		return false
	}
}
</script>
<body>
<%
  Dim uid
  uid = Request.QueryString("uid")
  set obj = new Person
  obj.GetPersonInfo(uid)
  if obj.UserId = "" then
	Response.Write "<h2>不存在此用户名!</h2>"
  Else
%>
<form method="POST" action="UserSave.asp?uid=<%=uid%>" name="myform" onSubmit="return ChkFields()">
<p align="center">修改个人信息</p>
<input type="hidden" name="isadd" value="edit">
 <table align="center" border="1" cellpadding="1" cellspacing="1" width="100%" bordercolor="#008000" bordercolordark="#FFFFFF">
      <tr>
        <td align=left bordercolor="#D4D0C8" bgcolor="#FFCCFF">用户名</td>
		<td><%=obj.UserId%></td>
	  </tr>
	  <tr>
		<td align=left bordercolor="#D4D0C8" bgcolor="#FFCCFF">用户姓名</td>
		<td><input type="text" name="username" size="20" value="<%=obj.Name%>"></td>
      </tr>
      <tr>
	    <td align=left bordercolor="#D4D0C8" bgcolor="#FFCCFF">性别</td>
        <td><select name="sex">
        <%If obj.Sex=1 Then%>
        <option value="0">男</option>
        <option value="1" selected>女</option>
        <%Else%>
        <option value="0" selected>男</option>
        <option value="1">女</option>
        <%End If%>
        </select></td>
      </tr>
	  <tr>
	    <td align=left bordercolor="#D4D0C8" bgcolor="#FFCCFF">通信地址</td>
        <td>
        <input type="text" name="address" size="40" value="<%=obj.Address%>"></td>
      </tr>      
      <tr>
        <td align=left bordercolor="#D4D0C8" bgcolor="#FFCCFF">邮政编码</td>
        <td><input name="postcode" type="text" size="40" value="<%=obj.Postcode%>"></td>
      </tr>
	  <tr>
	    <td align=left bordercolor="#D4D0C8" bgcolor="#FFCCFF">联系电话</td>
        <td><input type="text" name="telephone" size="40" value="<%=obj.Telephone%>"></td>
      </tr>
	  <tr>
	    <td align=left bordercolor="#D4D0C8" bgcolor="#FFCCFF">手机</td>
        <td><input type="text" name="mobile" size="40" value="<%=obj.Mobile%>"></td>
      </tr>
	  <tr>
	    <td align=left bordercolor="#D4D0C8" bgcolor="#FFCCFF">工作单位</td>
	    <td><input name="company" type="text" size="40" value="<%=obj.Company%>"></td>
    </tr>
       <tr>
	    <td align=left bordercolor="#D4D0C8" bgcolor="#FFCCFF">电子邮箱</td>
        <td><input type="text" name="email" size="40" value="<%=obj.Email%>"></td>
      </tr>
	  <tr>
	    <td align=left bordercolor="#D4D0C8" bgcolor="#FFCCFF">生日(yyyy-mm-dd)</td>
        <td><input name="birthday" type="text" size="40" value="<%=obj.Birthday%>"></td>
      </tr>      
  </table> 
<p align="center"><input type="submit" value=" 提 交 " name="B2"></p>
<%End If%>
</form>  
</body>
</html>



⌨️ 快捷键说明

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