winsock 的126错误 你是用TCP 还是用UDP?很有可能是SOCK通讯没有连接好,请确认两者初始连接!将你的代码贴出来看看! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我也遇见了这种情况,不过另人费解的是在VB中运行就没有问题,生成的EXE文件则会报告126错误。我用的UDP协议,服务器端代码如下:Private Sub cmdSend_Click() Call udpServer.SendData(txtSend.Text) txtOutput.Text = txtOutput.Text & _ "Send message:" & txtSend.Text & vbCrLf txtOutput.SelStart = Len(txtOutput.Text) txtSend.Text = ""End SubPrivate Sub Form_Load() Call udpServer.Bind(5000)End SubPrivate Sub Form_Terminate() Call udpServer.CloseEnd SubPrivate Sub udpServer_DataArrival(ByVal bytesTotal As Long) Dim message As String Call udpServer.GetData(message) txtOutput.Text = txtOutput.Text & vbCrLf & _ "From:" & udpServer.RemoteHostIP & _ vbCrLf & "Port #:" & Str$(udpServer.RemotePort) & _ vbCrLf & "Message:" & message & vbCrLf txtOutput.SelStart = Len(txtOutput.Text)End Sub VB 控件兼容问题 用datagrid控件显示,adodc控件更新以后,能否不要每次都修改datagrid控件的行宽? 怎么避免重复的名字? 我再也不想用VB了。我被害惨了。 文件传输(急) 问怎样可以通过vb程序向数据库的ole容器里添加图片,最好有代码? 一个ActiveX初学者的问题?等住用的,好急!!!!! 谢谢你们,但问题没解决,请看内容!!!!!急!!!!!!! 1、用户改变flexgrid的列宽或者行高时会激发什么事件? 请问哪里有WISE INSTALLER 8。1的汉化包? Data Report的显示和打印 好急啊,希望心中的迷惑能得到解答,敬请赐教
Private Sub cmdSend_Click()
Call udpServer.SendData(txtSend.Text)
txtOutput.Text = txtOutput.Text & _
"Send message:" & txtSend.Text & vbCrLf
txtOutput.SelStart = Len(txtOutput.Text)
txtSend.Text = ""
End SubPrivate Sub Form_Load()
Call udpServer.Bind(5000)
End SubPrivate Sub Form_Terminate()
Call udpServer.Close
End SubPrivate Sub udpServer_DataArrival(ByVal bytesTotal As Long)
Dim message As String
Call udpServer.GetData(message)
txtOutput.Text = txtOutput.Text & vbCrLf & _
"From:" & udpServer.RemoteHostIP & _
vbCrLf & "Port #:" & Str$(udpServer.RemotePort) & _
vbCrLf & "Message:" & message & vbCrLf
txtOutput.SelStart = Len(txtOutput.Text)
End Sub