vb 怎么实现将一个文件上传到局域网服务器

vb 如何实现将一个文件上传到局域网服务器
RT 还有如何实现下载

[解决办法]
ftp winsock 等等 方法很多
[解决办法]

VB code

'用 WinSock 控件下载文件'1 增加一个 Winsock 控件， 名称为 Winsock1。'2 建立连接：Winsock1.RemoteHost = "nease.com"Winsock1.RemotePort = 80Winsock1.Connect'3 在Winsock1.Connect 事件中加入：Dim strCommand as StringDim strWebPage as StringstrWebPage = "http://www.nease.com/~kenj/index.html"strCommand = "GET " + strWebPage + " HTTP/1.0" + vbCrLf strCommand = strCommand + "Accept: */*" + vbCrLf strCommand = strCommand + "Accept: text/html" + vbCrLf strCommand = strCommand + vbCrLf Winsock1.SendData strCommand'4 Winsock 开始下载， 在收到数据时， 发生DataArrival 事件。Dim webData As String Winsock1.GetData webData, vbStringTxtWebPage.Text = TxtWebPage.Text + webData