admypass.asp

来自「ASP会员注册管理系统 主要用于ASP实现会员注册」· ASP 代码 · 共 36 行

<%
if session("adpass")<>"passed" then
response.redirect "adlogin.asp"
end if
mypassname=trim(replace(request("mypassname"),"'",""))
if mypassname <>"" then
passroad=Request.ServerVariables("path_info")
passroad=replace (passroad,"admypass.asp",mypassname)
response.write (passroad)
else
%>
<head>
<link rel="stylesheet" type="text/css" href="style.css">
<title>mypass</title>
</head>
<html>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<table width="85%" border="0" cellspacing="0" cellpadding="5" align="center">
  <tr>
    <td>
      <form method="post" action="admypass.asp">
        <div align="center">请填入您要查找路径的文件名： 
          <input type="text" name="mypassname" size="30" maxlength="30">
          <input type="submit" name="Submit" value="查找路径">
        </div>
      </form>
    </td>
  </tr>
</table>
</html>
<%
end if
%>