以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  ftp作为远程储存文件时,打开文件,另存文件,这两者代码如何写?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=61297)

--  作者:bzfc57
--  发布时间:2014/12/10 15:26:00
--  ftp作为远程储存文件时,打开文件,另存文件,这两者代码如何写?

图片点击可在新窗口打开查看此主题相关图片如下:25.png
图片点击可在新窗口打开查看

如图:ftp作为远程储存文件时,打开文件,另存文件,这两者代码如何写?

--  作者:Bin
--  发布时间:2014/12/10 15:34:00
--  
先下载回来,再打开

参考代码

--  作者:bzfc57
--  发布时间:2014/12/10 15:43:00
--  
这样我也做了,但是做不到另存为,既可以选择下载保存的地方
--  作者:Bin
--  发布时间:2014/12/10 15:43:00
--  

Download

从FTP上下载文件,语法:

Download(sourceFileName, destinationFileName, ShowUI)

sourceFileName:要下载的文件,含路径
destinationFileName:保存下载文件的文件名和路径。
ShowUI:可选参数,逻辑型,是否显示下载进度,默认为False。

如果下载成功,返回True,否则返回False:

示例

Dim ftp1 As new ftpclient
ftp1.host=
"196.128.143.28"
ftp1.Account = 
"foxuser"
ftp1.password = 
"138238110"
If 
ftp1.Download("\\photo\\Desert.jpg","c:\\data\\Desert.jpg") = True Then
    
Messagebox.show("下载完成!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Else
    
Messagebox.show("下载失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If


--  作者:Bin
--  发布时间:2014/12/10 15:44:00
--  
发给你的连接里面就有例子
--  作者:bzfc57
--  发布时间:2014/12/10 15:53:00
--  
我就是按照这个例子做的,但是做不了选择保存的路径,而不是在代码里先写好路径。
如图
图片点击可在新窗口打开查看此主题相关图片如下:003.png
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2014/12/10 16:15:00
--  
    
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:文件按钮_例子.table


--  作者:bzfc57
--  发布时间:2014/12/10 16:46:00
--  
谢谢甜老大