Foxtable(狐表) → 用户栏目 → 专家坐堂 → ftp图片问题


  共有2250人关注过本帖树形打印复制链接

主题：ftp图片问题
帅哥哟，离线，有人找我吗？
happyft
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1930 积分：17570 威望：0 精华：0 注册：2014/7/29 19:09:00 		ftp图片问题  发帖心情 Post By：2017/9/10 15:47:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：ftp问题.jpg
图片点击可在新窗口打开查看

如果上图,sqltable的表,表中有一列图片,专门设计了一个图片浏览器的窗口来显示图片,窗口的afterload代码:
Dim pv As WinForm.PictureViewer = e.Form.Controls("PictureViewer1")
pv.AddCommand.Visible = False  '新增按钮不可见
pv.DeleteCommand.Visible = False  '删除按钮不可见
pv.ClearCommand.Visible = False  '清除按钮不可见
pv.ManagerCommand.Visible = False  '清除按钮不可见
pv.BindingField = CurrentTable.Name & ".图片"  '绑定到当前表中的图片列

'---用于远程文件管理
Dim ftp As New FTPClient
ftp.host= ftp_Host
ftp.Account = ftp_User
ftp.password = ftp_Pwd
ftp.Port = ftp_Port  '不是默认的21端口时一定要加上ftp端口号
ftp.RootDir = "\File"
ftp.UTF8 = True  '避免中文乱码
pv.FTPclient = ftp

如果表中直接按"/File/11-LT95.jpg"录入就可以,但这样字段太长不好,想弄成表中只保存"11-LT95.jpg",不要前面这个路径
因为ftp上路径都是固定的即图片都在File目录下,上面的代码为什么实现不了叱?ftp文件一上传,前面就会自动加上"/File/"这个前辍了

谢谢!
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2017/9/10 17:00:00 [只看该作者]

1、改成 /File

 

2、你可以尝试在列属性、控件，分别设置。
 回到顶部
帅哥哟，离线，有人找我吗？
HappyFt
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1930 积分：17570 威望：0 精华：0 注册：2014/7/29 19:09:00 		  发帖心情 Post By：2017/9/15 19:52:00 [只看该作者]

还是没搞定怎么设置,要求也就是在弹出的ftp上传文件管理器或其他对话框中选择一个或者多个文件确定后,

图片点击可在新窗口打开查看此主题相关图片如下：ftp问题2.jpg
图片点击可在新窗口打开查看

列中只显示这个文件名如123.pdf而不要带前面这个路径/File/123.pdf
是不是要自己设计ftp上传或下载的窗口才能控制.
 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110744 积分：563646 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2017/9/15 21:08:00 [只看该作者]

测试了一下，只能这样，没有办法

 回到顶部
帅哥哟，离线，有人找我吗？
HappyFt
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1930 积分：17570 威望：0 精华：0 注册：2014/7/29 19:09:00 		  发帖心情 Post By：2017/9/18 11:35:00 [只看该作者]

自己做ftp上传下载的窗口也实现不了吗?

 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2017/9/18 11:48:00 [只看该作者]

以下是引用HappyFt在2017/9/18 11:35:00的发言：
自己做ftp上传下载的窗口也实现不了吗?

 

你动态修改ftp列的值，就好了嘛。比如自动生成的是 /File/123.pdf，改成 123.pdf 就行了。
 回到顶部
帅哥哟，离线，有人找我吗？
HappyFt
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1930 积分：17570 威望：0 精华：0 注册：2014/7/29 19:09:00 		  发帖心情 Post By：2017/9/18 11:53:00 [只看该作者]

那样不好,如果什么时候用户的ftp上存放图片或者文件的路径变动了,那又要修改代码了

 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2017/9/18 11:59:00 [只看该作者]

以下是引用HappyFt在2017/9/18 11:53:00的发言：
那样不好,如果什么时候用户的ftp上存放图片或者文件的路径变动了,那又要修改代码了

 

你读取列属性【根目录】的值进行替换咯，你根目录不是/File麽？
 回到顶部
帅哥哟，离线，有人找我吗？
HappyFt
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1930 积分：17570 威望：0 精华：0 注册：2014/7/29 19:09:00 		  发帖心情 Post By：2017/10/10 21:51:00 [只看该作者]

将" /File/123.pdf"用代码改成 "123.pdf"又会遇到一个新问题,就是窗口中有一个控件 是绑定到此列上的
Dim pb As WinForm.PictureBox = Forms(winName).Controls("PictureBox1")
pb.BindingField = "窗口1_主表.图片"

因为列中没有前面那个路径,结果鼠标移动此列时图片就会变成打X了,有前面那个路径就不会,怎么办,把图片先下载到本地,再绑定可以吗?

谢谢!
 回到顶部
帅哥，在线噢！
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110744 积分：563646 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2017/10/10 22:09:00 [只看该作者]

下载：http://www.foxtable.com/webhelp/scr/1410.htm

不要绑定，到Currentchanged事件下载图片，然后赋值

Forms(winName).Controls("PictureBox1").image = getimage("图片本地路径")
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05859 秒, 4 次数据查询