|
Проблема с загрузкой XML в Access
|
|||
---|---|---|---|
#18+
RSS загружаю в память этой ф-кцией. Функция LoadRSS (ID_RSS As Integer) As String 'RSS загружаем в память Dim objHTTP в качестве новой MSXML2.XMLHTTP30 Dim ул As String, журчание, I, K Dim FileNumber журчание = RST! URL Call objHTTP.Open ("GET", журчание, False) objHTTP.send 1 LoadRSS = objHTTP.responseText Ул = objHTTP.responseText Debug.Print ул LoadRSS ул = End Function но проблема в том что некоторые ссылки грузит в таком формате может кто подскажет какие сие получается и как это правится? ссылка на http://www.retailer.ru/rss.php5?tag_27=1 <item> <guid>http://www.retailer.ru/item/id/17227/</guid> <link>http://www.retailer.ru/item/id/17227/</link> <title>??? ??????? ? ????????? (25 ?? 14:24)</title> <author>Retailer.Ru</author> <description>??? ?????????? ?? ????????????? ???????????????????? ????????????</description> </item> <item> <guid>http://www.retailer.ru/item/id/17221/</guid> <link>http://www.retailer.ru/item/id/17221/</link> <title>????? ?????? (25 ?? 13:51)</title> <author>Retailer.Ru</author> <description>? ?? ??????? ????? ????? ???description> </item> <item> <guid>http://www.retailer.ru/item/id/17218/</guid> <link>http://www.retailer.ru/item/id/17218/</link> <title>???????5 ?? 13:08)</title> <author>Retailer.Ru</author> <description>???????????????Retailer.RU ??? Retailer magazine ?? ????? ?? ?????? ???????</description> ... |
|||
:
Нравится:
Не нравится:
|
|||
07.04.2010, 14:17 |
|
Проблема с загрузкой XML в Access
|
|||
---|---|---|---|
#18+
responseText - не стоит юзать! используйте stream c явным указанием кодировки ... |
|||
:
Нравится:
Не нравится:
|
|||
07.04.2010, 16:33 |
|
Проблема с загрузкой XML в Access
|
|||
---|---|---|---|
#18+
есть пример его использования ? заменил responseText на responseStream ругается ... ... |
|||
:
Нравится:
Не нравится:
|
|||
07.04.2010, 16:57 |
|
Проблема с загрузкой XML в Access
|
|||
---|---|---|---|
#18+
вот тут с картинками Код: plaintext 1. 2. 3.
... |
|||
:
Нравится:
Не нравится:
|
|||
07.04.2010, 17:05 |
|
Проблема с загрузкой XML в Access
|
|||
---|---|---|---|
#18+
попробовал так как описано по ссылке. получилось не то что требуется . принцип работы моего модуля: 1.Загружаю XML, структуру. 2.Дальше по дереву вычленяю то что мне нужно и вывожу на форму, с дальнейшей записью этого добра в таблицы если использовать : Dim objHTTP As New MSXML2.XMLHTTP60 Call objHTTP.Open("GET", purl, False) objHTTP.send 1 Dim Docs As MSXML2.DOMDocument Set Docs = New MSXML2.DOMDocument Docs.Load objHTTP.responseXML Debug.Print Docs.Text LoadRSS = Docs.Text то в результате получаю текст , без структуры. ТОже самое делает и responseStream. насчет кодировки посмотрел кодировку xml - везде win 1251 , но одни загружаются нормально, а другие нет. ... |
|||
:
Нравится:
Не нравится:
|
|||
08.04.2010, 08:43 |
|
Проблема с загрузкой XML в Access
|
|||
---|---|---|---|
#18+
почему вы упорно пытаетесь работать с xml-структурой в виде текста? вместо: Код: plaintext
нужно: Код: plaintext
... |
|||
:
Нравится:
Не нравится:
|
|||
08.04.2010, 11:08 |
|
|
start [/forum/topic.php?fid=14&msg=36565936&tid=1333265]: |
0ms |
get settings: |
8ms |
get forum list: |
14ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
47ms |
get topic data: |
11ms |
get forum data: |
2ms |
get page messages: |
45ms |
get tp. blocked users: |
1ms |
others: | 15ms |
total: | 151ms |
0 / 0 |