Имя: Пароль:
1C
1С v8
Импорт из Екселя
,
0 woha
 
18.02.13
11:39
Доброго дня!
Делаю импорт из екселя в 1С8.1 и столкнулся с проблемой считывания числа длиной в 13 символов. Использую следующий код:
MyCon = Новый COMОбъект ("ADODB.Connection");
   MyCon.Open ("Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " + ПутьКФайлу + ";Extended Properties=""Excel 8.0;HDR=No;IMEX=1""");
   MyCat=Новый COMОбъект ("ADOX.Catalog");
   MyCat.ActiveConnection = MyCon;
   ИмяПервойСтраницы=MyCat.Tables.Item(0).Name;
   MyRst = Новый COMОбъект ("ADODB.Recordset");
   MyStr = "select * from ["+ИмяПервойСтраницы+"]";
   MyRst.Open (MyStr, MyCon, 2, 3);//adOpenDynamic, adLockOptimistic

Формат(Число(MyRst.Fields(MyRst.Fields.Item(3).Name).Value), "ЧГ=") - выводить только 11 символов, а если не использую преобразований и форматирования то получаю: "4,0517918736e+012".

Спасибо.
1 Wobland
 
18.02.13
11:43
Дня доброго! На здоровье
2 Галахад
 
гуру
18.02.13
11:50
3 woha
 
18.02.13
12:03
(2) Тупик.
4 Галахад
 
гуру
18.02.13
12:04
Используйте COM.
5 woha
 
18.02.13
12:05
(4) Мне нужно без наличия экселя.
6 woha
 
18.02.13
12:12
(2) убрал IMEX=1 и заработало.

Спасибо.