ник: ДрЮня
может я не о том, но я для получения данных с сервера использую библиотеку MS XML v3.0 (v4.0)
примерно так
Set xmlDoc = New DOMDocument30
xmlDoc.async = False
xmlDoc.validateOnParse = False
sURL = lv.ListItems(bItem).ListSubItems(3)
If Not xmlDoc.Load(sURL) Then
MsgBox "Документ не загружается. Проверьте подключение к Интернету или ссылка не работает.", vbInformation, App.Title
GoTo L_Exit
End If
|