VBNet - Форум - Опять про ресурсы

Вопрос: Опять про ресурсы Добавлено: 16.05.07 00:30

Автор вопроса: FiLiN

Посмотрите, почему не работает, т.е. почему не добавляет строку???

Private Sub Command1_Click()
Dim h As Long
Dim txt As String
'начать обновление ресурсов
h = BeginUpdateResource(App.Path & "\" & App.EXEName, 0)
'добавляем строку ресурсов
txt = "dobavit"
Call UpdateResource(h, "TEXT", 101, 1049, ByVal txt, Len(txt))
'закончить обновление ресурсов
Call EndUpdateResource(h, 0)
End Sub

Ответить

Ответы Всего ответов: 10

Номер ответа: 1 Автор ответа: *D o c a l* ICQ: 408802757 Вопросов: 76 Ответов: 985	Web-сайт: www.doc-source.pp.net.ua/ Профиль \| \| #1	Добавлено: 16.05.07 00:49
	Какаю ошыбку выбивает? Ответить

Номер ответа: 2 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #2	Добавлено: 16.05.07 01:43
	помилики нах вднк шукай гатовый премер и не . всем мозги, бо я паьяный злой и спать хочу Ответить

Номер ответа: 3 Автор ответа: FiLiN Вопросов: 9 Ответов: 22	Профиль \| \| #3	Добавлено: 16.05.07 01:43
	А никакую ошибку и не выбивает. Просто ничего не происходит. Забыл добавить, на всякий случай, объявления в модуле, может в этом объявлении что не так. 'обновление ресурсов Declare Function BeginUpdateResource Lib "kernel32" Alias "BeginUpdateResourceA" (ByVal pFileName As String, ByVal bDeleteExistingResources As Integer) As Integer Declare Function UpdateResource Lib "kernel32" Alias "UpdateResourceA" (ByVal hUpdate As Integer, ByVal lpType As String, ByVal lpName As String, ByVal wLanguage As Integer, ByRef lpData As Any, ByVal cbData As Integer) As Integer Declare Function EndUpdateResource Lib "kernel32" Alias "EndUpdateResourceA" (ByVal hUpdate As Integer, ByVal fDiscard As Integer) As Integer Ответить

Номер ответа: 4 Автор ответа: nguufxm6bo Вопросов: 0 Ответов: 27	Профиль \| \| #4	Добавлено: 16.05.07 01:43
	Потому что нельзя изменить работающую программу, к стати, App.EXEName возвращает имя без расширения. Ответить

Номер ответа: 5 Автор ответа: FiLiN Вопросов: 9 Ответов: 22	Профиль \| \| #5	Добавлено: 16.05.07 02:05
	Так мне чо 2 экзешника всегда с собой таскать чо ли? Один основная прога, а вторая меняет ресурсы? Так не пойдет. А есть альтернативы??? Ответить

Номер ответа: 6 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #6	Добавлено: 16.05.07 02:29
	Канешно, мутить всё в одном, потом когда надо изменить ресурс, извлекать какую-то дрянь из своей основной проги, запускать её, вырубать основую прогу, дрянь там меняет ресурсы у основной, и обратно её запускают.. Эдементарно ж Ватсон! Ответить

Номер ответа: 7 Автор ответа: FiLiN Вопросов: 9 Ответов: 22	Профиль \| \| #7	Добавлено: 16.05.07 02:38
	Что ты имеешь в виду под извлекать какую-то дрянь из своей основной проги . Можно по конкретней.? Ответить

Номер ответа: 8 Автор ответа: Bonapart ICQ: 175256 Вопросов: 32 Ответов: 108	Web-сайт: team16.tut.su Профиль \| \| #8	Добавлено: 16.05.07 07:43
	Доолнительную ехе'ху хранить в самой программе, извлекать,запускать,удалять Ответить

Номер ответа: 9 Автор ответа: FiLiN Вопросов: 9 Ответов: 22	Профиль \| \| #9	Добавлено: 17.05.07 00:00
	Люди, плиз, а есть у кого-нибудь подобные примеры??? Я без понятия как это сделать. Как хранить .ехе внутри .ехе? Никогда с таким не сталкивался. Если есть у кого-нить ссылочки, поделитесь пож. Ответить

Номер ответа: 10 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #10	Добавлено: 17.05.07 11:03
	Как не сталкивался? В ресурсах и храниш другой exe, точно так же извлекаешь и запускаешь... Ответить

Страница: 1 |