隨筆 - 20 
文章 - 7 
trackbacks - 0


           
	

          

          
	
		
          
			
          
	
          
		
          <2006年3月>
          
	
          日一二三四五六
          2627281234
          567891011
          12131415161718
          19202122232425
          2627282930311
          2345678
          

          

          
			
			

          常用鏈接
          


          留言簿(1)
          




		
          隨筆檔案
          
		
				
			
	
		
          文章分類
          
		
				
			
	
		
          文章檔案
          
		
				
			
	



          積分與排名
          

            
	
          • 
		積分 -
		20449
	
          • 
		排名 -
		1709
	
            • 

          


          最新評論
	
          

          
	
			
		

          

          		
	

          

          
	
					


          
	
	
          一種我未用過的方法，但現在覺得很爽
          

           1<%@language=vbscript codepage=936 %>
           2<%
           3option explicit
           4response.buffer=true    
           5dim conn
           6dim connstr
           7dim db
           8db="yipinjia.asp"
           9Set conn = Server.CreateObject("ADODB.Connection")
          10connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
          11conn.Open connstr
          12
          13%>
          14
          15<%
          16Rem 判斷發言是否來自外部
          17function ChkPost()
          18    dim server_v1,server_v2
          19    chkpost=false
          20    server_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))
          21    server_v2=Cstr(Request.ServerVariables("SERVER_NAME"))
          22    if mid(server_v1,8,len(server_v2))<>server_v2 then
          23        chkpost=false
          24    else
          25        chkpost=true
          26    end if
          27end function
          28%>
          
	
          posted on 2006-03-16 00:34 The Game, tomtom 閱讀(228) 評論(0)  編輯  收藏  
          

          







          
	    
    




          





          


          

	
          
		
          
				
		
	
		
          
		
		
          只有注冊用戶登錄后才能發表評論。
          
		
          
			
		
          
			
		
          
		
		
          
		


          

		          		
		
          
		
          			
		
		
		
		
          
		
          
		
		
          
		
          
			網站導航:
		
		
          
		
          
			
		
          	
		
          
			 
		
          
		
          
			
		
          
		
          
			
				
		
          		
	
          	

          



          

				
	



          



    







          
        
	




主站蜘蛛池模板：
马边|
岫岩|
嘉黎县|
陇西县|
景洪市|
乐清市|
辽宁省|
吴桥县|
敦煌市|
开封县|
进贤县|
铜鼓县|
金溪县|
陵水|
神木县|
色达县|
普兰店市|
青河县|
晴隆县|
资讯
|
永州市|
达孜县|
晋江市|
綦江县|
武山县|
永川市|
云和县|
涞水县|
抚顺市|
曲沃县|
会理县|
敖汉旗|
陆丰市|
刚察县|
通化市|
宁德市|
冷水江市|
共和县|
塔城市|
海兴县|
山东|