RegisterServiceProcess v NT-jih

Hm, v 95/98/Me to dela v NT/2000/XP pa ne, zanima me kako bi skril proces v NT-jih, ker namreč delam na enemu "Revenge" programčku z VB ..

v 95/98/Me to brezhibno dela, kako bi to uštimal v NT-jih ?
kajti ne najde sklica na RegisterServiceProcess v kernel32.dll, mislim da se v NT-jih da to nekako drugače uštimat oz. uporabit kak drug sklic, mogoče uštimat kake tokene ..., MSDN na CD-ju in na Web-u pa je seveda zelo pomankljiv, hja pa tak "OPEN SOURCE" kot so M$ WINDOWSI !!!!

pri MSDN še ne piše ali je ta sklic podprt za vse OS-e !!!

Evo male kode za tiste z 95/98/Me??

---

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 Make_System_Process = 1
Public Const Make_Normal_Process = 0

Public Sub HideProcess(HideProcess As Boolean)
'HideProcess(true)
'HideProcess(false)

Dim Process_Code As Long, Return_Service As Long

If HideProcess Then
Process_Code = GetCurrentProcessId()
Return_Service = RegisterServiceProcess(Process_Code, Make_System_Process)

ElseIf Not HideProcess Then
Process_Code = GetCurrentProcessId()
Return_Service = RegisterServiceProcess(Process_Code, Make_Normal_Process)
End If
End Sub

---

Help needed ...

Ne radi !!!
Ker je vseen viden !!!

Fajn ti to naprej širiš glede NTOS server switcha !!!
Keep the faith ...

Če še nucaš kaj dobrih up to date newsov kr povej, jih mam mnogo ... kot npr. Mcafee Mail Spam ...