Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы? / Visual Basic

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы?

11 сообщений из 11, страница 1 из 1

Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы?

#34014499

Участник

Откуда: Самара

Сообщения: 2 263

Рейтинг: 0 / 0

Да так чтоб сначало проверить зарегина она или нет и если что зарегистрировать?

...

Рейтинг:

0 / 0

27.09.2006, 09:44

| Ответить | Цитировать | Написать

Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы?

#34014556

marvan

Участник

Откуда: Москва

Сообщения: 849

Рейтинг: 0 / 0

Я делаю так:

Код: plaintext

1.
2.

Dim cLib As Object
Shell App.Path & "\ExeLib.exe"
Set cLib = CreateObject("ExeLib.Lib")

Фишка в том, что при запусе ActiveX-exe он всегда сам себя регистрирует.
Но обращаю внимание, что здесь могут быть проблемы с производительностью из-за позднего связывания, да ещё и с ActiveX-exe.

...

Рейтинг:

0 / 0

27.09.2006, 10:01

| Ответить | Цитировать | Написать

Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы?

#34014570

Antonariy

Участник

Откуда: ☭

Сообщения: 80 221

Рейтинг: 0 / 0

Если используется раннее связывание (стоит галка в референсах), то если библиотека не зарегистрирована, то прога не запустится. А если позднее, то можно попробовать создать объект через CreateObject и при неудаче зарегистрировать.

...

Рейтинг:

0 / 0

27.09.2006, 10:05

| Ответить | Цитировать | Написать

Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы?

#34014920

Участник

Откуда: Самара

Сообщения: 2 263

Рейтинг: 0 / 0

Саму дллку подключил через референсы.
Сделал примерно так:
т.е. если происходит ошибка то дллка регится и процедура main выполняется снова..

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.

Public Sub Main()
On Error GoTo Err:
Dim frm As New Form1
frm.Show
Exit Sub
Err:
'если DLLки не зарегистрированны то регистрируем
If Err.Number =  429  Then
Shell App.Path & "\reg.bat", vbHide
Main
End If
End Sub

Вроде работает

...

Рейтинг:

0 / 0

27.09.2006, 11:18

| Ответить | Цитировать | Написать

Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы?

#34015321

Бенедикт

Участник

Сообщения: 2 108

Рейтинг: 0 / 0

Vw,
это варварство, извини, регистрировать ActiveX DLL через внешний BAT-ник. За регистрацию отвечает точка входа DllRegisterServer. Если библиотека лежит в пределах видимости процесса (например, в том же каталоге), то достаточно задекларировать её:
Declare Function MyDllRegisterServer Lib "MyDll.dll" Alias "DllRegisterServer" () As Long,
а потом вызвать. Если dll лежит где попало, то у Matthew Curland-а есть пример - через LoadLibrary и GetProcAddress.

...

Рейтинг:

0 / 0

27.09.2006, 12:24

| Ответить | Цитировать | Написать

Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы?

#34015342

Участник

Откуда: Самара

Сообщения: 2 263

Рейтинг: 0 / 0

блин. где ж ты раньше был..

...

Рейтинг:

0 / 0

27.09.2006, 12:29

| Ответить | Цитировать | Написать

Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы?

#34015468

Бенедикт

Участник

Сообщения: 2 108

Рейтинг: 0 / 0

Vwблин. где ж ты раньше был..
Здесь.

...

Рейтинг:

0 / 0

27.09.2006, 12:50

| Ответить | Цитировать | Написать

Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы?

#34017405

Serge Gavrilov

Участник

Сообщения: 3 285

Рейтинг: 0 / 0

marvanЯ делаю так:
[src vba]...
Shell App.Path & "\ExeLib.exe"
...

А если ExeLib.exe находится в корневом каталоге?

...

Рейтинг:

0 / 0

28.09.2006, 00:52

| Ответить | Цитировать | Написать

Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы?

#34017772

Melkiades

Участник

Откуда: Москва

Сообщения: 1 459

Рейтинг: 0 / 0

Serge Gavrilov marvanЯ делаю так:
[src vba]...
Shell App.Path & "\ExeLib.exe"
...

А если ExeLib.exe находится в корневом каталоге?
По условию задачи она лежала в папке с приложением.
Кроме того, класть что-то в корень - не очень хороший тон.
Но если очень хочется, то

Dim fso As New Scripting.FileSystemObject
AppDisk = fso.GetDriveName(App.Path) & "\"

...

Рейтинг:

0 / 0

28.09.2006, 09:54

| Ответить | Цитировать | Написать

Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы?

#34020540

Serge Gavrilov

Участник

Сообщения: 3 285

Рейтинг: 0 / 0

Melkiades Serge Gavrilov marvanЯ делаю так:
[src vba]...
Shell App.Path & "\ExeLib.exe"
...

А если ExeLib.exe находится в корневом каталоге?
По условию задачи она лежала в папке с приложением.
Кроме того, класть что-то в корень - не очень хороший тон.
Но если очень хочется, то

Dim fso As New Scripting.FileSystemObject
AppDisk = fso.GetDriveName(App.Path) & "\"
А автор программы не знает, куда пользователь вздумает ее установить. Поэтому надо предусматривать различные варианты. А ваше предложение опять рассчитано на предполагаемое расположение.

...

Рейтинг:

0 / 0

28.09.2006, 23:13

| Ответить | Цитировать | Написать

Как бы так окуратненько подключиться к своей библиотечке находящийся в каталоге программы?

#34020950

Melkiades

Участник

Откуда: Москва

Сообщения: 1 459

Рейтинг: 0 / 0

Serge Gavrilov Melkiades Serge Gavrilov marvanЯ делаю так:
[src vba]...
Shell App.Path & "\ExeLib.exe"
...

А если ExeLib.exe находится в корневом каталоге?
По условию задачи она лежала в папке с приложением.
Кроме того, класть что-то в корень - не очень хороший тон.
Но если очень хочется, то

Dim fso As New Scripting.FileSystemObject
AppDisk = fso.GetDriveName(App.Path) & "\"
А автор программы не знает, куда пользователь вздумает ее установить. Поэтому надо предусматривать различные варианты. А ваше предложение опять рассчитано на предполагаемое расположение.
Т.е. как это не знает? App.Path как раз и возвращает искомый путь.

...

Рейтинг:

0 / 0

29.09.2006, 09:38

| Ответить | Цитировать | Написать

11 сообщений из 11, страница 1 из 1

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=60&msg=34020540&tid=2165237]:	0ms
get settings:	10ms
get forum list:	20ms
check forum access:	4ms
check topic access:	4ms
track hit:	105ms
get topic data:	12ms
get forum data:	3ms
get page messages:	48ms
get tp. blocked users:	2ms
others:	243ms

total:	451ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы