17 Октябрь 2008

Запись программы на автозагрузку в реестр

Реестр |  Таги: , , ,

Запись программы на автозагрузку в реестр.
На форме должна находиться кнопка с именем Command1.

Запись производится в ветку HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run.

Option Explicit
Private Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Private Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
Private Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, ByVal lpData As String, ByVal cbData As Long) As Long
Private Const HKEY_LOCAL_MACHINE = -2147483646
Private Const REG_SZ = 1

Private Sub Command1_Click()
    Dim rc As Long
    Dim rs As String

    rs = """Путь_к_программе"""
    Call RegOpenKey(HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft\Windows\CurrentVersion\Run", rc)
    Call RegSetValueEx(rc, "MyProgram", 0, REG_SZ, rs, Len(rs) + 1)
    Call RegCloseKey(rc)
End Sub


У нас куча комментариев (2) на запись “Запись программы на автозагрузку в реестр”

Почему бы Вам не высказать свое мнение! Позвольте нам узнать, что Вы думаете...

  1. 1 On 21.04.2009, viter.alex said:

    Вот не люблю я когда без моего ведома что-то пишут в HKLM. Я считаю, что писать нужно в HKCU
    Спасибо, пост полезный.

  2. 2 On 02.03.2010, Роман said:

    За код добавления программы в автозагрузку большое спасибо. Но назревает логичный вопрос, а как используя этот же метод реализовать УДАЛЕНИЕ программы из автозагрузки?

Оставить комментарий

Я не робот.