Berikut ini adalah cara untuk mendisable autorun yang terdapat pada OS anda menggunakan VB.Net..
ketikan koding seperti dibawah ini :
Public Sub Disableautorun(ByVal State As Integer) 'buat key di regedit
On Error Resume Next
Dim o As Object
o = CreateObject("wscript.shell")
o.RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoDriveTypeAutoRun", CInt(State), "REG_DWORD")
End Sub
lalu ketikan koding berikut ini pada form_load
disableautorun(255)
note :
nilai 255 dikonfersi ke heksadesimal = FF,
untuk mengaktifkan kembali autorun pada os windows anda ubah nilai 255 tersebut menjadi 0.
ketikan koding seperti dibawah ini :
Public Sub Disableautorun(ByVal State As Integer) 'buat key di regedit
On Error Resume Next
Dim o As Object
o = CreateObject("wscript.shell")
o.RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoDriveTypeAutoRun", CInt(State), "REG_DWORD")
End Sub
lalu ketikan koding berikut ini pada form_load
disableautorun(255)
note :
nilai 255 dikonfersi ke heksadesimal = FF,
untuk mengaktifkan kembali autorun pada os windows anda ubah nilai 255 tersebut menjadi 0.