Кто не спит ночью ;-)
Помогите, пожалуйста. Делаю выгрузку по статье, которую взяла в книге знаний. Выгрузка из XML.
Вот фрагмент:
xml_fso=СоздатьОбъект("Scripting.FileSystemObject");
xml_file=xml_fso.OpenTextFile(выбФайл,1,0,0);
ТекСтр = xml_file.ReadLine();
Так вот, вместо текста в переменную ТекСтр попадают какие-то иероглифы :-( Что с этим делать?

Пы. Сы. Поясните, плиз, значение "Scripting.FileSystemObject". Синтаксис-помошник этого не знает :-(

Книга знаний: Чтение и запись текстовых файлов XML средствами 1С:Предприятие 7.7

вот именно оттуда и взято :-)

object.CreateTextFile(filename[, overwrite[, unicode]])
The CreateTextFile method has these parts:


object:
Required. Always the name of a FileSystemObject or Folder object.
filename:
Required. String expression that identifies the file to create.
overwrite:
Optional. Boolean value that indicates if an existing file can be overwritten. The value is True if the file can be overwritten; False if it can't be overwritten. If omitted, existing files are not overwritten.
unicode:
Optional. Boolean value that indicates whether the file is created as a Unicode or ASCII file. The value is True if the file is created as a Unicode file; False if it's created as an ASCII file. If omitted, an ASCII file is assumed

ищи хелп Microsoft® Visual Basic® Scripting Edition VBSCRIP5.CHM

+3 не то скопировал
object.OpenTextFile(filename[, iomode[, create[, format]]])

format
Optional. One of three Tristate values used to indicate the format of the opened file. If omitted, the file is opened as ASCII.  

The format argument can have any of the following settings:

TristateUseDefault -2 Opens the file using the system default.
TristateTrue       -1 Opens the file as Unicode.
TristateFalse       0 Opens the file as ASCII.

ASV, спасибо большое
А UTF-8 это вообще юникод?
у меня теперь стала появляться ошибка: "неправильный код XML"

возникает другая проблема: на сколько я знаю Юникод не хранит перевод строк. Так ли это? Потомучто если сделать так:

xml_fso=СоздатьОбъект("Scripting.FileSystemObject");
xml_file=xml_fso.OpenTextFile(выбФайл,1,0,-1);
ТекСтр = xml_file.ReadLine();

Далее происходит ошибка, что строка превосходит допустимые

Сделала Read(50) вместо текста получаю вопросительные знаки :-(

Эта статья несерьезная, хотя ромикс тогда и сделал попытку, но надо отметить что не совсем бесполезную...
...
(0) Пользуйся примерно таким -

Док=СоздатьОбъект("Microsoft.XMLDOM");
Док.async = 0;
Док.load("C:\Scripts\Application\XML\doc.xml")
Первый = Док.documentElement;
Ноды= Первый.getElementsByTagName("summa");
Для к=0 По nodes.length-1 Цикл
 Сообщить(Ноды.item(к).nodeValue);
КонецЦикла;

ну или каким иным парсером
...
А если нравится как в (0) то лучче тогда пользуй ADODB.Stream вместо Scriting.FileSystemObject (кодировки/перекодировки поимееш любые)

а где про это ADODB.Stream  поиметь инфу?

http://msdn.microsoft.com/library/en-us/ado270/htm/mdobjstream.asp

//*******************************************
Процедура Сформировать()
   Стрим = СоздатьОбъект("Adodb.Stream");
   Стрим.Type = 2;
   Стрим.Mode= 3;
   Стрим.charset="utf-16";
   Стрим.Open();
   Стрим.LoadFromFile("c:\unicode.txt");
   Стр=Стрим.ReadText();
   Предупреждение(Стр);
   Стрим.Close();
КонецПроцедуры

а как строки последовательно считывать?

(13) А зачем ?

а надо :-)
Да я уже практически всю обработку сделала, только что с юникодом не подружила. Она постоена по принципу - последовательно считывать строки и анализировать, что в них. Ну не переписывать же мне теперь обработку!


//*******************************************
Процедура Сформировать()
   Стрим = СоздатьОбъект("Adodb.Stream");
   Стрим.Type = 2;
   Стрим.Mode= 3;
   Стрим.charset="utf-16";
   Стрим.Open();
   Стрим.LoadFromFile("c:\unicode.txt");
   Стр="";
   Пока Стрим.EOS()=0 Цикл
       Стр=Стр+Стрим.ReadText(-2);
   КонецЦикла;
   Предупреждение(Стр);
   Стрим.Close();
КонецПроцедуры

(15) совершенно неверный метод (основанный на (1)), смотри внимательно (9)

+(16) при использовании (9) или подобного, вся твоя обработка может в 10-20 строк уложиться

блин, я не разобралась в (9), а обработку надо уже сдать

(18) ну тогда вместо FSO делай как в (16) - там построчное чтение

Спасибо огромное за (16)
Вот сдам эту обработку, начну разбираться с (9) обязательно 8-)

господа, подскажите, пожалуйста, где про (9) поиметь инфу. Типа хэлпа, где описание методов и процедур