推薦：詳解Asp函數(shù)
Cbool(string) 轉(zhuǎn)換為布爾值 Cbyte(string) 轉(zhuǎn)換為字節(jié)類型的值 Ccur(string) 轉(zhuǎn)換為貨幣類值 Cdate(string) 轉(zhuǎn)換為日前類型的值 Cdbl(string) 轉(zhuǎn)換為雙精度值 Cint(string) 轉(zhuǎn)換為整數(shù)值 Clng(string) 轉(zhuǎn)換為長(zhǎng)整型的值 Csng(string) 轉(zhuǎn)換為單精度的值 Cstr(

< ％ 
Function IsCookiesOpen() 
Dim ClientIP, URL, QueryString, IsNew 
 
Application.Lock 
If Session(“SessionID")=Session.SessionID Then  
IsCookiesOpen = True 
ClearApp 
Exit Function 
End If 
 
IsNew = False 
If Session(“SessionID") = Empty Then 
CurrentIP =Request.ServerVariables 
(“REMOTE_ADDR") 
If CurrentIP <> Application(“IP") Then 
ClearApp 
IsNew = True 
End If 
End If 
If Not IsNew And Application(“Visit") >= 1 Then 
IsCookiesOpen = False 
ClearApp 
Exit Function 
End If 
Application(“Visit") = Application(“Visit") ＋ 1 
Application(“IP") =Request.ServerVariables 
(“REMOTE_ADDR") 
Session(“SessionID") = Session.SessionID 
 
URL =“_page_=”＆Request.ServerVariables 
(“PATH_INFO") 
QueryString=Request.ServerVariables 
(“QUERY_STRING") 
If Len(QueryString) > 0 Then URL = URL ＆ “＆" ＆ QueryString 
If Not Response.IsClientConnected Then ClearApp 
End Function 
 
Sub ClearApp() 
Application(“Visit") = 0 
Application(“IP") = “" 
End Sub 
％ > 
 
在.asp文件中直接用IsCookiesOpen（）函數(shù)來(lái)判定 Cookies是否打開。  
 
此種方法的漏洞：如果再打開一個(gè)新瀏覽器窗口，會(huì)發(fā)現(xiàn)在新打開的瀏覽器窗口中仍然可以投票。這是因?yàn)镾ession是私有的，一個(gè)Session中變量的改變并不影響另一個(gè)Session的同名變量的值。為了解決這個(gè)問(wèn)題，下面給出方法二。 

分享：解析用ADO連接各種數(shù)據(jù)庫(kù)的代碼
簡(jiǎn)單介紹一下幾種ADO連接方式：ODBCDSN,ODBCDSN-Less, OLEDBProvider,和MSRemoteProvider. 1。ODBCDSN連接 I.DSN oConn.OpenDSN=AdvWorks;_ UID=Admin;_ PWD=; 注意：從MDAC2.1開始就不能夠在使用這樣的方式了，就是只把DSN文件名放在ConnectString中