2011-04-06 2 views

답변

0

당신이 당신이 HTML 태그, ID 입력 등

1

에 따라 HTML 페이지 물론 얻을 수 control.Using VB6의 웹 브라우저 사용하십시오이 :

Function GetHTMLCode(Optional strURL As String) As String 
    Dim objHttp As Object, strText As String 
    Set objHttp = CreateObject("MSXML2.ServerXMLHTTP") 
    objHttp.Open "GET", strURL, False 
    objHttp.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)" 
    objHttp.Send ("") 
    strText = objHttp.responseText 
    Set objHttp = Nothing 
    GetHTMLCode = strText 
End Function 

OK)

?
관련 문제