Конференция VBStreets

**GRS** » 16.07.2004 (Пт) 20:38

Пиплы, привет! :wink:

Вобщем, тут у меня проблемка

. Я уже оставлял тему. В кратце: надо "приручить" сканер (терминал сбора данных Meteor ECO 486) к своей программе при том, что ничего кроме сканера и шнура COM порта нет. Такая вот заморочка. Из хороших новостей - он работает с 1С Предприятием.
Тут меня и осенило :idea:

- для работы с 1С'кой он использует одну DLL. Я даже нашел к ней описание, т.е. как из 1С осуществляется вызов функций этой самой библиотеки.
Вот теперь такой вопрос: как мне эту библиотеку к своему проекту подключить, чтоб воспользоваться ее функциями. Это возможно? Ее надо где-то регистрировать? Как? :shock:

И еще по этой теме: возможно перехватить вызов, например, с той же 1С'ки?

Спасибо всем! :wink:

**GRS** » 17.07.2004 (Сб) 9:46

Неужели никто не подскажет как воспользоваться функциями сторонней Dll библиотеки в своем проекте на VB :?:

**GSerg** » 17.07.2004 (Сб) 9:54

Без документации? Дизассемблируй, изучи код, пойми параметры и пользуйся...

**GRS** » 17.07.2004 (Сб) 10:43

GSerg писал(а):Без документации? Дизассемблируй, изучи код, пойми параметры и пользуйся...

Мне надо просто подключить к своему поректу DLL - зачем такие дебри? :?:

Скажите, как это сделать. А ее функции я уже "выдрал"

**GRS** » 17.07.2004 (Сб) 10:58

Так, ладно, ставлю вопрос немного иначе. У меня есть файл. Лежит он у меня на диске "С:" и называется eco486.dll. Я знаю, что в нем есть функция OutFile(FileName) которая позволяет сделать что-то, что мне необходимо, не важно. Теперь вопрос: как мне в своем проекте при нажатии, к примеру, на кнопку, вызвать эту функцию из моей dll, которая лежит на диске "С:" и получить желаемый результат :?:

Так понятней? :wink:

**GSerg** » 17.07.2004 (Сб) 11:09

Ну почему такие люди недоверчивые, rtfm не любящие, к тому же...

Вопрос: ты знаешь точный список параметров этой функции или нет?

**GSerg** » 17.07.2004 (Сб) 11:11

Если у тебя там один параметр filename - то это что? LPCSTR? BSTR* ? BSTR** ?

**Samovar** » 17.07.2004 (Сб) 11:58

Может он про Menu -> Project\Refernces спрашивает?

GM » 17.07.2004 (Сб) 12:51

Не знаю как выйдет ,но вот вариант:

Код: Выделить всё: Private Declare Function OutFile Lib "eco486.dll" (byval outfile as string) as long private sub command1_click() call outfile("1.txt") end sub

[/code]