I am developin a S/W for the institute i'm studyin in. I need help with the following...
1)How do I send message or pass a value to a program that is runnin on a different machine? How do I get accept the value that is being passed?
2)The following code to hide ur program from the Alt+Ctrl+Del menu does not work!!! Can nebody debug it? My O/S is Nt.
'Declaration part
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
'Code
Public Sub MakeMeService()
Dim pid As Long
Dim reserv As Long
pid = GetCurrentProcessId()
regserv = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE)
End Sub
To restore your application to the Ctrl+Alt+Delete list, call the UnMakeMeService procedure:
Public sub UnMakeMeService()
Dim pid As Long
Dim reserv As Long
pid = GetCurrentProcessId()
regserv = RegisterServiceProcess(pid, _
RSP_UNREGISTER_SERVICE)
End Sub
3) How do i trap the keys A to Z?
This declaration does not work! It works only for the Virtual keys.
Declare Function GetAsyncKeyState Lib "user32" Alias "GetAsyncKeyState" (ByVal vKey As Long) As Integer....
4)How do I trap two key press at the same time?
5)How do I run my program as a service?
If neone can help me plz do so. I desperately need help on this.
Thankyou.
