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

📄 zhuce.asp

📁 包头铁路工程学校资产管理系统,asp+access
💻 ASP
字号:
<!--#include file="connection.asp"-->
<!--#include file="html.asp"-->
<!--#INCLUDE FILE="mouse.js" -->
<%
Set myrs= Server.CreateObject("ADODB.Recordset") 
strSql="select * from bumen"
myrs.open strSql,Conn,1,1 
 name=htmlencode2(request("name"))
 password=request("password")
 userid=htmlencode2(request("userid"))
 question=htmlencode2(request("question"))
 answer=htmlencode2(request("answer"))
 email=request("email")
 mobile=request("mobile")
 tel=request("tel")
 department=htmlencode2(request("company"))
 ip= Request.ServerVariables("REMOTE_ADDR")
 nowtime=now()
sj=cstr(year(nowtime))+"-"+cstr(month(nowtime))+"-"+cstr(day(nowtime))+" "+cstr(hour(nowtime))+":"+right("0"+cstr(minute(nowtime)),2)+":"+right("0"+cstr(second(nowtime)),2)

set rs=server.createobject("ADODB.recordset")
rs.open "select * from user where 用户名='"& userid &"'order by id",conn,3,3
if rs.eof or rs.bof then
 else if userid=rs("用户名") then
  userid=""
  password=""
  %>
<link rel="stylesheet" href="oa.css">
</head>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
  <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">
          <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">
  <form method="post" action="saveedit1.asp?id=<%=id%>" name="myform" onsubmit="return  validate()">

   <table width="80%" border="1" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF" bordercolor="#FFFFFF" bordercolorlight="#000000">
    <tr> 
    <center>
      <td> 
        <FONT COLOR="red">该帐号已经存在</FONT>
      </td>
    </tr>
    </center>
  </table>
  </div>
  <div align="center"><a  href="javascript:history.back(1)"><img border="0" src="images/previous.gif"></a>&nbsp;&nbsp;      
  <a  href="javaScript:window.close()"><img   border="0" src="images/close_1.gif"></a>     
       
     
  </div>     
</form>     
<div align="center">     
  <center>     
  <table border="1" width="80%" bordercolorlight="#000000" bordercolordark="#FFFFFF" bgcolor="#FFFFFF" bordercolor="#C0C0C0">     
    <tr>     
         <td width="100%">     
      系统提醒您:</font>    
      <ul>    
        <li>你的姓名(<font color="#FF0000">必填</font>);&nbsp;</font></li>   
        <li>登录帐号(<font color="#FF0000">必填</font>);&nbsp;</font></li>   
        <li>登录密码:(<font color="#FF0000">必填</font>)</font></li>  
        <li>公司名称(<font color="#FF0000">必填</font>)</font></li> 
        <li>电子邮件(提示:如果填写可以自动填写发电子邮件地址发电子邮件)</font></li>  
      </ul>       
      </td>      
    </tr>       
  </table>       
  </center>       
</div>        <%
  response.end
end if
end if
rs.close


set rs=server.createobject("ADODB.recordset") 
rs.Open "SELECT * FROM user Where ID is null",conn,1,3 
rs.addnew

rs("用户名")=userid
rs("密码")=password
rs("信箱")=email
rs("部门")=department
rs("问题")=question
rs("答案")=answer
rs("权限")="c"
rs("审核")=false
rs("时间")=sj
rs("IP")=ip
rs("电话")=tel
rs("姓名")=name
rs("mobile")=mobile
rs.update 
id=rs("id")
%>
<html>
<head>
<title>您已经成功申请帐号</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<Script Language="javaScript">
    function  validate()
    {
        if  (document.myform.name.value=="")
        {
            alert("姓名不能为空");
            document.myform.name.focus();
            return false ;
        }
        if  (document.myform.Userid.value=="")
        {
            alert("登录帐号不能为空");
            document.myform.Userid.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 ;
        }
        return  true;
    }
</Script>

<link rel="stylesheet" href="oa.css">
</head>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
  <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">
          <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">
  <form method="post" action="saveedit1.asp?id=<%=id%>" name="myform" onsubmit="return  validate()">

   <table width="80%" border="1" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF" bordercolor="#FFFFFF" bordercolorlight="#000000">
    <tr> 
      <td width="17%" valign="top">
        <p align="right"><font size="2">你的姓名:</p>
        </font></td>
    <center>
      <td width="83%"> 
        <input type="text" name="name" class="form" value="<%=rs("姓名")%>" size="24">
      </td>
    </tr>
    </center>
    <tr> 
      <td width="17%" valign="top" height="6">
        <p align="right"><font size="2">登录帐号:</font></p>
      </td>
    <center>
      <td width="83%" height="6"> 
        <input type="text" name="Userid" class="form" value="<%=rs("用户名")%>" size="24">
      </td>
    </tr>
    </center>
    <tr> 
      <td width="17%"  valign="top" height="16">
        <p align="right"><font size="2">登录密码:</font></p>
      </td>
    <center>
      <td width="83%" height="16"> 
        <input type="password" name="password" class="form" size="24" value="<%=rs("密码")%>">
      </td>
    </tr>
    </center>
	<tr> 
      <td width="17%"  valign="top" height="16">
        <p align="right"><font size="2">密码问题:</font></p>
      </td>
    <center>
      <td width="83%" height="16"> 
        <input type="text" name="question" class="form" size="24" value="<%=rs("问题")%>">
      </td>
    </tr>
    </center>
    <tr> 
      <td width="17%"  valign="top" height="16">
        <p align="right"><font size="2">密码答案:</font></p>
      </td>
    <center>
      <td width="83%" height="16"> 
        <input type="text" name="answer" class="form" size="24" value="<%=rs("答案")%>">
      </td>
    </tr>
    </center>

    <tr> 
      <td width="17%"  valign="top">
        <p align="right"><font size="2">单位名称:</font>
      </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("部门") 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"><font size="2">手机号码:</font></p>
      </td>
    <center>
      <td width="83%"> 
        <input type="text" name="tel" class="form" value="<%=rs("mobile")%>" size="24">
      </td>
    </tr>
    <tr> 
      <td width="17%"  valign="top">
        <p align="right"><font size="2">电话号码:</font></p>
      </td>
    <center>
      <td width="83%"> 
        <input type="text" name="tel" class="form" value="<%=rs("电话")%>" size="24">
      </td>
    </tr>
    </center>
    <tr> 
      <td width="17%"  valign="top">
        <p align="right"><font size="2">电子邮件:</font></p>
      </td>
    <center>
      <td width="83%"> 
        <input type="text" name="email" class="form" value="<%=rs("信箱")%>" size="24">
      </td>
    </tr>
    </center>
  </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>     
<div align="center">     
  <center>     
  <table border="1" width="80%" bordercolorlight="#000000" bordercolordark="#FFFFFF" bgcolor="#FFFFFF" bordercolor="#C0C0C0">     
    <tr>     
        <td width="100%">     
      系统提醒您:</font>    
      <ul>    
        <li>你的姓名(<font color="#FF0000">必填</font>);&nbsp;</font></li>   
        <li>登录帐号(<font color="#FF0000">必填</font>);&nbsp;</font></li>   
        <li>登录密码:(<font color="#FF0000">必填</font>)</font></li>  
        <li>公司名称(<font color="#FF0000">必填</font>)</font></li> 
        <li>电子邮件(提示:如果填写可以自动填写发电子邮件地址发电子邮件)</font></li>  
      </ul>       
      </td>      
    </tr>       
  </table>       
  </center>       
</div>       


</BODY>
</HTML>
<%rs.close
set rs=nothing
%>

⌨️ 快捷键说明

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