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

📄 edit.asp

📁 一套基于asp的网络办公系统!功能类似于oa
💻 ASP
字号:
<!--#include file="data.asp"-->
<!--#include file="check.asp"-->
<%if session("Urule")<>"a" then
respons.write "您没有足够的权限:P"
respons.end
end if
%>
<%
Set myrs= Server.CreateObject("ADODB.Recordset") 
strSql="select * from bumen"
myrs.open strSql,Conn,1,1 
%>

<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="oa.css">
<title>修改用户资料</title>
</head>

<body>
<script Language="javaScript">
    function  validate()
    {
        if  (document.myform.name.value=="")
        {
            alert("姓名不能为空");
            document.myform.name.focus();
            return false ;
        }
        if  (document.myform.username.value=="")
        {
            alert("登录帐号不能为空");
            document.myform.username.focus();
            return false ;
        }
        if  (document.myform.company.value=="")
        {
            alert("部门名称不能为空");
            document.myform.company.focus();
            return false ;
        }
        if  (document.myform.tel.value=="")
        {
            alert("电话号码不能为空");
            document.myform.tel.focus();
            return false ;
        }
        if  (document.myform.email.value=="")
        {
            alert("电子邮件不能为空");
            document.myform.email.focus();
            return false ;
        }
        if  (document.myform.password.value=="")
        {
            alert("密码不能为空");
            document.myform.password.focus();
            return false ;
         }
        if  (document.myform.ilevel.value=="")
        {
            alert("邮箱级别不能为空");
            document.myform.ilevel.focus();
            return false ;
	}
        return  true;
    }
</script> <link rel="stylesheet" href="eintrdemo.css"> </head> <%
dim sql
dim rs
 sql="select * from user where id="&request("id")
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
                %> <body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"> 
<form method="post" action="saveedit.asp?id=<%=request("id")%>" name="myform" onsubmit="return  validate()"> 
<table width="100%" border="0" cellspacing="1" cellpadding="2"> <tr > <td class="heading"> 
<div align="center"> <center> <table width="81%" border="0" cellspacing="0" cellpadding="0" bgcolor="#000000" bordercolorlight="#000000" style="font-size:9pt"> 
<tr> <td width="2%" align="right"></td><td align="left" height="25"> <p align="center"><font color="#FFFFFF"><b>修 
改 资 料</b></font></p></td><td width="3%"></td></tr> </table></center></div></td></tr> 
</table><div align="center"> <table width="80%" border="1" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF" bordercolor="#FFFFFF" bordercolorlight="#000000" style="font-size:9pt"> 
<tr> <td width="17%" valign="top"> <p align="right">你的姓名:</p></td><td width="83%"> 
<input type="hidden"  name="name" class="form" value="<%=rs("name")%>" > 
 <input type="text" name="name2" class="form" value="<%=rs("name")%>" size="24" disabled>

</td></tr> 
<tr> <td width="17%" valign="top" height="6"> <p align="right">登录帐号:</p></td><td width="83%" height="6"> 
	    <input type="hidden" name="username"  value="<%=rs("username")%>"  >
        <input type="text" name="username2" class="form" value="<%=rs("username")%>" size="24" disabled>


</td></tr> <tr> <td width="17%"  valign="top" height="16"> <p align="right">登录密码:</p></td><td width="83%" height="16"> 
<input type="password" name="password" class="form" size="24" value="<%=rs("pwd")%>"> 
</td></tr> <tr> <td width="17%"  valign="top" height="16"> <p align="right">密码问题:</p></td><td width="83%" height="16"> 
<input type="text" name="question" class="form" size="24" value="<%=rs("wenti")%>"> 
</td></tr> <tr> <td width="17%"  valign="top" height="16"> <p align="right">密码答案:</p></td><td width="83%" height="16"> 
<input type="text" name="answer" class="form" size="24" value="<%=rs("daang")%>"> 
</td></tr> 
<tr> 
<td width="17%"  valign="top"> 
<p align="right">部门名称:</td>
<td width="83%"> 
<select NAME="company"> <%if myrs.eof and myrs.bof then
response.write "<font color='red'>还没有任何内容</font>"
else

do while not (myrs.eof or myrs.bof)
if myrs("type")=rs("part") then
sel="selected"
else 
sel=""
end if
%> <option value="<%=myrs("type")%>" <%=sel%>><%=myrs("type")%></option> <%myrs.movenext 
loop 
end if%> </select> </td></tr> 
<tr> 
<td width="17%" valign="top"> 
<p align="right">邮箱级别:</p>
</td>
<td width="83%"> 
<input type="text" name="ilevel" class="from" value="<%=rs("ilevel")%>" size="1"> 
</td>
</tr> 
<tr> 
<td width="17%"  valign="top"> 
<p align="right">电话号码:</p>
</td>
<td width="83%"> 
<input type="text" name="tel" class="form" value="<%=rs("phone")%>" size="24"> </td></tr> 
<tr> <td width="17%"  valign="top"> <p align="right">电子邮件:</p></td><td width="83%"> 
<input type="text" name="email" class="form" value="<%=rs("email")%>" size="24"> 
</td></tr> <tr> <td width="17%"  valign="top"> <p align="right">管理权限:</p></td><td width="83%"> 
<select NAME="admin"> <option value="a" <%if rs("rule")="a" then%>selected<%end if%>>超级用户</option> 
<option value="b" <%if rs("rule")="b" then%>selected<%end if%>>管理员</option> <option value="c" <%if rs("rule")="c" then%>selected<%end if%>>贵宾用户</option> 
<option value="d" <%if rs("rule")="d" then%>selected<%end if%>>普通用户</option> 
</select> </td></tr> 

</table>
</div><div align="center"><input type=image  src="images/modify_off.gif">&nbsp;&nbsp; 
<a  href="javaScript:window.close()"><img   border="0" src="images/close_1.gif"></a> 
</div></form>     


</body>
</html>

⌨️ 快捷键说明

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