<form id="hz9zz"></form>
  • <form id="hz9zz"></form>

      <nobr id="hz9zz"></nobr>

      <form id="hz9zz"></form>

    1. 明輝手游網中心:是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺!

      動感首頁更新完成之7 ------ 密碼驗證篇

      [摘要]下面的程序是阿喔動感管理通用程序,非常簡單不用解釋了吧! if username="admin" and password="admin" then 請記得修改兩個admin分別用戶名和密碼! login.asp <html> <head&...

      下面的程序是阿喔動感管理通用程序,非常簡單不用解釋了吧!
      if username="admin" and password="admin" then
      請記得修改兩個admin分別用戶名和密碼!

      login.asp
      <html>

      <head>
      <title>管理者登陸</title>
      <link rel="stylesheet" href="DOWNLOAD.CSS">
      </head>

      <body>
      <div align="center"><center>

      <table border="0" cellspacing="1" width="90%">
      <tr>
      <td><form method="post" action="chklogin.asp">
      <table width="45%" border="1" cellspacing="0" cellpadding="1" align="center"
      bordercolordark="#ecf5ff" bordercolorlight="#6699cc">
      <tr>
      <td><table width="100%" border="0" cellspacing="1" cellpadding="1">
      <tr>
      <td width="33%" align="right" height="30">用戶名:</td>
      <td width="67%"><input name="username" maxlength="20" class="smallInput" size="20"> </td>
      </tr>
      <tr>
      <td width="33%" align="right" height="30">密 碼:</td>
      <td width="67%"><input type="password" name="password" maxlength="16" class="smallInput"
      size="20"> </td>
      </tr>
      <tr>
      <td colspan="2" height="15"></td>
      </tr>
      </table>
      </td>
      </tr>
      <tr align="center">
      <td height="40">
      <input type="submit" name="Submit" value="確定" class="buttonface">
      &nbsp;
      <input type="reset" name="Submit2" value="重寫" class="buttonface">
      </td>
      </tr>
      </table>
      </form>
      <p align="center"></td>
      </tr>
      </table>
      </center></div>
      </body>
      </html>


      __________________________________________________________________

      chklogin.asp
      <%
      dim sql
      dim rs
      dim seekerrs
      dim founduser
      dim username
      dim companyid
      dim password
      dim errmsg
      dim founderr
      founderr=false
      FoundUser=false
      username=request.form("username")
      password=request.Form("password")
      if username="" then
      response.redirect "index.asp"
      end if
      if password="" then
      response.redirect "index.asp"
      end if

      if username="admin" and password="admin" then
      response.cookies("adminok")=true
      response.redirect "manage.asp"
      else
      response.redirect "index.asp"
      end if
      %>


      (出處:熱點網絡)


      日韩精品一区二区三区高清