主頁 > 知識(shí)庫 > 如何更好地保護(hù)我的網(wǎng)頁?

如何更好地保護(hù)我的網(wǎng)頁?

熱門標(biāo)簽:遼寧營(yíng)銷智能外呼系統(tǒng)價(jià)格多少 教育機(jī)構(gòu)地圖標(biāo)注 400電話是怎么申請(qǐng) 武漢如何辦理400電話 重慶400電話哪里辦理 語音電銷機(jī)器人視頻 推銷電話機(jī)器人怎么打電話的 常州智能外呼電銷機(jī)器人如何 自適應(yīng)地圖標(biāo)注

main.htm

html>

body>

form action="login.asp" method="Post">

input type="text" name="username" size="20"> 賬號(hào)br>

input type="password" name="password" size="20"> 密碼br>

input type="submit" value="進(jìn)入">

/form>

/body>/html>

 

login.asp

%@Language=VBScript%>

%Response.Buffer = True%>

html>

body>

%

UserName = Request.Form("username")

Password = Request.Form("password")

Set MyConn=Server.CreateObject("ADODB.Connection")

MyConn.Open "Provider={Microsoft Access Driver (*.mdb)};

DBQ=D:\suifengqiwu\databases\test.mdb"

SQL = "Select * From tblLogin"

Set RS = MyConn.Execute(SQL)

 

If UserName = RS("UserName") And Password = RS("Password") Then

  Session("allow") = True

!-----連接保護(hù)的頁面------->

Else

  Response.Redirect "main.asp"

  RS.Close

  MyConn.Close

  Set RS = Nothing

  Set MyConn = Nothing

End If

%>

/body>/html>

    做好了上面兩個(gè)程序,再完善一下外圍:把global.asa中的Session_Onstart加上 Session("allow") = False 語句,再在要保護(hù)的網(wǎng)頁中加入下面的語句:

% @Language=VBScript %>

% Response.Buffer = True %>

% If session("allow") = False Then Response.Redirect "main.asp" %>

[1]

標(biāo)簽:雞西 襄陽 柳州 朔州 威海 邯鄲 遵義 中山

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《如何更好地保護(hù)我的網(wǎng)頁?》,本文關(guān)鍵詞  如何,更好,地,保護(hù),我的,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《如何更好地保護(hù)我的網(wǎng)頁?》相關(guān)的同類信息!
  • 本頁收集關(guān)于如何更好地保護(hù)我的網(wǎng)頁?的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章