关于vb的winsock通信
我想问一下在通过winsock控件从服务器端向客户端发送图片时用什么方法发送呢?
Private Sub cmdSend_Click()
'向服务器发送文件
Dim myFile() As Byte
Dim lngFile As Long '文件长度
Dim FileName As String '文件名称
Static i As Single
If sockClient.State = sckConnected Then
FileName = VB.App.Path & "\1.jpg" '取得文件名及路径
lngFile = FileLen(FileName) '取得文件长度
ReDim myFile(lngFile - 1) As Byte '初始化数组
Open FileName For Binary As #1 '打开文件
Get #1, , myFile '将文件写入数组
Close #1 '关闭文件
sockClient.SendData myFile '发送
End Sub
这是我的毕业设计,基于web 的 gis,服务器端不能向客户端发送图片
我用的这个方法只能发很小的图片,太大的话出错提示文件太大
不知道用什么方法才能实现发送接收?
请指点
关于vb的winsock通信