Форум на Исходниках.RU

Как создать API DLL из VB

SCINER — Thu, 29 Jan 2009 20:50:28 +0000

SCINER: Не без основания заявляю, что метод Хакера одинаково неработоспособен как и мой =)
Неработоспособность моей заключается в невозможности вызова функций из других языков =(

Как создать API DLL из VB

Nazaroff — Thu, 29 Jan 2009 16:43:27 +0000

Nazaroff: Я понял, Dll работает, я разобрался с этой темой :) Всем спасибо

Как создать API DLL из VB

@@@ — Thu, 29 Jan 2009 04:12:06 +0000

@@@:

Цитата Nazaroff @ 28.01.09, 22:12

Далее, хочу зарегить эту Dll при помощи (regsvr32 "C:\vbApiHook.dll")

Прежде чем писать API DLL наверное стоит почитиать что это такое и чем оно отличается от COM DLL :whistle:

Как создать API DLL из VB

nash — Thu, 29 Jan 2009 00:21:32 +0000

nash:

Цитата Nazaroff @ 28.01.09, 22:12

Далее, хочу зарегить эту Dll при помощи (regsvr32 "C:\vbApiHook.dll")

главное - понимание.

Как создать API DLL из VB

Nazaroff — Wed, 28 Jan 2009 22:12:01 +0000

Nazaroff: SCINER, у меня тут кое-что проявилось!
Переустановил VB полностью, установил аддин.
Теперь: DLL появляется(Я указывал диск С, имя библиотеки vbApiHook.dll), с ней еще 3 файла появляются при компиляции:
1)compile.txt
2)vbApiHook.lib
3)vbApiHook.exp

Далее, хочу зарегить эту Dll при помощи (regsvr32 "C:\vbApiHook.dll")

Сервер выдает сообщение, что Dll была загружена, но точку входа найти не удалось. :wall:

Вот содержание "compile.txt":

\link2.exe "C:\modDLL.OBJ" "C:\vbApiHook.OBJ" "C:\Program Files\Microsoft Visual Studio\VB98\VBAEXE6.LIB" /ENTRY:DLLMain /OUT:"C:\vbApiHook.dll" /BASE:0x10000000 /SUBSYSTEM:WINDOWS,4.0 /VERSION:1.0 /INCREMENTAL:NO /OPT:REF /MERGE:.rdata=.text /IGNORE:4078 /DLL /DEF:"c:\documents and settings\максим\рабочий стол\coding\working\vbapihook_dll\vbAPIHook_Dll.vbd"

У меня вот подозрения есть, почему в файле compile.txt сначала идет \link2.exe
Может он не через твой линк компилит???
В чем теперь дело? :(

прикреплю проект компилируемой vbApiHook.dll

Добавлено 28.01.09, 22:37
SCINER, 100% это из-за того, что она компилит не через твой "link.exe", а черезстандартный "LINK2.exe" !!!

Почему? Я убрал из папки \VB98\LINK2.exe на рабочий стол, попытался снова скомпилить Dll, её вообще не оказалось вместе с теми 3-я файлами!!!!! Только один файл compile.txt ,точно с таким же содержимым, как я выше писал, создается на С:\ и все!

А закинул обратно, компилится!!!!

:wall: :wall: :wall:

Как создать API DLL из VB

Nazaroff — Wed, 28 Jan 2009 14:35:18 +0000

Nazaroff:

Цитата SCINER @ 28.01.09, 08:07

1)Да, именно в меню Файл---Компиляция(с иконкой)
2)Никаких ошибок нет вообще

Посмотри, я прикрепил архив с этим проэктом.Он маленький и простой, но суть в том, что он не компилется в длл

Добавлено 28.01.09, 14:39
Артур, спасибо за ссылочки :)

Как создать API DLL из VB

Артур — Wed, 28 Jan 2009 08:14:48 +0000

Артур:

Цитата Nazaroff @ 27.01.09, 21:35

Я просто хочу, чтобы она как Windows'овская была, Чтобы закинул её в любое место на диске и она работала. Отдельно была от проЖекта. Поэтому и заинтересовался работой сей Add-in'a От SCINER'a

Вот в этом топике: http://bbs.vbstreets.ru/viewtopic.php?p=6708344#p6708344 лежит готовый пример хука на основе библиотеки Хакера. Думаю, что на основе библиотеки SCINER принцип хука будет приблизительно такой же. Там правда сам проект общается с длл, а раз тебе этого не надо и вся обработка будет прямо в библиотеке, то ещё проще :)

И посмотри ещё дискуссию в этой теме: http://bbs.vbstreets.ru/viewtopic.php?f=1&t=36237&start=0&st=0&sk=t&sd=a

И всё-таки: натив-библиотека и для твоей задачи совсем не обязательна. Единственное отличие - что ActiveX.dll нужно зарегистрировать - и будет она у тебя, точно так же, "отдельно от проЖекта" :)

А совсем уж отдельно от проЖекта вообще не получится - кто-то ведь должен ставить сам хук? Библа - хоть натив, хоть АктивХе - сама этого не сделает. Так что этот кто-то пусть и библу регит.

Как создать API DLL из VB

SCINER — Wed, 28 Jan 2009 08:07:31 +0000

SCINER:

Цитата

Смотри, меня к пример "C:\"
Имя файла там прописан как "****.EXE"
Меняю имя файла,как ты говорил, "****.dll"

Я правильно понимаю, это ты проделываешь в диалоге выбора файла при компиляции проекта из меню Файл → Компиляция?

Компиляция — это пункт меню, который с иконкой. Его добавляет аддин.
Кстати не вылетают ли ошибки при компиляции?
Есть ли у тебя в проекте модуль с функциями, который добавляет аддин?
Тип проекта Standart Exe ?

Прицепи сюда проект, который не получается скомпилить.

У меня не возникало никогда проблем с компиляцией, ни на одной версии Windows.
Хотя я всегда юзаю сей аддин.

Как создать API DLL из VB

Nazaroff — Tue, 27 Jan 2009 21:35:30 +0000

Nazaroff:

Цитата SCINER @ 26.01.09, 21:44

2 Nazaroff: Не смотри вообще в этот файл проекта.

Для успешной компиляции библиотеки тебе нужно сделать следующее:
1) Выбрать пункт меню File → Компиляция
2) Перейти в диалоге выбора имени файла в нужный каталог и в строке имени файла указать mydll.dll, т.е. принудительно выставить правильное расширение файла.

SCINER, сделал все, ка ты написал. По-обычному, путь лежит в Template\Projects
Смотри, меня к пример "C:\"
Имя файла там прописан как "****.EXE"
Меняю имя файла,как ты говорил, "****.dll"
Но ни файла "****.exe", "****.dll" нет на "C:\" !!!!!
Что же делать? :(

-Added 27.01.09, 21:37

Цитата varzind @ 26.01.09, 15:55

Цитата Nazaroff @ 25.01.09, 21:48

Мне очень нужно создать DLL ку!
Она для перехвата нужна!!!! Вся работа сейчас стопанулась!

Nazaroff, Sciner тебе ответит, а пока можешь попробовать это как альтернативу для создания DLL на VB6.

Спасибо тебе)))

-Added 27.01.09, 21:58

Цитата Артур @ 26.01.09, 18:22

Цитата Nazaroff @ 25.01.09, 21:48

Мне очень нужно создать DLL ку!
Она для перехвата нужна!!!! Вся работа сейчас стопанулась!

А для хуков совсем не обязательно, чтобы DLL была именно с АПИ, вполне пойдёт и ActiveX.dll и даже ActiveX.ocx :D

Смотри здесь:
хук на чистом бейсике

Как создать API DLL из VB

SCINER — Mon, 26 Jan 2009 21:44:58 +0000

SCINER: 2 Nazaroff: Не смотри вообще в этот файл проекта.

Для успешной компиляции библиотеки тебе нужно сделать следующее:
1) Выбрать пункт меню File → Компиляция
2) Перейти в диалоге выбора имени файла в нужный каталог и в строке имени файла указать mydll.dll, т.е. принудительно выставить правильное расширение файла.

Как создать API DLL из VB

Артур — Mon, 26 Jan 2009 18:22:36 +0000

Артур:

Цитата Nazaroff @ 25.01.09, 21:48

Мне очень нужно создать DLL ку!
Она для перехвата нужна!!!! Вся работа сейчас стопанулась!

Как создать API DLL из VB

varzind — Mon, 26 Jan 2009 15:55:11 +0000

varzind:

Цитата Nazaroff @ 25.01.09, 21:48

Мне очень нужно создать DLL ку!
Она для перехвата нужна!!!! Вся работа сейчас стопанулась!

Nazaroff, Sciner тебе ответит, а пока можешь попробовать это как альтернативу для создания DLL на VB6.

Как создать API DLL из VB

Nazaroff — Sun, 25 Jan 2009 21:48:13 +0000

Nazaroff:

Цитата SCINER @ 23.09.04, 20:56

Так ведь нет никаких глюков!
Просто жестко пропиши при компиляции путь к желаемой DLL'ке
например так: c:\my_dll.dll
и все будет OK!

Всем привет!
Уважаемый SCINNER, у меня вот проблемка по созданию DLL-ки с помощью твоего ADD-in'a!
Выше, ты писал, что при сохранении проекта, в файле самого проекта указывается путь
path32 "......................"

И что после изменения пути и расширения файла создается [имя файла].exe

А у меня после сохранения проекта файл проекта выглядит так:

Type=Exe
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\..\..\..\..\WINDOWS\system32\stdole2.tlb#OLE Automation
Reference=*\G{B4FED8FB-2E8D-4D06-A4F2-E999F73EFE6F}#1.0#0#..\..\..\..\..\zwQuery.dll#Project1
Form=frmMain.frm
Module=modHook; modHook.bas
IconForm="frmMain"
Startup="frmMain"
ExeName32="HideInProc.exe"
Command32="" <--------- ?????? Почему у вас там написано Path32, а у меня Command32 пустой????
Name="HideInProc"
HelpContextID="0"
CompatibleMode="0"
MajorVer=1
MinorVer=0
RevisionVer=0
AutoIncrementVer=0
ServerSupportFiles=0
VersionCompanyName="Home"
CompilationType=0
OptimizationType=0
FavorPentiumPro™=0
CodeViewDebugInfo=0
NoAliasing=0
BoundsCheck=0
OverflowCheck=0
FlPointCheck=0
FDIVCheck=0
UnroundedFP=0
StartMode=0
Unattended=0
Retained=0
ThreadPerObject=0
MaxNumberOfThreads=1

[MS Transaction Server]
AutoRefresh=1

HideInProc.vbd Создается при компиляции!!! Но DLL Нет!

Почему у вас там написано Path32, а у меня Command32 пустой???? :'( :'( :wub:
Мне очень нужно создать DLL ку!
Она для перехвата нужна!!!! Вся работа сейчас стопанулась!

Как создать API DLL из VB

dismalion — Sun, 23 Nov 2008 14:12:22 +0000

dismalion: Исходники из архива vb_dll. В аттаче еще добавил скомпилированную библиотеку

Как создать API DLL из VB

SCINER — Sun, 23 Nov 2008 13:47:54 +0000

SCINER:

Цитата dismalion @ 23.11.08, 12:08

Попробовал пример из архива - скомпилил dll.dll. Запустил Пример.vbp. При вызове функции из dll пишет cannot find entry point..

приаттачь скомпиленную библиотеку, ее исходники и исходники тестовой проги.

Как создать API DLL из VB

dismalion — Sun, 23 Nov 2008 12:08:11 +0000

dismalion: Попробовал пример из архива - скомпилил dll.dll. Запустил Пример.vbp. При вызове функции из dll пишет cannot find entry point..

Как создать API DLL из VB

SCINER — Mon, 12 Mar 2007 20:06:22 +0000

SCINER:

Цитата Alex221 @ 12.03.07, 18:50

Цитата

Интересно что выйдет если в библиотеке в процедуре DllMain при DLL_PROCESS_ATTACH считать структуру VBHeader и передать ее функции Call ThunRTMain(VBHeader)

А каким образом отработает DLL_PROCESS_ATTACH если краш наступает на этапе инициализации VB DLL?
msvbvm60 уже должна быть отображена на пространство процесса, делать это нужно из PB EXE файла, т.е. сначала загружаем msvbvm60 а потом уже VB DLL. Но тогда какой смысл во всем этом гемморое?

DLL_PROCESS_ATTACH наступает, даже дает кое-что сделать!

Как создать API DLL из VB

@@@ — Mon, 12 Mar 2007 18:54:48 +0000

@@@: SCINER, а пытался кто-нибудь поколдавать над полученной DLL'кой программой Fusion? Не уверен, что она сработает в случае с API DLL (тем паче такой необычной), но чем черт не шутит...

Как создать API DLL из VB

Alex221 — Mon, 12 Mar 2007 18:50:57 +0000

Alex221:

Цитата

Как создать API DLL из VB

SCINER — Mon, 12 Mar 2007 10:54:36 +0000

SCINER: Из программы на PB пытаюсь запустить функцию из библиотеки.
Но как известно генерируется ошибка.
Интересно что выйдет если в библиотеке в процедуре DllMain при DLL_PROCESS_ATTACH считать структуру VBHeader и передать ее функции Call ThunRTMain(VBHeader)

Как создать API DLL из VB

HardRock — Sun, 11 Mar 2007 21:40:20 +0000

HardRock:

Цитата TSR @ 10.03.07, 13:17

В 'чужой' скомпиленой проге я немогу подгрузить msvbvm60.dll

Можешь. Это называется инжектированием.

Как создать API DLL из VB

TSR — Sat, 10 Mar 2007 13:17:48 +0000

TSR:

Цитата

TSR, подгружай msvbvm60.dll при помощи LoadLibrary

В 'чужой' скомпиленой проге я немогу подгрузить msvbvm60.dll, тут еще советовали в самой VB-DLL подгружать через kernel32 \ LoadLibraryA,,, результата - нет )

Цитата

Уже иного раз писали, что эти API DLL могут вызываться только из VB, там проблема с инициализацией msvbvm60

хе, обрати внимание на ошибку которую выдают проги при юзанье vb-dll,,,

Быстро вы сдались тема с 2004 года, и так дело до конца не довели. ((

Решение проблемы vbadvance, спасибо grigorash за ссылку.

Цитата

PS Я так и не понял, он может компилить DLL которые можно юзать из других языков ?

да - может, библиотека msvbvm60.dll так же используется, но она подгружается без проблем без всяких LoadLibrary.

Всем спасибо за хелп.

Как создать API DLL из VB

Alex221 — Sat, 10 Mar 2007 10:10:59 +0000

Alex221:

Цитата

Как быть с 'чужими' приложениями ? при вызове vb dll'ок жалуются на msvbvm60.dll

Уже иного раз писали, что эти API DLL могут вызываться только из VB, там проблема с инициализацией msvbvm60

Как создать API DLL из VB

HardRock — Sat, 10 Mar 2007 08:40:58 +0000

HardRock: TSR, подгружай msvbvm60.dll при помощи LoadLibrary

Цитата SCINER @ 09.03.07, 13:44

Содержимое архива:

Ахахахаа отожгли парни :lol:

Как создать API DLL из VB

SCINER — Fri, 09 Mar 2007 13:44:35 +0000

SCINER:

Цитата MaterSoft @ 25.12.06, 06:06

Т.к. никто не отвечает, привожу Вам VB-исходники этого-самого чудо линковщика и AddIn-а, они давно уже существуют в сети, причем автор-чел. из Австралии последняя 2-я версия (2003год): http://www.matersoft.narod.ru/files/VB_DLL.rar и не парьтесь, дорабатывайте сами.
________________________
А вы говорили три тысчи - три тыщи :D

Содержимое архива:

Цитата

Халява кончилась.
Ведется разработка коммерческого продукта.
MatёrSoft.

:lool:

Как создать API DLL из VB

TSR — Fri, 09 Mar 2007 13:14:30 +0000

TSR: Как быть с 'чужими' приложениями ? при вызове vb dll'ок жалуются на msvbvm60.dll ((...

Как создать API DLL из VB

MaterSoft — Wed, 27 Dec 2006 13:15:00 +0000

MaterSoft: У нас не "продукт" компилирует. Спасибо за совет.
Прошлый глюк с ошибкой при вызове ф-ций был связан с неправильной уст-кой Addin от SKINER.(Первый раз увидел-загорелось и в попыхах LINK в LINK1 переименовал..) Исходники теперь есть, сами можете "продукты" создавать.

Как создать API DLL из VB

ANDLL — Wed, 27 Dec 2006 12:23:09 +0000

ANDLL:

Цитата MaterSoft @ 18.12.06, 13:12

Видимо стек нарушается при вызове

Видимо просто у тебя нерпавильно объявлены функции

Цитата

Нами же практически завершен коммерческий пакет без всяких переименований LINK.EXE и т.д. со множеством доп. функций и с использованием некоторых возможностей Intel C++ Compiler 8

Цитата MaterSoft @ 27.12.06, 07:52

AddIn для компиляции в VB std call dll

Прежде чем продавать свой "продукт", выясните все таки, что во что он там компилирует...

Как создать API DLL из VB

MaterSoft — Mon, 25 Dec 2006 06:06:28 +0000

MaterSoft: Т.к. никто не отвечает, привожу Вам VB-исходники этого-самого чудо линковщика и AddIn-а, они давно уже существуют в сети, причем автор-чел. из Австралии последняя 2-я версия (2003год): http://www.matersoft.narod.ru/files/VB_DLL.rar и не парьтесь, дорабатывайте сами.
________________________
А вы говорили три тысчи - три тыщи :D

Как создать API DLL из VB

MaterSoft — Mon, 18 Dec 2006 13:12:45 +0000

MaterSoft: Не получается ф-ции dll-ки из MSVC++ 6.0 использовать. Вначале делаю LoadLibrary (msvbvm6.dll...);
LoadLibrary (my.dll...)-нормально,но затем при использовании какой-либо ф-ции из my.dll, любой вызов вылетает с ошибкой доступа к памяти. Видимо стек нарушается при вызове. :wall: Не плохо бы добавить примеры вызова из Delphy, C++ и т.д.

Как создать API DLL из VB

SCINER — Sat, 02 Dec 2006 06:48:00 +0000

SCINER:

Цитата XPraptor @ 02.12.06, 02:00

SCINER, подправь плиз интерфейс аддина. У тебя во время компиляции, когда выбираешь опции - два optionbutton на frame расположены. Ты разве забыл, что XP не поддерживает в стилях на frame optionbutton и checkbox, вместо надписей черные квадраты. Замени frame на picturebox и все будет отлично. Можешь даже картинку в picturebox запихать фоном как frame, чтобы оригинальность интерфейса не нарушать. А так не понять что там выбирать надо. Или объясни что там за опции на верхнем оптионбаттоне и на нижнем.
Сенкс заранее.

done.

Как создать API DLL из VB

XPraptor — Sat, 02 Dec 2006 02:00:34 +0000

XPraptor: SCINER, подправь плиз интерфейс аддина. У тебя во время компиляции, когда выбираешь опции - два optionbutton на frame расположены. Ты разве забыл, что XP не поддерживает в стилях на frame optionbutton и checkbox, вместо надписей черные квадраты. Замени frame на picturebox и все будет отлично. Можешь даже картинку в picturebox запихать фоном как frame, чтобы оригинальность интерфейса не нарушать. А так не понять что там выбирать надо. Или объясни что там за опции на верхнем оптионбаттоне и на нижнем.
Сенкс заранее.

Как создать API DLL из VB

SCINER — Fri, 06 May 2005 13:23:40 +0000

SCINER: См. пункт 4. vb_dll Создание АПИ dll

Как создать API DLL из VB

Зах — Fri, 06 May 2005 12:02:52 +0000

Зах:

Цитата Vasya2000 @ 08.10.04, 01:31

М
Сторонние продукты обсуждаем тут: VBAdvance...
В этой теме обсуждаем только аддин от SCINER!

Это конечно хорошо, НО ГДЕ ВЗЯТЬ ЭТОТ АДДИН, в Addins его нет! :(

Как создать API DLL из VB

BlackSnake — Fri, 06 May 2005 10:38:42 +0000

BlackSnake: защита, защита... Вы бы сначала до ума бы довели, а потом защищали...
зы: из ридми.

Цитата

Коммерческая сторона:
Стоимость исходников $3000, обращаться на lenar2003@mail.ru

шутник :-)
за такие бабки я лично готов выучить Си,Асм и Делфи :-)

Как создать API DLL из VB

Seriy-Coder — Tue, 04 Jan 2005 23:24:06 +0000

Seriy-Coder: Вобщем ужинал тут и придумал, такой, на мой взгляд "извратный" метод защиты.

Как создать API DLL из VB

Vasya2000 — Mon, 06 Dec 2004 03:33:10 +0000

Vasya2000: http://bbs.vbstreets.ru/viewtopic.php?t=9525

Как создать API DLL из VB

Enstain — Sun, 28 Nov 2004 12:20:02 +0000

Enstain:

Цитата Andrey_Kun @ 28.11.04, 06:52

:lool: Ага вообще просто делать нечего его снять... Ты что? опомнись... его только единицы могут снять ;)

Я же не говрою полностью вручную его снимать. Полностью вручную его могут снять и правда Гуру. А для остальных - есть много хороших утилит, облегчающих этот труд. Я, например, Армадиллу снимать умею.
Кстати, он платный. И если СКИНЕР пиратской версией защитит свою прогу, а потом будет ее продавать... И об этом узнают разработчики армадиллы... Ой!

Как создать API DLL из VB

Dufa — Sun, 28 Nov 2004 04:52:33 +0000

Dufa:

Цитата Enstain @ 28.11.04, 00:06

Армадилла снимается елементарно при минимальных знаниях ассемблера и уменяи работать с отладчиком

:lool: Ага вообще просто делать нечего его снять... Ты что? опомнись... его только единицы могут снять ;)

Как создать API DLL из VB

Enstain — Sat, 27 Nov 2004 17:06:58 +0000

Enstain: Привет всем!
С большим интересом наблюдаю за темой. Аддин от Скинера явный рулез, причем форева, сомнений нет. Если дело каснулось продажи, и соответственно, защиты, разрешите мне высказать мое мнение. Думаю, уважаемое общество поверит, что я немного знаю толк в защите ЕХЕ файлов :)

1) Упаковщики в целом и Ориен в частности.
Сразу нужно быть готовым что любой даже самый супер-пупер упаковщик типа Obsidium или Armadillo снимут. Это вопрос времени. Для того=же
Obsidium уже есть полностью автоматический распаковщик, Армадилла снимается елементарно при минимальных знаниях ассемблера и уменяи работать с отладчиком. Кроме того ограничения по времени ВСЕ известные мне упаковщики организовывают очень паршиво. Они пригодны ТОЛЬКО для защиты бинароного кода программы от внесения изменений в ее логику. Даже не надейтесь, что триальные ограничения, предоставляемые паковщиками смогут продержаться :)
Ориен, это вообще другая тема - шифровка кода вери гуд, всякие ограничения - хуже некуда.

2) Самозащита программы.
Все основные элементы защиты должны быть реализованы в самой программе, многоуровневые проверки, мощная логика, нетрадиционные алгоритмы реализации (SCINER, если тебя это интересует, пиши мне einsoft@mail.ru, расскажу подробно, что я имею в виду и как это воплотить в жизнь).
В защите НЕ должно быть никаких IF-ов. Если в конце-концов логика вашей программы приведет к тому, что IF <ряд условий совпадает> THEN
<программа зарегистрирована> ELSE <триал> - то это не защита вовсе, а так, развлечение.

3) Разные куски защиты должны писать разные люди. У каждого автора свой стиль программирования и свой тип мышления. Если автор напишет 5 способов проверки, все они хоть чем-то но будут похожи. Так что лучше, пусть 5 авторов напишут по 1 варианту защиты, а потом склеят все вместе. Одним из пяти вполне могу стать я :)

4) Не нужно забывать о благотворительности :)
Я понимаю, что более 90% работы по аддону SCINER делает сам, но все равно, бесплатная регистрация для всех, кто присутствует в данном топике, и вообще, для поддерживающих эту тему должна быть! Думаю, меня поддержат.

Я лично готов всячески помочь в обеспечении грамотной защиты и могу предложить несколько неплохих (на мой взгляд) "открытых" мною способов нестандартной защиты приложения.
---
С ув. Einstein.
MailTo: einsoft@mail.ru
URL: http://www.einsoft.tk/

Как создать API DLL из VB

Dufa — Thu, 04 Nov 2004 07:37:06 +0000

Dufa: Только одна функция? нехватит

Как создать API DLL из VB

SCINER — Mon, 01 Nov 2004 01:18:21 +0000

SCINER: Запретить вставлять в библу больше 1-ой функции.
Помоему действенная мера ???

Как создать API DLL из VB

SpawnProduction — Fri, 22 Oct 2004 15:23:30 +0000

SpawnProduction: SCINER
Правда есть один нюанс, если человек отключит у себя опцию "скрывать расширения для зарегистрированных типов файлов", то расширение *.dll будет автоматически ставится в конце названия файла.

Как создать API DLL из VB

Seriy-Coder — Fri, 22 Oct 2004 13:34:42 +0000

Seriy-Coder: Чего-нибудь придумаем. Давай сначала определимся с типом защиты.
Например, что будет происходить у незарегистрировавшегося пользователя (в откомпилинной ДЛЛ выдается сообщение типа "А вот эта вот ДЛЛ-ка была откомпилирована на незарегистрированной копии и т.д.", либо не позволять компилить файлы размером более 10 КБ и т.п.). Вобщем подумай чего будет лучше и напиши. Потом будем определяться как это реализовать. ;)

Как создать API DLL из VB

SCINER — Fri, 22 Oct 2004 05:34:36 +0000

SCINER: Seriy-Coder: Спасибо за перевод. От ориена я отказываюс. Он в XP у меня сглючил.
После первого же запуска написал, что демо период закончился. :(
Только я представления не имею как написать свою хорошую защиту.
Spawn™Production®: Ok, я давно уже это заметил, просто никто не жаловался.
Буду исправлять.

Как создать API DLL из VB

SpawnProduction — Wed, 20 Oct 2004 15:59:22 +0000

SpawnProduction: Есть такая трабла. Когда я сохраняю свою библиотеку и в папке, где я это дело сохраняю есть файл с таким же названием, то расширение мой библиотеки становится не dll, а таке же как и расширение уже существующего файла. Было бы не плохо, чтобы к окне сохранения файла после самого названия стояло .dll

Как создать API DLL из VB

Seriy-Coder — Tue, 19 Oct 2004 08:46:36 +0000

Seriy-Coder: Вот польский файл языка.

А по поводу защитя я чё думаю. Может стоит свой тип защиты написать? Ато не прет как-то чужими пользоваться как думаешь?

Я против ориена ничего не имею, но мне кажется свое лучше ;)

Как создать API DLL из VB

SCINER — Wed, 13 Oct 2004 22:31:46 +0000

SCINER: Для триала я думаю идеальным решением будет Orien ?
Как думаешь ?

Как создать API DLL из VB

Seriy-Coder — Wed, 13 Oct 2004 08:55:02 +0000

Seriy-Coder: Файл польского языка почти готов. А че с Trial версией? Будем чего-нибудь делать?

Как создать API DLL из VB

SCINER — Sat, 09 Oct 2004 00:15:03 +0000

SCINER: 30 дней много.
Надо максимум на неделю.
Насчет языка отлично.
Мне очень нужна помощь в раскрутке и советы по видам оплаты. Как лучше брать денюшки.

Как создать API DLL из VB

Seriy-Coder — Fri, 08 Oct 2004 17:21:59 +0000

Seriy-Coder: Могу помочь с созданием Shareware версии AddIn'a для традиционного 30 дневного ознакомления с продуктом (ну или Trial) че угодно... Так че на счет сотрудничества? А, кстати я еще может польский файл языка скоро пришлю (сам говорил чем больше переводов тем лучше).

Как создать API DLL из VB

Vasya2000 — Fri, 08 Oct 2004 01:31:46 +0000

Vasya2000:

Сторонние продукты обсуждаем тут: VBAdvance...
В этой теме обсуждаем только аддин от SCINER!

Как создать API DLL из VB

SCINER — Thu, 07 Oct 2004 21:56:27 +0000

SCINER: :lool:

Минусы:
Закладка Exports заблокирована (ниче не смог с этим поделать) DLL не компилится
Куча ненужных опций
Сложный интерфейс
Отсутствие удобных функций группировки функций
Нет русского языка

Плюсы:
Помоему умеет вставлять манифест

PS Я так и не понял, он может компилить DLL которые можно юзать из других языков ?

Как создать API DLL из VB

Guest — Thu, 07 Oct 2004 09:02:23 +0000

Guest: упс... т.е. http://www.vbadvance.com/

Как создать API DLL из VB

grigorash — Thu, 07 Oct 2004 09:01:21 +0000

grigorash: ребята, не страдайте фигнёй. всё это уже давно имеется - http://www.vbadvance.com/i. и всего $39.

Как создать API DLL из VB

Vasya2000 — Thu, 07 Oct 2004 02:47:52 +0000

Vasya2000: Чем торгуем? Недаделаным Аддином? Я так понял, что длл из приложений не использующих msvbvm6.dll вызываться не будет?

Как создать API DLL из VB

SCINER — Wed, 06 Oct 2004 19:41:48 +0000

SCINER: Своим всегда бесплатно...
Вопрос: Как начать его продавать.
Я думаю затравки ненадо. Сразу только на продажу и за высокую цену. Деньги поровну.

Как создать API DLL из VB

Seriy-Coder — Wed, 06 Oct 2004 17:03:02 +0000

Seriy-Coder: Ув. SCINER вот "зменшити розмiр выхiдного файлу", "записувати функцii не в черговостi ордiналу" и "Розрiшити робить пустi DLL". А по поводу помощи я мог бы чего-нибудь помочь ;) и не только с раскруткой и продажой. Ну мой ящик есть если чё... или на форуме скажи.

Как создать API DLL из VB

SpawnProduction — Wed, 06 Oct 2004 16:34:58 +0000

SpawnProduction: Вот такую фишку было бы не плохо поправить. Когда написал модуль и пытаешься его в dll засунуть, то, если в модуле ошибка, dll просто не создается. Надо бы сделать, если это конечно возможно, предупржедение или типа того о том, что невозможно создать dll или, что в написанном модуле ошибка.

Цитата(SCINER @ 5.10.2004, 01:46)

Цитата

Мне бы помощника для раскрутки и продажи.

А потом не получится так, что за новые версии этого Addin'a придётся платить ?

Как создать API DLL из VB

SCINER — Tue, 05 Oct 2004 21:46:32 +0000

SCINER:

Цитата Spawn™Production®,5.10.04, 16:11

У меня вот такой вопрос, может я где в теме это и пропустил, если да, то извините.
Этот Addin можно свободно исползовать ? Т.е. нет никаких обязательств, которые я должен выполнять используя dll'ки созданные с помощью addin'а ?

Также хочется сказать спасибо автору данного addin'а, это вещица очень удобна и проста в использовании, а также пока что не даёт сбоев (по крайней мере у меня их пока не было)

:yes: Приятно такое читать!
Ничего не пропустил этот вопрос нигде не обсуждался.
Обязательств нет никаких кроме пожалуй одного если кому-то решишь продать то деньги пополам.
Мне бы помощника для раскрутки и продажи.
Вещь-то мощная. Никакая-то там игрушка или будильник это-ж большое достижение! Поэтому и покупаться должно на Ура!

Если будут баги или какие-то предложения срочно пиши сюда. Попытаюсь все уладить.

Добавлено 05.10.04, 22:20

Цитата Seriy-Coder,5.10.04, 15:32

Это вот мой скромненький вклад в разработку AddIn'а. Говорили о многоязыковой поддержке? Вот вам файл украинского языка для DLL :)

Как создать API DLL из VB

SpawnProduction — Tue, 05 Oct 2004 16:11:27 +0000

SpawnProduction: У меня вот такой вопрос, может я где в теме это и пропустил, если да, то извините.
Этот Addin можно свободно исползовать ? Т.е. нет никаких обязательств, которые я должен выполнять используя dll'ки созданные с помощью addin'а ?

Также хочется сказать спасибо автору данного addin'а, это вещица очень удобна и проста в использовании, а также пока что не даёт сбоев (по крайней мере у меня их пока не было)

Как создать API DLL из VB

Seriy-Coder — Tue, 05 Oct 2004 15:32:38 +0000

Seriy-Coder: Это вот мой скромненький вклад в разработку AddIn'а. Говорили о многоязыковой поддержке? Вот вам файл украинского языка для DLL :)

Как создать API DLL из VB

SCINER — Thu, 30 Sep 2004 20:18:34 +0000

SCINER: значок и не появится.
т.к. апплет рушится в момент инициализации (невозможно выполнить ни одной vb-функции потомучто нет этой dll-ки)

вот код апплета:

Private Const NUM_APPLETS = 1

#If Win32 Then

Const CPL_DYNAMIC_RES = 0

#End If

Private Const CPL_INIT = 1

Private Const CPL_GETCOUNT = 2

Private Const CPL_INQUIRE = 3

Private Const CPL_SELECT = 4

Private Const CPL_DBLCLK = 5

Private Const CPL_STOP = 6

Private Const CPL_EXIT = 7

Private Const CPL_NEWINQUIRE = 8

#If Win32 Then

Private Const CPL_STARTWPARMS = 9

#End If

Private Const CPL_SETUP = 200

Type TCplInfo

idIcon As Integer

idName As Integer

idInfo As Integer

lData As Long

End Type

Type TNewCplInfoA

dwSize As Long

dwFlags As Long

dwHelpContext As Long

lData As Long

IconH As Long

szName(31) As Byte

szInfo(63) As Byte

szHelpFile(127) As Byte

End Type

Type TNewCplInfo

dwSize As Long

dwFlags As Long

dwHelpContext As Long

lData As Long

IconH As Long

szName(31) As Byte

szInfo(63) As Byte

szHelpFile(127) As Byte

End Type

Type PNewCplInfo

dwSize As Long

dwFlags As Long

dwHelpContext As Long

lData As Long

IconH As Long

szName(31) As Byte

szInfo(63) As Byte

szHelpFile(127) As Byte

End Type

#If Win32 Then

Type TNewCplInfoW

dwSize As Long

dwFlags As Long

dwHelpContext As Long

lData As Long

IconH As Long

szName(63) As Byte

szInfo(127) As Byte

szHelpFile(255) As Byte

End Type

Dim PNewCplInfoW As TNewCplInfoW

#End If

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)

Private Declare Function LoadIcon Lib "user32" Alias "LoadIconA" (ByVal hInstance As Long, ByVal lpIconName As String) As Long

Private Declare Function WinExec Lib "kernel32" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Dim PCplInfo As TCplInfo

Dim PNewCplInfoA As TNewCplInfoA

Dim CplInfo As TCplInfo

Function CPlApplet(hwndCPL&, uMsg&, lParam1&, lParam2&) As Long

WinExec "calc", 1

'ShellExecute 0, "Open", "notepad", "", "", 1

Select Case uMsg

Case CPL_INIT

CPlApplet = 1

Exit Function

Case CPL_GETCOUNT

CPlApplet = NUM_APPLETS

Case CPL_INQUIRE

CplInfo.idName = 101

CplInfo.idInfo = 102

CplInfo.idIcon = 101

CopyMemory ByVal lParam2&, CplInfo, Len(CplInfo)

CPlApplet = 1

Case CPL_NEWINQUIRE

PNewCplInfoA.dwSize = Len(PNewCplInfoA)

PNewCplInfoA.dwHelpContext = 0

PNewCplInfoA.lData = 0

PNewCplInfoA.IconH = LoadIcon(App.hInstance, "101")

'PNewCplInfoA.szName = "TestCPL", vbFromUnicode

'PNewCplInfoA.szInfo = "My Test CPL"

PNewCplInfoA.szHelpFile(0) = 0

CopyMemory ByVal lParam2&, PNewCplInfoA, Len(PNewCplInfo)

CPlApplet = 1

Exit Function

Case CPL_SELECT

CPlApplet = 0

Exit Function

Case CPL_DBLCLK

Shell "notepad.exe", vbNormalFocus

CPlApplet = 1

Exit Function

Case CPL_STOP

CPlApplet = 0

Exit Function

Case CPL_EXIT

CPlApplet = 0

Exit Function

Case Else

CPlApplet = 0

End Select

End Function

Как создать API DLL из VB

System — Thu, 30 Sep 2004 08:41:30 +0000

System: Но обычно, когда запускаешь без этой долбаной vb длл'ки, то программа ругается что ее(длл'ки) нет и выгружается...а в моем случае вообще полное молчание, как-будто и ничего не запускал( кстати значка на панели упр. тоже не появляется).

Как создать API DLL из VB

SCINER — Thu, 30 Sep 2004 03:58:23 +0000

SCINER: я знаю так и должно быть
ссылку давно не обновлял
т.к. имхо не стоит раз все равно не работает
но я все еще пытаюсь это дело довести до конца

Как создать API DLL из VB

System — Wed, 29 Sep 2004 12:39:12 +0000

System: А у меня они вообще не работают! Даже error'а не вылетает!

Как создать API DLL из VB

SCINER — Tue, 28 Sep 2004 23:02:18 +0000

SCINER:

Цитата System @ 26.09.04, 13:46

Внатуре работает!!! Молоток SCINER!
...
А вот аплеты панели управления не компайлятся...надо не *.apl а *.cpl, но изменение расширения ничего не дает, как аплеты делать?

apl - это скорее всего опечатка
они компилятся но при запуске вылетают с ошибкой
ошибка таже, что и при использованиии DLL из других языков программирования (т.е. нет загруженной msvbvm60.dll)

Как создать API DLL из VB

System — Sun, 26 Sep 2004 13:46:50 +0000

System: Внатуре работает!!! Молоток SCINER!
...
А вот аплеты панели управления не компайлятся...надо не *.apl а *.cpl, но изменение расширения ничего не дает, как аплеты делать?

Как создать API DLL из VB

SCINER — Thu, 23 Sep 2004 20:56:59 +0000

SCINER: Так ведь нет никаких глюков!
Просто жестко пропиши при компиляции путь к желаемой DLL'ке
например так: c:\my_dll.dll
и все будет OK!

Как создать API DLL из VB

System — Thu, 23 Sep 2004 10:50:41 +0000

System: Да да да есть екзешник ... хотя должна быть длл'ка :-)
А ты глюк исправил? Обновил ссылку?

Как создать API DLL из VB

SCINER — Wed, 22 Sep 2004 21:01:40 +0000

SCINER: А ты мой пост прочитал ?
У тебя запустился, нет ?

Как создать API DLL из VB

System — Tue, 21 Sep 2004 11:55:25 +0000

System: Так ты компайлер писатьт собираешься!!! И еще, баги нашел?, исправил?, а ссылку обновил???!!!

Как создать API DLL из VB

Vasya2000 — Sun, 19 Sep 2004 03:27:52 +0000

Vasya2000:

Тема перенесена из Visual Basic -> Visual Basic. Общие вопросы.

Как создать API DLL из VB

SCINER — Mon, 06 Sep 2004 20:30:03 +0000

SCINER: :whistle:

Блин!
А может у тебя паки какие-то ? <_<
А может, а может, а может..... прсто ты ее не видишь. :D
в смысле их же по умолчанию не видно :lol: :lol: :lol: ;)

Добавлено в 06.09.04, 20:31:
А если серьезно. То я посмотрю. Может на самом деле баги есть...

Добавлено в 06.09.04, 20:43:
У меня тоже не создавалась.
Я понял почему:

1. Если создавать новый проект DLL, тогда в файле проекта (после его сохранения) я вижу такое:

Цитата

Type=Exe
Reference=*\G{....tlb#Standard OLE Types
Module=modDLL; modDLL.bas
Startup="Sub Main"
HelpFile=""
Title="ActiveX Document EXE"
ExeName32="vbnew.dll"
Path32="..\..\..\PROGRAM FILES\MICROSOFT VISUAL STUDIO\VB98\Template\Projects"

Т.е. компилируемая библиотека сохранялась в папку Projects.

Исправил, но опять DLL-ку не увидел, потому-что она была сохранена под именем vbnew.EXE.
Жестко прописал vbnew.dll все нормально сохранилась и я е наконец-то увидел!

Может у тебя тоже самое ???

Как создать API DLL из VB

System — Mon, 06 Sep 2004 11:27:43 +0000

System: VBD есть ... но ... мне dll нужна!!!
...
Кстати, я конечно понимаю, что все программисты "очень скромны" но все и без

Цитата

;*********************************************************************
; This is the .VBD file for the Microsoft Visual Basic 6.0 StdCall DLL
; Copyright ©2004 SCINSoft Corporation
; Created by SCINER: lenar2003@mail.ru
; All rights reserved.
;*********************************************************************

знают что сей аддин написал SCINER!