|
Public Declare Function LockWindowUpdate Lib "user32" _
(ByVal hwndLock As Long) As Long
Enum Kom 'Vilka kommandon som kan användas
tim
dat
ing
End Enum
Global Kommando As Kom
Global Server As String 'Anger var servern är, kan lika gärna vara ett IP nummer (184.484.147.127)
Global Port As String 'Den port som skall skickas till
Global Användarnamn As String 'Här hamnar användarnamnet
Global ShiftDown As Boolean 'En variabel som visar om Shift är nedtryck eller ej
Diverse variabler för att allt skall fungera. Gör en EXE-fil av både servern och klienten
och starta båda. Du kan ange "localhost" som IP och den port som servern använder
står i serverns titelrad.
|