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

📄 check_newpassword.asp

📁 由asp实现的简单选课管理系统
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<%
dim UserName 
UserName=request.cookies("username")
dim Password
Password=request("password")
Dim Conn,DateBase,connstr
datebase="../../data/study.mdb" '数据库文件位置,相对路径.
connstr="DBQ="+server.mappath(""&datebase&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set Conn=server.createobject("ADODB.CONNECTION")
Conn.open connstr
Dim VRs
Set VRs=Server.CreateObject("ADODB.RecordSet")                 
Dim VSql
VSql="select * from s_id_key Where id='" & UserName &"'"
VRs.open VSql,Conn,1,3
If VRs.eof then 
   
  else
  VRs("psd")=Password
  VRs.update
  VRs.close
   
  end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<style type="text/css">
<!--
body {
	background-color: #6633FF;
}
-->
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
</head>

<body>
<div align="center">
  <div id="Layer1" style="position:absolute; width:289px; height:60px; z-index:1; left: 10px; top: 76px; font-size: 18px; color: #CCFF00;">密码修改成功!请牢记!</div>
  <table width="40%" height="7%" border="1">
    <tr>
      <td width="100"><a href="../../main/main.htm">回到首页</a></td>
      <td width="100"><a href="../select.asp">学生首页</a></td>
      <td width="100"><a href="modify.asp">上一页</a></td>
    </tr>
  </table>
</div>
</body>
</html>

⌨️ 快捷键说明

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