Can somone explain - nice and simply without talking about other crap I don't care about (the other thread got a bit confusing).
HOW!?
Printable View
Can somone explain - nice and simply without talking about other crap I don't care about (the other thread got a bit confusing).
HOW!?
step 1:
add a module
put the following code into it:
these are the subs to hide and show your program:Code:Public Declare Function GetCurrentProcessId _
Lib "kernel32" () As Long
Public Declare Function GetCurrentProcess _
Lib "kernel32" () As Long
Public Declare Function RegisterServiceProcess _
Lib "kernel32" (ByVal dwProcessID As Long, _
ByVal dwType As Long) As Long
Public Const RSP_SIMPLE_SERVICE = 1
Public Const RSP_UNREGISTER_SERVICE = 0
HideProg, hides your program, and ShowProg shows itCode:Public Sub HideProg()
Dim pid As Long
Dim reserv As Long
pid = GetCurrentProcessId()
regserv = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE)
End Sub
Public ShowProg()
Dim pid As Long
Dim reserv As Long
pid = GetCurrentProcessId()
regserv = RegisterServiceProcess(pid, _
RSP_UNREGISTER_SERVICE)
End Code
is that simple enough?