


с детства, знакомого адреса www.microsoft.com


Dim vData As Variant
vData = Me.Inet1.OpenURL("http://informer.gismeteo.ru/text/29846-1.JS", icString)
Open "C:\a.txt" For Output As #1
Print #1, vData
Close #1
Сейчас этот форум просматривают: SemrushBot и гости: 11