Имя: Пароль:
1C
 
как программно открыть mxl-файл?
0 уродина
 
27.05.08
10:48
чтобы программно же анализировать инфу которая в нем содержится... чего-то никак не соображу.. спасибо за подсказку
1 Scooter
 
27.05.08
10:50
СтруктураАтрибутов = Новый Структура;
   Чтение = Новый ЧтениеXML;
   Чтение.ОткрытьФайл("C:\data.XML");
   
   Пока Чтение.Прочитать() Цикл
       
       Если Чтение.ТипУзла = ТипУзлаXML.НачалоЭлемента Тогда
           
           ИмяУзла = Чтение.Имя;
           СтруктураАтрибутов.Очистить();
           Пока Чтение.ПрочитатьАтрибут() Цикл
               СтруктураАтрибутов.Вставить(Чтение.Имя, Чтение.Значение);
           КонецЦикла;
           
           СоздатьГруппуЭлементСправочника(Отказ, СтруктураАтрибутов);
           
       ИначеЕсли Чтение.ТипУзла = ТипУзлаXML.КонецЭлемента Тогда

       КонецЕсли;
       
       Если Отказ Тогда
           Прервать;
       КонецЕсли;
   
   КонецЦикла
2 skoddy
 
27.05.08
10:51
Не XML а MXL просят
3 Scooter
 
27.05.08
10:52
(0)тебе xml или mxl нужен?
(1)+ сорри если не в тему
4 уродина
 
27.05.08
10:52
это точно... с xml - знаю как... а вот mxl - чего-то торможу...
5 уродина
 
27.05.08
10:52
(3) в заголовке четко MXL!
6 НЕА123
 
27.05.08
10:54
ТабличныйДокумент (SpreadsheetDocument)
Прочитать (Read)
Синтаксис:
Прочитать(<Имя файла>)
Параметры:
<Имя файла> (обязательный)
Тип: Строка. Имя файла табличного документа.
Описание:
Считывает табличный документ из файла.
Пример:
ТабДок = Новый ТабличныйДокумент;
ТабДок.Прочитать("C:\My Documents\Таблица1.mxl");
7 уродина
 
27.05.08
10:56
(6) спасибо... точно... вот я бестолочь...
8 уродина
 
27.05.08
11:22
ну вот открыла... а теперь надо мне его программно прочитать - этот самый файл...
9 уродина
 
27.05.08
11:23
т.е. информацию прочитать которая в нем хранится
10 НЕА123
 
27.05.08
11:25
(9) круто.
11 НЕА123
 
27.05.08
11:25
(7)+1
12 НЕА123
 
27.05.08
11:26
шутка.
пробегаешь по всем ячейкам и анализируешь.
13 уродина
 
27.05.08
11:28
а как пробегаешь то? чего-то ничего не выходит у меня...
14 НЕА123
 
27.05.08
11:32
типа так:

для к =1 по ТД.ВысотаТаблица Цикл
 Для л = 1 по ТД.ШиринаТаблицы Цикл
    ячейка = ТД.Область(к,л);

//тут и анализируешь ячейка

КонецЦикла;
КонецЦикла
15 уродина
 
27.05.08
11:36
точно крыша едет у меня.... к чему бы это?
16 НЕА123
 
27.05.08
11:40
Лето скоро.
17 уродина
 
27.05.08
11:41
ну мне отпуск не грозит - я была в апреле... да и работу меняю - а там до отпуска еще надо дожить