Обсуждение:УФЭБС ED101 (платежное поручение) с помощью Microsoft.XMLDOM
0 (0)
Обсуждение:УФЭБС ED101 (платежное поручение) с помощью Microsoft.XMLDOM ( Обсуждение примера 16.12.2004 10:59 )
0(0)Пример формирования XML-файла платежного поручения - ED101 - по форматам УФЭБС с помощью Microsoft.XMLDOM.
Посмотреть пример
>> ОтветитьДа, с кодировкой проблема... ( Sandy 16.12.2004 12:08 )
0(0)Попробовал этот пример - файл получился совсем нечитаемый по-русски...
Исходный текст в DOS-кодировке.
Результат - кривой.
>> Ответитьон в UTF получается по дефолту.... IE отображает ( Outcast 16.12.2004 13:18 )
0(0)Not specified
>> ОтветитьПодправил пример (+) ( Lexy 16.12.2004 14:57 )
0(0)pi = dom.createProcessingInstruction("xml", "version='1.0' encoding='windows-1251'");
вместо
pi = dom.createProcessingInstruction("xml", "version='1.0'");
и забыл вставить двоеточия в xmlns:xsi и в xsi:schemaLocation
>> ОтветитьТеперь файл в кодировке Windows (+) ( Lexy 16.12.2004 14:58 )
0(0)Not specified
>> Ответить
в трехзвенке объект Msxml2.DOMDocument.4.0 не доступен ( woolfs 18.01.2005 11:43 )
0(0)import "..\\mac\\operday\\rslx.d32","..\\mac\\operday\\lgxs.d32"; If(IsStandAlone()) /*Двухзвенка*/ ObjXML = ActiveX("Msxml2.DOMDocument.4.0"); Else ObjXML = TlgActiveX("Msxml2.DOMDocument.4.0"); End;
result = objXML.load("..\\TxtFile\\humans.xml");
//возвращает false, при существовании оного,
а в двухзвенке все без проблем - true,
может какое нибудь свойство объекту поменять async и все такое....
может у кого получилось в трехзвенке?
>> ОтветитьЛегче лёгкого. (+) ( Lexy 18.01.2005 12:24 )
0(0)Надо просто скопировать файл на терминал перед обработкой.
import rslx, lgxs; fnam = "..\\TxtFile\\humans.xml"; If(IsStandAlone()) /*Двухзвенка*/ ObjXML = ActiveX("Msxml2.DOMDocument.4.0"); fname = fnam; Else ObjXML = TlgActiveX("Msxml2.DOMDocument.4.0"); fname = "C:\\WINDOWS\\Temp\\humans.xml"; lgTermServ(fnam, fname); End; result = objXML.load(fname);
>> ОтветитьТо есть наоборот - lgServTerm (-) ( Lexy 18.01.2005 12:25 )
0(0)Not specified
>> Ответитьспасиб, но выдал неопределенный идентификатор LGSERVTERM ( woolfs 18.01.2005 12:55 )
0(0)может версия библиотеки старая?
>> ОтветитьНет, надо просто дополнительно lgs подключать, забыл (-) ( Lexy 18.01.2005 17:21 )
0(0)Not specified
>> Ответить
интересно .... кто-нибудь уже попробовал р-стуловские макросы? ( Outcast 18.01.2005 23:04 )
0(0)все никак руки не доходят посмотреть, что в итоге формируется :(((
Вот запуск там примерно так:
Import rcw; ... const _CLIENT = false; _SERVER = true; ... GetRegistryValue("BANK_INI\\ВЕДЕНИЕ КОРСЧЕТОВ\\XML КЛИЕНТ", V_STRING, rc, ErrCod ); if(ErrCod) rc = "NO"; end; if(IsStandAlone()) rc = "NO"; end; ... if(rc=="YES") mode = _CLIENT; else mode = _SERVER; end; ... if ( valtype(mode) != V_BOOL ) mode = _CLIENT; end; obj = CreateObject ( "rsax", "TRsAxServer", "RsAxServer", mode ); doc = obj.CreateComObject ("MSXML2.DOMDocument");
>> ОтветитьВот...вот....вот.... ( Дундук 23.01.2005 09:58 )
0(0)Попробовал,подергался. Модуль(маскрос) RCW в дистрибутиве не обнаружил. Может кто пояснит что это за зверь.....
>> ОтветитьRSCOM SDK ( Outcast 23.01.2005 13:27 )
0(0)давно лежит у Кубрина на сайте со сырцами, примерами, доками..........
и доступен для скачивания
http://members.softlab.ru/kubrin/FileArch/rscomsdk.zip
>> Ответить