Есть  несколько логов, которые надо подготовить для запроса через ODBC как csv. Для этого мне надо любое количество пробелов заменить на один сивол ";"
1С-вскими методами долго, попробовал рег.выражениями, но на больших файлах валится, если загнать в Replace файл полностью. Как разбить файл на определенное кол-во строк? Если построчно, то опять же долго...

RegExp = СоздатьОбъект("VBScript.RegExp");
RegExp.IgnoreCase= 1;
RegExp.Global = 1;
RegExp.Multiline = 1;
RegExp.Pattern = "\x20+";

FSO = СоздатьОбъект("Scripting.FileSystemObject");
TextStream2 = FSO.CreateTextFile("C:\Temp\Результат.csv", -1, 0);
TextStream2.WriteLine("F1;F2;F3;F4;F5;F6;F7;F8;F9;F10");
Файл = ФС.НайтиПервыйФайл("C:\Temp\access.log" + "*");
Пока Файл <> "" Цикл
   File = FSO.GetFile("C:\Temp\Squid\" + Файл);
   TextStream1 = File.OpenAsTextStream(1, 0);

   Стр = TextStream1.ReadAll();
   Стр = RegExp.Replace(Стр, ";"); // Срубается именно тут :(
   TextStream2.Write(Стр);

   Состояние("Идет обработка файла - " + Файл);

   TextStream1.Close();
       Файл = ФС.НайтиСледующийФайл();
КонецЦикла;
TextStream2.Close();

Загрузи файл в какую-нибудь базу и работай с ним.

используй возможности Excel

(1) Для этого и перевожу в csv, чтобы загрузить :)
А так это просто файлы не имеющие разделителей, и строгих привязок по позиции столбца.

(2) Excel - таже история, ему нужны либо разделители, либо строгая длина колонки

(0) Как насчет метода СтрЗаменить()?

(4)Придется писать
СтрЗаменить(Стр, "       ", ";")
СтрЗаменить(Стр, "      ", ";")
СтрЗаменить(Стр, "     ", ";")
СтрЗаменить(Стр, "    ", ";")
СтрЗаменить(Стр, "   ", ";")
СтрЗаменить(Стр, "  ", ";")
СтрЗаменить(Стр, " ", ";")

:) И... Это долго, сам же знаешь что FSO рулит

Сначала заменяй 3 пробела на 2 (столько раз, чтобы исчезли все вхождения 3 и более пробелов).  Потом заменяй 2 пробела на ;

Вообще, ексель умеет читать текст, размеченый в стиле таблиц для MS-DOS
(когда выравнивание - пробелами), как таблицу.  Посмотри там импорт. Чего только нет...

и включи заполнять св-ва файлов: Сервис->Параметры->Общие->Предлагат заполнение св-в файлов

(6) Нету выравнивания, там + несколько пробелов после каждой колонки. Длина колонки разная. :(

Лана... сейчас придумаю что ни то.

(0) СтрЗаменить(СтрЗаменить(СтрЗаменить(СтрЗаменить(СокрЛП(ВыбСтр),"  ",";"),";;",";"),";;",";")," ","");

(9) Не ругайся 7-этажными выражениями в скобках :-)
Это можно сделать итерационно:


Пока Найти(стр,"  ")>0 Цикл
 стр=СтрЗаменить(стр, "   ","  ");
КонецЦикла;
стр=СтрЗаменить("  ", ";");

(10) нафиг развлекать проц лишними итерациями, твой вариант имхо на большом числе строк будет тормозить.
все, ждем NS, пусть рассудит :)

(11) есть у меня слабость, хотел решить оптимально, желательно в одну строку, правда пару минут соображал, что не так :)