asp實現限制一個ip只能訪問一次的方法
<%
'/////////////////////////////////////////////////////
'// //
'//作用：一個IP地址只允許訪問本頁一次 //
'//引用：<!-- #include file="Check_Ip.asp" --> //
'// //
'/////////////////////////////////////////////////////
'Response.Charset = 936 '設置輸出編碼為簡體中文
'Response.Buffer = false '關閉緩沖區
Dim Fso,ts,IpList,Cfs
'設置Cookies函數
Function SetCookie()
Response.Cookies("IsBrow") = "Brow"
Response.Cookies("IsBrow").Expires = Date+365
End Function
'記錄IP地址函數
Function WriteIp(FileName, IpAddress)
Set Fso = Server.CreateObject("Scripting.FileSystemObject")
Set ts = Fso.OpenTextFile(Server.MapPath(FileName),8,true)
ts.WriteLine IpAddress
ts.Close
Set ts = Nothing
Set Fso = Nothing
End Function
'讀取IP地址函數
Function ReadIpList(FileName)
Set Fso = Server.CreateObject("Scripting.FileSystemObject")
If Not Fso.FileExists(Server.MapPath(FileName)) Then
CreateFile("Iplist.txt")
Exit Function
End If
Set ts = Fso.OpenTextFile(Server.MapPath(FileName))
Iplist = ts.ReadAll
ts.Close
Set ts = Nothing
Set Fso = Nothing
ReadIpList = Iplist
End Function
'創建文件函數
Function CreateFile(FileName)
Set Fso = Server.CreateObject("Scripting.FileSystemObject")
Set Cfs = Fso.CreateTextFile(Server.MapPath(FileName))
Cfs.Close
Set Cfs = Nothing
Set Fso = Nothing
End Function
'關閉當前IE窗口函數(注:IE6下通過,其他瀏覽器未測試)
Function CloseWindow()
'Response.Write "<script>window.location='javascript:window.opener=null;window.close();'</script>"
Response.Redirect "http://www.baidu.com"
End Function
Ip = Request.ServerVariables("REMOTE_ADDR") '獲取瀏覽者IP地址
Cookie = Request.Cookies("IsBrow") '獲取當前Cookies
'Response.Write Cookie
If Request.ServerVariables("HTTP_X_FORWARDED_FOR") <> "" Then
Response.Write "本站不允許使用代理訪問"
Response.End()
Else
If Cookie = "Brow" Then
CloseWindow()
Else
If Instr(ReadIpList("Iplist.txt"),Ip) <>0 Then
CloseWindow()
Else
WriteIp "Iplist.txt" , Ip
End If
SetCookie()
End If
End If
%>
資源簡介：asp實現限制一個ip只能訪問一次的方法 <%? '/////////////////////////////////////////////////////? '// //? '//作用：一個IP地址只允許訪問本頁一次 //? '//引用：<!-- #include file="Check_Ip.asp" --> //? '// //? '/////////////////////////...
上傳時間： 2016-07-14
上傳用戶：helei0915
資源簡介：問題描述： 設有 個運動員要進行網球循環賽。現要設計一個滿足以下要求的比賽日程表： （1） 每個選手必須與其他n-1個選手各賽一次； （2） 每個選手一天只能賽一次； （3） 循環賽一共進行n-1天；
上傳時間： 2014-09-10
上傳用戶：洛木卓
資源簡介：背包問題的解決 :給定一個超遞增序列和一個背包的容量,然后在超遞增序列中選(只能選一次)或不選每一個數值,使得選中...解決0/1背包問題的方法有多種,最常用的有貪婪法和動態規劃法。
上傳時間： 2014-01-04
上傳用戶：FreeSky
資源簡介：說明： 1、這是一個讓人眼前一亮的設計，通過java swing能設計出如此漂亮的界面實屬不易； 2、該代碼的一個優勢，能夠復用！！ 3、能夠創建簡單的表，插入表，查詢表的功能，尤其是查詢部分可以在空白處輸入SQL語句就可以直接查詢了； 4、插入部分執行成...
上傳時間： 2013-12-13
上傳用戶：zhaiye
資源簡介：這是一個關于只能溫度傳感器18b20的測量程序
上傳時間： 2013-12-29
上傳用戶：jkhjkh1982
資源簡介：一個利用OTL訪問ORACLE數據庫的例子，例子中包含了insert,delete,update,select ,數據庫連接等常用的例子代碼，給初次利用OTL訪問Orcale數據庫的同學很有幫助
上傳時間： 2013-12-20
上傳用戶：TF2015
資源簡介：一個學習ODBC訪問Access數據庫的好例子，希望大家喜歡
上傳時間： 2013-12-12
上傳用戶：bakdesec
資源簡介：其他人不需帳號就可自由下載此源碼 實現了一個類似金山殺毒軟件的界面
上傳時間： 2014-11-05
上傳用戶：PresidentHuang
資源簡介：linux內核模式tcp/ip程序設計一書的源代碼，不說了，需要的下載！
上傳時間： 2014-01-09
上傳用戶：wl9454
資源簡介：一個能夠定時訪問ORACLE數據庫的例子程序，可以訪問參數文件
上傳時間： 2014-12-02
上傳用戶：rocketrevenge
資源簡介：程序描述：本章實現了一個支持分頁顯示功能的拍賣行系統，具體的功能包括：用戶管理、添加新的商品、上傳商品圖片信息、分頁瀏覽商品、顯示商品詳細信息、買家出價競標。
上傳時間： 2014-01-01
上傳用戶：戀天使569
資源簡介：這是一個關于ORACLE訪問工具TOAD的操作手冊說明，希望對大家有點幫助
上傳時間： 2014-01-24
上傳用戶：D&L37
資源簡介：用java寫的一個使用jdbc訪問oracle數據庫的接口類，以及一個簡單的測試類。有不太了解這塊又用到的xdjm可以看下。 謝啦
上傳時間： 2014-01-25
上傳用戶：TRIFCT
資源簡介：一個用來訪問http服務器的東西。功能類似于java.net中的那個。但要強，這個對Post方法的支持更好。
上傳時間： 2016-10-29
上傳用戶：whenfly
資源簡介：改程序通過使用8254和8255以及其他一些輔助芯片實現了一個簡單但功能比較完善的電子鐘
上傳時間： 2016-11-12
上傳用戶：xcy122677
資源簡介：最小二稱遞推算法的MATLAB實現范例,思路為在上一次得到結果的基礎上，根據新獲得數據，對上一時刻的計算結果修正。
上傳時間： 2013-12-29
上傳用戶：h886166
資源簡介：用matlab編的一個程序用于求一個數的階乘
上傳時間： 2017-05-01
上傳用戶：fanboynet
資源簡介：本書詳細介紹了如何安裝、管理、備份、維護和優化一個MySQL系統。對于每一件服務器操作都提出了多種的解決方案。對于每一種的方法，雖然不一定都是非常實用的方法，讀者能通過這些方法，熟悉MySQL的特點和強大的功能。 第一章簡單介紹了MySQL的歷史、特點，...
上傳時間： 2017-05-03
上傳用戶：koulian
資源簡介：介紹一種利用Keil的軟件仿真功能來實現51單片機串口調試用戶程序的方法。
上傳時間： 2014-01-01
上傳用戶：bruce5996
資源簡介：實現了一個對圖象進行處理的算法功能，內容詳細的闡明了實現該功能的算法。
上傳時間： 2017-06-11
上傳用戶：sqq
資源簡介：(1)錄入班費信息(包括經手人姓名、事由、金額、時間)。將其信息存入文件中。 (2)按金額降序排列。 (3)按時間先后排序。 (4)求出總金額。 (5)求出每一次的班費開支占總開支的百分比。 (6)可以修改班費開支的信息，修改之前需要驗證密碼，修改后的信息可以...
上傳時間： 2017-01-08
上傳用戶：wendy15
資源簡介：C++ Builder 訪問 USB 口的方法
上傳時間： 2013-12-16
上傳用戶：youke111
資源簡介：人工智能中重要的一個問題, 用廣度優先搜索的方法解決
上傳時間： 2014-01-07
上傳用戶：playboys0
資源簡介：C++BUILDER訪問usb接口的方法!里面介紹了一些常用的訪問方式
上傳時間： 2015-04-20
上傳用戶：731140412
資源簡介：C++ Builder 訪問 USB 口的方法
上傳時間： 2013-12-22
上傳用戶：二驅蚊器
資源簡介：用遺傳算法解決通信中的TDOA問題 文件名 program 完成功能 求出在進行account_test次的試驗中每一次的最優染色體，并且求出均值MV，和均方誤差MSE 文件名 definition_constant( ) 完成功能 對各個常量試驗參數進行設定 文件名 main_program 完成功能...
上傳時間： 2013-12-22
上傳用戶：shinesyh
資源簡介：此文件實現了在數據庫中存儲圖形文件的方法，使用時注意包含picture.h文件
上傳時間： 2013-12-22
上傳用戶：PresidentHuang
資源簡介：這是接著上一次的一些大家很可能用到的聚類分析方法，有PCA等，希望能給大家一些幫助。
上傳時間： 2015-08-27
上傳用戶：lhw888
資源簡介：現有的代數特征的抽取方法絕大多數采用一維的方法，即首先將圖像轉換為一維向量，再用主分量分析（PCA）,Fisher線性鑒別分析（LDA）,Fisherfaces式核主分量分析（KPCA）等方法抽取特征，然后用適合的分類器分類。針對一維方法維數過高，計算量大，協方差矩陣...
上傳時間： 2014-11-29
上傳用戶：tianjinfan
資源簡介：實現用AXD調試VxWorks BSP顯示源代碼的方法，雖然是匯編代碼，但總算可以看見源代碼了，可以幫助調試BSP
上傳時間： 2013-11-26
上傳用戶：aa17807091
