PDA

Просмотр полной версии : [VisualBasic]? автозагрузка


A_V
07.05.2008, 16:19
собстно сабжжжж

добавленно:
блин чтож я такой тупой, извените не так гугла мучал...
вот решение, кому может пригодится....

Private Sub Command1_Click() 'Запись в реестр
Set Reg = CreateObject("WScript.Shell")
Reg.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Run \Имя твоей проги", "Путь к твоей проге"
End Sub

добавленно:
скажите как сделать самокопирование, или как узнать где находится определенный файл...

GROB_T
07.05.2008, 18:38
Самокопирование - CreateObject("Scripting.FileSystemObject").CopyFile App.Path + "\" + App.EXEName + ".exe", "Куда копировать"

узнать, где находится опр. файл имеется ввиду поиск по всему компу?

A_V
07.05.2008, 18:47
да нет, все всем большое спасибо, 2 раза спросил, 2 раза разобрался сам :) смотрите тему icq выложил свое мега творение :D

De-visible
07.05.2008, 20:35
да нет, все всем большое спасибо, 2 раза спросил, 2 раза разобрался сам :) смотрите тему icq выложил свое мега творение :D
Раз разобрался, тему закрою(пока тут болталку не сделали:))