VB escribe el código fuente del sitio web de acceso
'Algunas oraciones simples
Función de declaración privada URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Subcomando privado1_Click()
Llamar a URLDownloadToFile(0, "/", "c./1:\1.html", 0, 0)
Shell ("notepad c:\1.html")
End Sub