Добрый деня всем!
При передаче данных на порт:

       FSO = Новый COMОбъект("Scripting.FileSystemObject");
   ПерЗначение = Символ(2) + Символ(5) + Символ(3);
   //ToCom4 = FSO.OpenTextFile("\\.\com4:", 2, Ложь, 0);
   ToCom4 = FSO.OpenTextFile("\com4:", 2, Ложь, 0);
   ToCom4.WriteLine(ПерЗначение);
   ToCom4.Close();

выяснилось что необходимо задавать кодовую страницу - 1251,
Если кто сталкивался, подскажите как енто сделать?
Заранее благодарю!

попробуй FSO.OpenTextFile("\com4:", 2, Ложь, 2)

хотя, скорее всего, придётся перекодировать

(1,2) спс - не взлетело