powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / EXE ресурс...?
5 сообщений из 5, страница 1 из 1
EXE ресурс...?
    #33594718
Angel-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ребята, как осуществить задуманное на VB 6.0? С помощью Resource Editora "законцервировать" в файл ресурса любой EXE-файл, а потом, скомпилировать все это... Позже, при необходимости, запускать ресурсный EXE-файл прямо с ресурса или же как то вытащить его оттудова. Подскажите или посоветуйте, пожалуйста?
...
Рейтинг: 0 / 0
EXE ресурс...?
    #33595252
Фотография nibbles
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Angel-KРебята, как осуществить задуманное на VB 6.0? С помощью Resource Editora "законцервировать" в файл ресурса любой EXE-файл, а потом, скомпилировать все это... Позже, при необходимости, запускать ресурсный EXE-файл прямо с ресурса или же как то вытащить его оттудова. Подскажите или посоветуйте, пожалуйста?
а чем не устраивает Inno Setup или тот же Packet Depl. Wizard?
...
Рейтинг: 0 / 0
EXE ресурс...?
    #33597996
Angel-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Конечно... но хотелось обойтись без помощи сторонних прикладных программ. Да и вообще, кто-то имеет понятие, как например вытащить из ресурса *.dll или *.exe, как это можно сделать?
...
Рейтинг: 0 / 0
EXE ресурс...?
    #33599632
marvan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1. На форму добавить кнопку и код:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Private Sub Command1_Click()
    Dim f As Byte
    Dim p As String
    On Error GoTo BkmErr
    f = FreeFile
    p = App.Path & "\test2.exe"
    If Len(Dir$(p)) >  0  Then Kill p
    Open App.Path & "\test2.exe" For Output As #f
    Print #f, StrConv(LoadResData("TEST", "EXE"), vbUnicode)
    Close #f
    Shell p
    Exit Sub
BkmErr:
    MsgBox "Ошибка" & vbNewLine & Err.Description, vbCritical
End Sub
2. Сохранить, скомпиллировать в "test.exe" и закрыть проект
3. Создать файл exe.rc с содержанием:
Код: plaintext
TEST EXE "test.exe"
Создать файл makeRes.bat с содержанием:
4.
Код: plaintext
"C:\Program Files\Microsoft Visual Studio\VB98\Wizards\RC.EXE" /r /fo exe.res exe.rc
5. Запустить makeRes.bat (должен появиться файл exe.res)
6. В блокноте открыть файл проекта Project1.vbp и добавить строку ResFile32="exe.res" (после строки Form=Form1.frm)
7. Открыть проект в среде разработки и ещё раз скомпиллировать в "test.exe".
8. Запустить test.exe и нажать кнопку.
Если я ничего не забыл и вы всё сделали правильно, из ресурсов программы загрузится ещё один экземпляр программы.
...
Рейтинг: 0 / 0
EXE ресурс...?
    #33599778
Melkiades
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да, не перевелись еще Кулибины на Руси... Респект!
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / EXE ресурс...?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]