Hey,
I'm trying to have a parent type program made. 1 of the options to do is send a msgbox. For the Client I have this for the send button.
Which I get an error on but If I put in Winsock1.SendData "hello"Code:Private Sub Command2_Click() Winsock1.SendData Text2.Text, Value, Text1.Text End Sub
Then on the server the msgbox pops up with the msg but the title of the msg wont change. Here is the server getdata code.
Anyway to get the title and msg of the msgbox to show up and work correctly?Code:Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long) On Error Resume Next Dim msg As String Winsock1.GetData msg MsgBox msg End Sub




Reply With Quote