VB中如何用dos的ftp命令上传下载文件？

Question

windows xp系统下，要把ftp://ftp.abc.com/down/123.rar这个文件下载到本地文件夹d:\download，已知ftp用户名为user001，密码是456，那么用ftp命令该如何操作呢？能隐藏下载界面吗？
反之如何将d:\download\123.rar这个文件上传到ftp://ftp.abc.com/down呢？

Answer 1

能啊写个简单的FPT客户端不就行了。。
winsock1.connect "ftp.abc.com" 21
winsock1.send "user user001"
winsock1.send "456"
winsock1.send "cwd down"
winsock1.send "pasv"
winsock1.recv buf   ;这时Buf里有FTP提供的连接IP和端口
winsock2.connect buf中的IP,buf中的端口
winsock1.send "Get 123.rar"
winsock2.recv buf
'在这里保存Buf
winsock2.close
Winsock1.close
很久没用VB了，不知道具体的格式！就是用Socket发服务器发送数据和接收数据的过程

Answer 2

可是我不想用任何控件，包括winsock

Answer 3

get remote-file[local-file]：将远程主机的文件remote-file传至本地硬盘的local-file。
put local-file[remote-file]：将本地文件local-file传送至远程主机。
也可用send。
ftp命令参考：
http://www.edu.cn/20010830/210045.shtml

Answer 4

找到FTP命令大全就好了..呵呵
WINSOCK和INET都可以的!Private Sub 上传_Click()
        Inet1.URL = IP.Text          ' "ftp://61.129.102.38/"
        Inet1.Protocol = 2
        Inet1.UserName = USER.Text   ' "username"
        Inet1.Password = ID.Text     ' "password"
        Inet1.Execute , "PUT " & "c:11.jpg" & " pathname\22.jpg"
        Do While Inet1.StillExecuting
            DoEvents
        Loop
        MsgBox "上传完毕!", vbInformation, "提示"
End SubPrivate Sub 下载_Click()
        Inet1.URL = IP.Text          ' "ftp://61.129.102.38/"
        Inet1.Protocol = 2
        Inet1.UserName = USER.Text   ' "username"
        Inet1.Password = ID.Text     ' "password"
        Inet1.Execute , "GET pathname\111.jpg D:\111.jpg"
        Do While Inet1.StillExecuting
            DoEvents
        Loop
        MsgBox "下载完毕!", vbInformation, "提示"
        '或者直接用下面这条语句       
          ‘Inet1.Execute "ftp://ftp.microsoft.com/", "GET /PSS/Tools/ComPlus/WinResourceMgr/winrmbin.zip D:\111111.zip"
End Sub

Answer 5

唉,没看到楼主上的问题说的问题,如果不用控件,可以用API嘛(WINSOCK|INET都有API...呵呵)

Answer 6

呵呵，只是想用dos的ftp命令，该如何实现呢？

Answer 7

可以用FTPCOMMADN 这个来发送命令，你去找一下吧

Answer 8

呵呵，只是想用dos的ftp命令，该如何实现呢？
============================
没有看我上面连接的ftp内部命令列表吗？？？
先登录上ftp网站：
FTP的命令行格式为：ftp -v -d -i -n -g [主机名]，其中　　-v显示远程服务器的所有响应信息；　　-n限制ftp的自动登录，即不使用；　　.n etrc文件；　　-d使用调试方式；　　-g取消全局文件名。然后直接在vb里按一般dos命令的方式调用就是了
或者做好一个bat然后vb里直接调用。

Answer 9

可以做一个bat文件，再做一个TEXT文件，再用重定向符号，就可以在VB中使用了。
我们公司现在的程序更新就是使用这种方法，很好用。