Имя: Пароль:
1C
1С v8
Открытие и сохранение данных файла в 1С
,
0 Greeen
 
08.05.13
16:46
Добрый день! Помогите, пожалуйста, с проблемой.
Как из 1С можно открыть файл и сохранить в том же виде, но получив содержание в виде текста?
С файлами txt все прекрасно, но с XLS уже беда =( Если xls открывать через ЧтениеТекста, и потом через ЗаписьТекста, то в excel результирующий файл перестает открываться.
Через двоичные данные хорошо, но сам текст файла не получаю.

Это все мне нужно для кодирования и раскодирования файлов=(
1 shuhard
 
08.05.13
16:47
(0) читать xls через ADODB и только так
2 Fragster
 
гуру
08.05.13
16:53
читай через двоичныеДанные и Base64 строку
3 Greeen
 
08.05.13
17:15
(1) Можете подcказать, что не так? Или не Stream пользоваться?
Функция ПрочитатьТекст(ИмяФайлаСтекстом)
   
   InStream=Новый COMОбъект("ADODB.Stream");
   InStream.Type=1; // binary data
   InStream.Mode=3; // read/write
   InStream.Open();
   InStream.LoadFromFile(ИмяФайлаСтекстом);
   
   InData=InStream.Read(-1);
   
   Возврат InData;
   
   
КонецФункции


Функция ЗаписатьТекст(Текст,ИмяВыходногоФайла)
   OutStream=Новый COMОбъект("ADODB.Stream");
   OutStream.Type=2; // text data
   OutStream.Mode=3; // read/write

   OutStream.Open();
   OutStream.Write(Текст);
   OutStream.SaveToFile(ИмяВыходногоФайла,2);
   OutStream.Close();
   
   
КонецФункции

(2) Т.е. наподобие вот этого?
Файл = Новый ДвоичныеДанные (ИмяФайла);
Результат = Base64Строка(Файл);
А как его правильно сохранить?
4 Ковычки
 
08.05.13
17:15
нет не сстримом
5 Fragster
 
гуру
08.05.13
17:19
(1)(4) я протелепатировал, что автору нужно взять файл, зашифровать, отправить/похранить, в нужный момент в нужном месте расшифровать/сохранить/открыть
6 Greeen
 
08.05.13
17:20
Спасибо за поддержку! Все получилось(пока вроде )
7 shuhard
 
09.05.13
22:02
(5) пора телепатор апгрейдить =)
8 ILM
 
гуру
09.05.13
22:41
(7) С праздником ;)
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.