如何在主頁中控制瀏覽權限

2019-11-18 20:52:48

字體：大中小

來源：轉載

供稿：網友

在平時做主頁時，為了控制某主頁的瀏覽權限，就要設置一個密碼來控制。假設密碼存于服務器端的數據庫中。在FrontPage 98 中可結合asp 來一個小程序程序，完成上述功能。具體步驟如下：

在FrontPage 98中,先做如下設計：

　　保存為ASP 文件，取名為test.asp，在Form PRoperties 的 Advanced 中增加一個變量：hname，值為 “aaa”（變量名和值可為任意）。在Submit 的 Action 中test.asp。這時，可看到如下的HTML：

< html >
< head >
< meta http-equiv="Content-Type" content=
"text/html; charset=gb2312" >
< title >New Page 1< /title >
< meta name="GENERATOR" content=
"Microsoft FrontPage 3.0" >
< /head >
< body bgcolor="#C0C0C0" >
< p >請輸入密碼：< /p >
< form method="POST" action="test.asp" >
< input type="hidden" name="hname" value="aaa" >
< p >< input type="text" name="T1" size="20" >
< input type="submit" value="Submit" name="B1" >
< input type="reset" value="Reset" name="B2" >< /p >
< /form >
< p >　< /p >
< p >密碼正確！< /p >
< p >密碼不正確！< /p >
< /body >
< /html >

---- 先設計一數據庫，假設為passWord.dbf,字段名為 "pw",插入一條密碼記錄，保存c:/test目錄下。然后在控制面板中增加一個系統 ODBC，取名“PWTEST”，讓該ODBC指向此目錄。這時就可以在HTML中插入ASP語句。

在

前后插入如下語句：< % set c=server.CreateObject("ADODB.Connection") c.Open "PWTEST" set rs=c.Execute
("select * from password") pws=rs("pw").value rs.close c.close ’

以上是從數據庫中獲取密碼
If Request.Form("hname") = "" Then % >

在< /form >后插入

< % else% >

< % if Request.Form("T1")=pws1 then % >

在< p >密碼不正確！< /p > 前插入

< %else% >

在< p >密碼不正確！< /p > 后插入

< %end if% >

< %end if% >

　　至此，ASP 語句已插入完畢。程序已可正常運行。

　　通過學做這個例子，筆者認為只要會用VB編程，寫起來就非常簡單。先用FrontPage 98 做可視化的界面，再插入一些ASP 語句，用起來很方便，很靈活 .

上一篇：ADO 2.6 vs. the ADO.NET

下一篇：用ADO STREAM做的無組件上傳程序簡單介紹