隨筆 - 72 
文章 - 28 
trackbacks - 0


           
	

          

          
	
		
          
			
          
	
          
		
          <2005年8月>
          
	
          日一二三四五六
          31123456
          78910111213
          14151617181920
          21222324252627
          28293031123
          45678910
          

          

          
			
			

          常用鏈接
          


          留言簿(4)
          




		
          隨筆分類(66)
          
		
				
			
	
		
          隨筆檔案(72)
          
		
				
			
	
		
          文章檔案(19)
          
		
				
			
	
		
          收藏夾
          
		
				
			
	




          搜索
          

            
	
          • 
		
          •  
	
            • 

          


          最新評論
	
          

          
	
			
		

          


          閱讀排行榜
          



          評論排行榜
          


          		
	

          

          
	
					


          
	
	
          XMLHTTP對象可以獲取某個網(wǎng)頁地址的信息，下面舉一個簡單的例子說明
          首先在VB中新建一個工程，選擇Project－>reference，把Microsoft XML V3.0和Microsoft ActiveX加進來，這樣就可以進行程序的編寫了。
          程序如下，程序中是用一個button來觸發(fā)這個事件的。
          

          

          Private Sub Command1_Click()
          Dim XMLHTTP As New XMLHTTP
          Dim m_queryURL As String
          m_queryURL           = "http://bookreg.sina.com.cn/serialize/chapter.php?id=42164"
          m_queryURL = m_queryURL
          XMLHTTP.Open           "GET", m_queryURL, False
          'XMLHTTP.setRequestHeader "Content-Type", "text/html"
          '          XMLHTTP.setRequestHeader "Content-Type", "charset=gb2312"
          XMLHTTP.send
          If XMLHTTP.readyState <> 4 Then
                        MsgBox "HTTP讀取狀態(tài)失敗"
              Exit Sub
          End If
          Dim szRet As String
          szRet           = XMLHTTP.responseText
          MsgBox szRet
          End Sub
          

          這樣就可以把該網(wǎng)頁上的原代碼在提示框中顯示出來。
          

           
          
	
          posted on 2005-08-05 16:40 kelly 閱讀(667) 評論(0)  編輯  收藏  所屬分類: others 
          

          







          
	    
    




          








          

				
	



          



    







          
        
	




主站蜘蛛池模板：
江永县|
若尔盖县|
巩留县|
长治市|
龙陵县|
平和县|
卓资县|
沾化县|
天等县|
九龙城区|
梁山县|
谷城县|
老河口市|
淅川县|
郯城县|
抚顺县|
科技|
巴青县|
株洲县|
宿州市|
司法|
永兴县|
靖江市|
原平市|
庆阳市|
宣威市|
镇江市|
中西区|
芜湖市|
金阳县|
友谊县|
信宜市|
离岛区|
苏尼特左旗|
北安市|
浦东新区|
县级市|
利辛县|
祁阳县|
红安县|
增城市|