隨筆 - 20 
文章 - 7 
trackbacks - 0


           
	

          

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

          

          
			
			

          常用鏈接
          


          留言簿(1)
          




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



          積分與排名
          

            
	
          • 
		積分 -
		20428
	
          • 
		排名 -
		1710
	
            • 

          


          最新評論
	
          

          
	
			
		

          

          		
	

          

          
	
					


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

           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)  編輯  收藏  
          

          







          
	    
    




          





          


          

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


          

		          		
		
          
		
          			
		
		
		
		
          
		
          
		
		
          
		
          
			網站導航:
		
		
          
		
          
			
		
          	
		
          
			 
		
          
		
          
			
		
          
		
          
			
				
		
          		
	
          	

          



          

				
	



          



    







          
        
	




主站蜘蛛池模板：
静海县|
巴彦县|
三河市|
伊春市|
南丰县|
驻马店市|
铜陵市|
华亭县|
永福县|
涿州市|
庆元县|
库车县|
启东市|
当阳市|
四会市|
阿克苏市|
南开区|
黔南|
富川|
布拖县|
望江县|
丰城市|
平遥县|
吐鲁番市|
阜康市|
雷山县|
双峰县|
友谊县|
华阴市|
建宁县|
阿拉尔市|
宝山区|
井研县|
原平市|
柘城县|
兴仁县|
新巴尔虎右旗|
马边|
海林市|
洪洞县|
阿拉善左旗|