Ciao a tutti,
io ho questo problema, vorrei prendere il codice html di una pagine web (nel mio esempio www.google.com) e metterlo dentro un file di testo (nel mio esempio Paginahtml.txt).
Io ho scritto questo codice ma non mi fa scrivere perchè mi si pianta sulla riga in cui cerco di assegnare alla stringa prova il codice html.
Mannaggia non so dove sbaglio, sapete aiutarmi?
Dim IE
Set IE = CreateObject("InternetExplorer.Application")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.CreateTextFile("C:\Paginahtml.txt")
Set objTextFile = objFSO.OpenTextFile("C:\Paginahtml.txt",2,true,0)
IE.Visible = true
IE.navigate("
http://www.google.com")
Prova = (IE.Document.body.innerHTML)
MsgBox (Prova)
objTextFile.Write (Prova)
objTextFile.Close
Grazie a tutti