Subject: | Проблема создания XML из PX9 при помощи OLEAuto
| Date: | Wed, 2 Aug 2006 09:48:22 +0400
| From: | "Nikolay" <niktut@mail.ru>
| Newsgroups: | pnews.paradox-intl-ru
|
Простой скрипт для создания xml. Запускаю первый раз файл создается.
Если сразу закрыть PX9 то "Программ выполнила недопустимую операцию...", а
если запускаю повторно
то "General Protect Vilation". Кто-нибудь может сказать в чем проблема? На
других pnews.paradox-programming есть примеры создания xml, но другими
способами.
method run(var eventInfo Event)
var
DOM,subnode,root OleAuto
endVar
if NOT DOM.open("Microsoft.XMLDOM") then
errorShow()
return
endif
;Dom.AppendChild(Dom.createProcessingInstruction("xml","version='1.0'
encoding='WINDOWS-1251'"))
root=Dom.appendChild(Dom.CreateElement("ROOT"))
subnode=root.appendchild(DOM.createElement("SUB"))
subnode.text="Текст первого вложенного элемента"
DOM.Save ("C:\\tt.xml")
root.Close ()
subnode.Close ()
Dom.Close ()
endMethod
|