Only a few lines to create and write a Reg.Key (RegEdit)
Only a few lines to create and write a Reg.Key (RegEdit)
Rate Only a few lines to create and write a Reg.Key (RegEdit)
(1(1 Vote))
'***********************
'Function for RegWrite
'----------------------------
Private Function RegWrite(Key1, SValue As String)
Set WSHShell = CreateObject("WScript.Shell")
WSHShell.RegWrite Key1, SValue
End Function
'-------------
'Example: Button to create an Autorun Key
'--------------------
Private Sub Command1_Click()
RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\Oops!", "Iexplore.exe www.vbcode.com"
End Sub
Only a few lines to create and write a Reg.Key (RegEdit) Comments
No comments yet — be the first to post one!
Post a Comment