写个简单的样子,熟悉一下MSDN帮助上的例子吧,然后找点资料看看 '发送端 Dim sendfile() As Byte ReDim sendfile(FileLen(FileName) - 1) Open FileName For Binary As #1 Get #1, , sendfile Close #1 '……省略若干 fileClient.SendData sendfile, vbArray + vbByte '接收端 Dim receivefile() As Byte Private Sub fileClient_DataArrival(ByVal bytesTotal As Long) ReDim receivefile(bytesTotal - 1) fileClient.GetData receivefile, vbArray + vbByte '…… End Sub
'发送端
Dim sendfile() As Byte
ReDim sendfile(FileLen(FileName) - 1)
Open FileName For Binary As #1
Get #1, , sendfile
Close #1
'……省略若干
fileClient.SendData sendfile, vbArray + vbByte
'接收端
Dim receivefile() As Byte
Private Sub fileClient_DataArrival(ByVal bytesTotal As Long)
ReDim receivefile(bytesTotal - 1)
fileClient.GetData receivefile, vbArray + vbByte
'……
End Sub
服务端:是一个目录,可以没任何显示.
客户端:能通过TCP连接到服务端,并能查看目录,选中文件下载,还能上传文件到这个目录中,就像FTP一样,所有的操作按钮显示目录都在客户端.我不会的就是:怎样把客户端的操作传到服务端,也就是客户端浏览服务端的目录,并且选择文件下载.
137793255 教教我具体在怎么做么?
看了半天还是FTP,另外就是FTP也有客户端和服务端,也是基于TCP/IP的,区别只是FTP是已经标准化了的通用协议,而你的只是你自定义的协议。