• Home
 · 
• Internet/HTML
 · 
• Retrieve a web page using the Microsoft Internet Transfer Control

Retrieve a web page using the Microsoft Internet Transfer Control

Retrieve a web page using the Microsoft Internet Transfer Control

Rate Retrieve a web page using the Microsoft Internet Transfer Control

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

    Dim b() As Byte
    
    'set protocol to HTTP
    Inet1.Protocol = icHTTP
    
    'set URL
    Inet1.URL = "http://www.microsoft.com"
    
    ' Retrieve the HTML data into a byte array.
    b() = Inet1.OpenURL(Inet1.URL, icByteArray)
    
    ' Create a local file from the retrieved data.
    Open "test.htm" For Binary Access Write As #1
    Put #1, , b()
    Close #1