Вызов vb функции из 1С #513331

Всем добрый день! Есть функция для генерации ШК CODE 128 через шрифты. Она написана на VB. Если упрощено то она выглядит вот так: Public Function Code128$(chaine$)  'V 2.0.0  Dim i%, checksum&, mini%, dummy%, tableB As Boolean End Function Подскажите пожалуйста как правильно вызвать данную функцию используя vbscript. Попробовал вот так: Пишет что Ошибка компиляции Microsoft VBScript: Имя было переопределено.

Попробуй изменить: Dim Code128 на Dim Code128_my_unical_var_name

Вроде получилось вот так        Сообщить(""+Рез); Попробую дальше разобраться...

может лучче перевести код на код адинес ?

Практически пришел к этому выводу. Спасибо за рекомендацию.

Через класс будет красивее, даже если обертка