Тема: Нужен совет по Джаве(+):

Создан:Ivan Pomidoroff 05/16/2006 03:31 PM
Папка:
06. Разработка Notes-приложений, 10. Java & Lotus Notes
Тип сообщения:
Мне лень заполнять это поле

Сообщение:

Нужен совет по Джаве(+):
Есть задача с помощью метода GET через http получить XML и разобрать его.
На скрипте вроде все просто, а вот тоже самое на джаве как реализовать?

Ниже, что было сделано:


Sub Initialize
Dim xmltext As String
Dim sFIO As String
Dim ss As String
Dim iTabN As Integer
Dim cs As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db = cs.CurrentDatabase
Set xml = CreateObject("Microsoft.XMLHTTP")
Call xml.open("GET", "http://test.test.com/test/export/testxml.aspx?vid=999",False)
Call xml.send()

Set docXml = CreateObject("Microsoft.XMLDOM.1.0")

docXml.async = False
docXml.validateOnParse = False
docXml.resolveExternals = False


xmltext=Xml.responseText
If (docXml.loadXml(Xml.responseText) = False) Then
Msgbox "Parser error:" +docXml.parseError.reason+"Error code :"+Cstr(docXML.parseError.errorcode) , 16 , "Error processing"
Else
Set ElementsList = docXml.selectnodes("ESS/sprav-list/sprav/item")
'.
'.
'.
End If
Set docXml=Nothing
Set XmlHTTPRequest=Nothing
Exit Sub

errHandling:
Print Str(Erl) +" : " + Error
Resume Next
End Sub


Иерархия документов данной дискуссии:
Нужен совет по Джаве(+): (Ivan Pomidoroff) (16.05.2006 15:31:22)
.... вот мне интересно (Mikhail Cholokov) (16.05.2006 19:48:49)
.... предлагали для этих случаев использовать поисковую фразу "каждый уважающий себя лотусист" (+ссылки) (Nick A Norkin; VIT Server B) (16.05.2006 18:20:05)
........ Попробовал агента скачивания курсов валют. Выдает ошибку:(+) (Ivan Pomidoroff) (17.05.2006 15:25:24)
............ нет коннекта? из-за прокси? (-) (Nick A Norkin; VIT Server B) (17.05.2006 17:22:15)
................ Сделал то же самое в своей сетке без прокси. Другая ошибка (+) (Ivan Pomidoroff) (19.05.2006 7:57:19)
............ что - коннекшн таймаут ниочем не говорит ;) ? (Mikhail Cholokov) (17.05.2006 16:16:39)
............ И все-таки из-за чего возникает ошибка? (+) (Ivan Pomidoroff) (23.05.2006 10:04:35)
................ А Вы сходили по ссылке? Я сходил... (Nick A Norkin; VIT Server B) (23.05.2006 11:22:33)
.................... Ссылку здесь заменил, просто реальный url вамничего не даст, т.к. он внутрикорпоративный и извне не доступен...(+) (Ivan Pomidoroff) (23.05.2006 11:59:55)
........................ увы, я сейчас сидю за проксёй, и протестировать код не мОгу (-) (Nick A Norkin; VIT Server B) (23.05.2006 16:07:58)
........................ Вам дали рабочий код... (Mikhail Cholokov) (23.05.2006 12:06:56)
.... CreateObject("Microsoft.XMLHTTP") (Moisey Izsrelevich Spaciman) (16.05.2006 16:32:06)
.... Можно с помощью LS2J (Andrew Aksenov) (08.06.2006 8:25:54)


Разработчикам и администраторам: курсы, книги, сертификация