PORTA.ru - on-line магазин ПОРТАтивной техники.PORTA.ru - on-line магазин ПОРТАтивной техники.

Новости
Мои разработки
FAQ
Ссылки
Форум

Вычисление мат.функций с помощью VBScript

Для вычисления мат.функций можно воспользоваться VBScript. Доступны следущие:
Abs - абсолютное значение
Atn - арктангенс
Cos - косинус
Exp - экспонента (число е в степени)
Fix - отбрасывает дробную часть числа
Int - целая часть числа (в 1с уже есть)
Log - натуральный логарифм (тоже есть)
Rnd - случайное число
Sgn - знак числа
Sin - синус
Sqr - квадратный корень
Tan - тангенс
Hex - перевод из 10-тичной в 16-ричную
Oct - в 8-ричную
Пример вызова:
// синус
function sin(value,sc=0)
  try 
    
if sc=0 then
      sc=createObject("MSScriptControl.ScriptControl");
    endif;
    sc.language="VBscript";
  except
    return getEmptyValue();
  endtry;
  return sc.eval("sin("+value+")");
endFunction


Возведение в степень ( value1^value2) можно реализовать так:
sc.eval(""+value1+"^"+value2);

<сообщил avb>

- Наверх -

В качестве благодарности за решение проблемы, щелкните здесь.
Поддержите развитие сайта.
Спасибо!
Автор и разработчик: Кайгородов Андрей aka mszsuz. mszsuz@online.sinor.ru ICQ#33993114. Дата последнего обновления страницы: Friday 09.04.2004 16:52
1C:TOP-100 Рейтинг ресурсов 1С
Hosted by uCoz