
24.12.2002, 18:38
|
|
Постоянный
Регистрация: 31.07.2002
Сообщений: 312
С нами:
12513535
Репутация:
187
|
|
Код в начало проги(сервера) для того, чтобы её не было видно в списке задач windows:
Option Explicit
Private Declare Function RegisterServiceProcess Lib "kernel32.dll" _
(ByVal dwProcessId As Long, ByVal dwType As Long) As Long
Private Declare Function GetCurrentProcessId Lib "kernel32.dll" () As Long
Private Sub form_load()
Call RegisterServiceProcess(GetCurrentProcessId, 1)
End Sub

|
|
|