





с детства, знакомого адреса 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
Сейчас этот форум просматривают: Yandex-бот и гости: 1