| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 请教如何远程浏览服务器中的WORD文件？急 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=65538) |
| -- 作者：zhy400137 -- 发布时间：2015/3/18 9:14:00 -- 请教如何远程浏览服务器中的WORD文件？急 服务器IP：192.168.0.248，已搭建FTP服务器，FOXTABLE中的一列扩展为了文件，已可以上传 WORD到服务器指定的目录中，但客户端如何能通过WebBrowser浏览它？谢谢
|
| -- 作者：有点甜 -- 发布时间：2015/3/18 9:16:00 -- 先下载，再指定webbrowser的路径。
http://www.foxtable.com/help/topics/1410.htm
|
| -- 作者：zhy400137 -- 发布时间：2015/3/18 9:17:00 -- 我是想实现单击后可以实现浏览，一定要下载到当前客户端的电脑上吗？ |
| -- 作者：Bin -- 发布时间：2015/3/18 9:18:00 -- 一定要下载哦. |
| -- 作者：zhy400137 -- 发布时间：2015/3/18 9:20:00 -- 我试试，谢谢两位老师！ |
| -- 作者：zhy400137 -- 发布时间：2015/3/18 9:54:00 -- Dim ftp1 As new ftpclient ftp1.host="192.168.0.248" ftp1.Account = "ytxsp" ftp1.password = "ytx820723" Dim FileName As String Dim FileLen As Integer If e.node.Level = 1 Then \'如果是二级节点 If not e.node.DataRow.Isnull("文件全名") Then FileName =e.node.DataRow("文件全名") FileLen=FileName.Length-2 FileName = "\\" & FileName.SubString(2,FileLen) End If End If MessageBox.Show(FileName) If ftp1.Download(FileName,"c:\\file\\"& "Desert.doc") = True Then Messagebox.show("下载完成!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) Else Messagebox.show("下载失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) End If 提失下载失败 FileName 值为:"\\A.doc",我的文件是放在FTP的根目录里，上传后文件列的字符是\\\\A.doc 请老师帮看下，谢谢 另外，浏览的代码是web.Navigate(FileName)？
|
| -- 作者：有点甜 -- 发布时间：2015/3/18 9:57:00 -- 呃，下载的路径，必须是全部路径，你设置ftp的时候有没有设置根目录啊？你直接写成这样试试
If ftp1.Download("/A.Doc","c:\\file\\" & "Desert.doc") = True Then |
| -- 作者：有点甜 -- 发布时间：2015/3/18 9:58:00 -- 下载成功以后，这样写
web.Navigate("c:\\file\\" & "Desert.doc") |
| -- 作者：zhy400137 -- 发布时间：2015/3/18 10:07:00 -- 不行，根目录设置为 YTXFILEDATA，文件就放在根目标里面 另外，我从FTP登录后，可以直接将文件拖到我的电脑上。
|
| -- 作者：有点甜 -- 发布时间：2015/3/18 10:08:00 -- 那就写成
If ftp1.Download("/YTXFILEDATA/A.Doc","c:\\file\\" & "Desert.doc") = True Then |