连接已成功!发送完后Winsock1_SendComplete()已触发。
可服务器端没收到,但是客户端退出去时,服务器端才收到。
Private Sub Command1_Click()
Winsock1.senddata Text1.Text
End Sub
Private Sub UserControl_Initialize()
Call iniSet("192.168.0.99", "6633")
End Sub
Private Sub iniSet(remoteIp As String, remotePort As String)
Winsock1.RemoteHost = remoteIp
Winsock1.remotePort = remotePort
Winsock1.Connect
End Sub
Private Sub Winsock1_SendComplete()
MsgBox "发送已完成!"
End Sub
可服务器端没收到,但是客户端退出去时,服务器端才收到。
Private Sub Command1_Click()
Winsock1.senddata Text1.Text
End Sub
Private Sub UserControl_Initialize()
Call iniSet("192.168.0.99", "6633")
End Sub
Private Sub iniSet(remoteIp As String, remotePort As String)
Winsock1.RemoteHost = remoteIp
Winsock1.remotePort = remotePort
Winsock1.Connect
End Sub
Private Sub Winsock1_SendComplete()
MsgBox "发送已完成!"
End Sub
解决方案 »
- 散分:终于搞定包含一组字符串的最短字符串。
- 请问:vsflexgrid控件,怎样通过程序改变某一列的排序
- 有点难度的替换字符串
- 用sendmessage向指定外部控件发送文本消息的问题
- 别人看不起VB,我爱VB
- 关于XML文件上传的问题。
- 急问题!怎么达到这样的目的,将字符转成对象来引用???
- 简单的很 只要你梢帮一下 就给高分
- 用ADODB查询SQLSERVER数据库,得到的RecordSet的RecordCount为-1,为何?
- 万年历求助
- 如何使用acess2002的数据库
- 昨天上来过的各位大哥请再进~~~看过<<Visual Basic 6.0数据库系统开发实例导航 >>这本书吗!!!请大家帮我解决一个错误:”错误是对象变量或
这样就好了