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

📄 admin_userziliao.asp

📁 ASP开发学生成绩查询管理系统,能满足毕业设计的要求-ASP student achievement for the development of the management system, des
💻 ASP
字号:

<!--#include file="include/conn.asp"-->
<!--#include file="include/check.asp"-->

<html>
<head>
<link rel="stylesheet" href="inc/css.css" type="text/css" />
</head>
<body>
<form name="form1" method="post" action="">
  <table width="550" border=0 align=center cellpadding=2 cellspacing=1 bordercolor="#799AE1" class=tableBorder>
    <tbody>
      <tr>
        <th align=center colspan=2 style="height: 23px">
		  <div align="center">
		    <% =session("admin")
		 %>
		 
		 基本信息</div></th>
      </tr>
      <tr bgcolor="#DEE5FA">
        <td colspan="2" align="center" class=txlrow>&nbsp;</td>
      </tr>
      <tr align="center" bgcolor="#799AE1">
        <td height="10" align="center" bgcolor="#799AE1" class="txlHeaderBackgroundAlternate"><div align="right">用户名:</div></td>
        <td height="10" align="center" bgcolor="#799AE1" class="txlHeaderBackgroundAlternate"><label>
          <div align="left"><%=session("admin")%></div>
        </label></td>
      </tr>
      <tr align="center" bgcolor="#799AE1">
        <td width="50%" height="10" align="center" bgcolor="#799AE1" class="txlHeaderBackgroundAlternate"><div align="right">密码:</div></td>
        <td width="50%" height="10" align="center" bgcolor="#799AE1" class="txlHeaderBackgroundAlternate"><div align="left">
          <input name="txtpaw" type="password" id="txtpaw" size="16">    
        </div></td>
      </tr>
      
      

      <tr bgcolor="#DEE5FA">
        <td align="center" bgcolor="#DEE5FA" class="txlrow"></td>
        <td align="center" valign="top" bgcolor="#DEE5FA" class="txlrow">
          <div align="left">
            <input type="submit" name="Submit" value="修改">
            <input type="reset" name="Submit2" value="重置">
            </div>
        </td>
      </tr>
    
      <tr bgcolor="#DEE5FA">
        <td colspan=2 align=center class=txlrow></td>
      </tr>
</tbody></table>
</FORM>

<%
dim sql,usename,paw
  
	paw=request.form("txtpaw")
if request.form("submit")="修改" then
    if request.Form("txtpaw")="" then
	response.write "<script> alert('密码不能为空!');</script>"
	else
	
	sql="select * from user where usename='"&session("admin")&"'"
	rs.open sql,conn,3,3
	
	rs("password")=paw
	rs.update
	response.write "<script> alert('修改成功!');</script>"
	rs.close
	set rs=nothing

   end if
   end if
%>

</BODY>
  </HTML>

⌨️ 快捷键说明

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