ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / формирование XML
9 сообщений из 9, страница 1 из 1
формирование XML
    #32797463
Alexander K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexander K
Гость
Народ, подскажите, пожалуйста, помогите новечку.
Каким образом я могу сформировать данную строку XML:

<?xml version="1.0" encoding="windows-1251" ?>
- <!-- Форма F555, ЭДО УК-ОДК -->
- <EDO_ODKF555 VERSION="01">
<RegNumberOut>137-2053F555</RegNumberOut>
<ReportOnDate>2004-11-11</ReportOnDate>

Вот часть кода VB, с помощью которого формирую свой XML

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
    Set xmlDoc = CreateObject("Microsoft.XMLDOM")   ' New DOMDocument

    xmlDoc.preserveWhiteSpace = True
    
    'Insert version
    Set comment = xmlDoc.createComment("Форма F555, ЭДО УК-ОДК")
    xmlDoc.appendChild comment
   
    Set pi = xmlDoc.createProcessingInstruction("xml", " version=""1.0"" encoding=""Windows-1251""")
    xmlDoc.insertBefore pi, xmlDoc.childNodes.Item( 0 )
    
    Set mainNode = xmlDoc.createNode(NODE_ELEMENT, "EDO_ODKF555", "")
    xmlDoc.appendChild mainNode

    Set xmlFields = xmlDoc.documentElement.appendChild(xmlDoc.createElement("RegNumberOut"))
    xmlFields.Text = "137-2053F555"

и вот что у меня получается:
<?xml version="1.0" encoding="Windows-1251" ?>
- <!-- Форма F555, ЭДО УК-ОДК -->
- <EDO_ODKF555>
<RegNumberOut>137-2053F555</RegNumberOut>

фактически мне надо добавить параметр VERSION="01" как это сделать?
...
Рейтинг: 0 / 0
24.11.2004, 11:14:46
| Ответить | Цитировать | Написать  
формирование XML
    #32797497
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hummer
Участник
да....

А вот это поменять?:)
Set mainNode = xmlDoc.createNode(NODE_ELEMENT, "EDO_ODKF555", "")
...
Рейтинг: 0 / 0
24.11.2004, 11:26:26
| Ответить | Цитировать | Написать  
формирование XML
    #32797513
Alexander K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexander K
Гость
весь вопрос в том, как его поменять. Если указать

Set mainNode = xmlDoc.createNode(NODE_ELEMENT, "EDO_ODKF555", "01")

то в итоге будет
- <EDO_ODKF555 xmlns="01">
<RegNumberOut xmlns="01">137-2053F555</RegNumberOut>

а мне надо вместо xmlns - VERSION и только в первой строке, а в дочерних - не указывать

Сори если пишу глупость, столкнулся с этим впервые, а сделать надо быстро :-(
...
Рейтинг: 0 / 0
24.11.2004, 11:30:14
| Ответить | Цитировать | Написать  
формирование XML
    #32797539
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hummer
Участник
Пишите вот так EDO_ODKF555 VERSION="01" - как строчку вместо EDO_ODKF555. Это же текст фактически.
...
Рейтинг: 0 / 0
24.11.2004, 11:41:17
| Ответить | Цитировать | Написать  
формирование XML
    #32797554
Alexander K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexander K
Гость
HummerПишите вот так EDO_ODKF555 VERSION="01" - как строчку вместо EDO_ODKF555. Это же текст фактически.

На это VB выдает ошибку

Run time error '-2147467259 (80004005)'
Это имя не должно седержать знак " ":
EDO_ODKF555--> <--VERSION="01"
...
Рейтинг: 0 / 0
24.11.2004, 11:46:46
| Ответить | Цитировать | Написать  
формирование XML
    #32798006
Alexander K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexander K
Гость
Ну что, больше предложений нет?
...
Рейтинг: 0 / 0
24.11.2004, 14:11:46
| Ответить | Цитировать | Написать  
формирование XML
    #32798083
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hummer
Участник
Учимся работать со строками: "EDO_ODKF555 Version = ""01"""
...
Рейтинг: 0 / 0
24.11.2004, 14:40:03
| Ответить | Цитировать | Написать  
формирование XML
    #32798214
Alexander K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexander K
Гость
TO Hummer: Результат такой:

Run time error '-2147467259 (80004005)'
Это имя не должно седержать знак " ":
EDO_ODKF555--> <--VERSION="01"

Решил данную проблему:
просто надо добавить аттрибут :-)

Код: plaintext
1.
2.
3.
4.
    Set mainNode = xmlDoc.createNode(NODE_ELEMENT, "EDO_ODKF555", "")
    xmlDoc.appendChild mainNode

    Set attrib = xmlDoc.selectSingleNode("EDO_ODKF555")
    attrib.setAttribute "VERSION", "01"
...
Рейтинг: 0 / 0
24.11.2004, 15:18:27
| Ответить | Цитировать | Написать  
формирование XML
    #32798373
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hummer
Участник
2 Alexander K
Был не прав - подзабыл уже XML структуру...
...
Рейтинг: 0 / 0
24.11.2004, 16:05:13
| Ответить | Цитировать | Написать  
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / формирование XML
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32797497&tid=1670162]:
 0ms
get settings:
 9ms
get forum list:
 14ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 58ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 49ms
get tp. blocked users:
 1ms
others: 210ms
total:  356ms
созд. / загр.: 356ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]