Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: VBscript  (Прочитано 7224 раз)
0 Пользователей и 1 Гость смотрят эту тему.
Dest
Опытный

ru
Offline Offline

« : 30-07-2009 22:57 » 

Здрасти! Вот есть такая функция для конвертации в восьмеричное исчисление

Код:
Функция fun(value,par)
sc = новый COMОбъект ("MSScriptControl.ScriptControl");
sc.language="VBscript";


if      par = "oct" then
return sc.eval("oct("+value+")");
endif;

КонецФункции

Она у меня работает только, если параметр "value"<1000. Что-то странно так и должно быть, а если я хочу fun(9999999,"oct")
« Последнее редактирование: 30-07-2009 23:18 от Dest » Записан
Dest
Опытный

ru
Offline Offline

« Ответ #1 : 30-07-2009 23:18 » 

Все дошло...
параметр "value" должен быть текстовый, а не числовой
Записан
Kivals
Модератор

ca
Offline Offline
Пол: Мужской

WWW
« Ответ #2 : 31-07-2009 08:04 » 

Ага. По умолчанию при преобразовании числа в текст 1С v8 вставляет между разрядами тысяч символ неразрывного пробела (Символы.НПП, код 160)
Записан
Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines