Messenger
Haiii alle :o)Hvordan laver jeg en "netværks-messenger" ligesom WinPopup? Jeg ved godt hvordan man laver et program der sender men ikke hvordan man modtager :o) Hvordan gør man det? Min kode til at sende er:
Private Sub Command1_Click()
Open "C:\WINDOWS\messengerins.dll" For Input As #1
Line Input #1, linie
Close #1
Shell ("Net send " & linie & " " & Text1.Text)
Text1.Text = ""
End Sub
Private Sub Option1_Click()
Open "C:\WINDOWS\messengerins.dll" For Output As #1
Print #1, "brorscomputernavn"
Close #1
Text2.Enabled = False
End Sub
Private Sub Option2_Click()
Open "C:\WINDOWS\messengerins.dll" For Output As #1
Print #1, "farscomputernavn"
Close #1
Text2.Enabled = False
End Sub
Private Sub Option3_Click()
Open "C:\WINDOWS\messengerins.dll" For Output As #1
Print #1, "*"
Close #1
Text2.Enabled = False
End Sub
Private Sub Option4_Click()
Text2.Enabled = True
End Sub
Private Sub Text2_Change()
Open "C:\WINDOWS\messengerins.dll" For Output As #1
Print #1, Text2.Text
Close #1
End Sub
Hvordan laver man sådan at man også kan sende?
