请教一个关于ftp文件管理的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请教一个关于ftp文件管理的问题

共有11537人关注过本帖树形打印复制链接主题：请教一个关于ftp文件管理的问题

rjh4078

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐精帖子：3355 积分：24732 威望：0 精华：0 注册：2012/3/26 21:47:00

请教一个关于ftp文件管理的问题 发帖心情

Post By：2012/11/28 10:00:00 [显示全部帖子]

在用了现在的ftp功能一段时间后发现一个问题

附件每次添加的时候都需要上传一次时间长了以后管理目录下的文件就非常多添加的时候还得慢慢去找感觉非常不方便

能否把附件就当作一个字段直接绑定到SQL服务器上去？

此主题相关图片如下：捕获.jpg

[此贴子已经被作者于2012-11-28 10:05:32编辑过]

rjh4078

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐精帖子：3355 积分：24732 威望：0 精华：0 注册：2012/3/26 21:47:00

Post By：2012/11/28 10:25:00 [显示全部帖子]

比如我上传附件1 到数据行A 先得上传到FTP管理目录然后再附加到数据行A

时间长了就如图所示管理目录下面就有很多文件

如果我上传附件1000到数据行N 这时管理目录下就有1000个文件了我得在这1000个文件里找到这个附件再附加到数据行N

rjh4078

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐精帖子：3355 积分：24732 威望：0 精华：0 注册：2012/3/26 21:47:00

Post By：2012/11/28 10:45:00 [显示全部帖子]

想把附件做成个类似于字段的今天用了下用友的附件都是存贮在数据库里的感觉非常方便

rjh4078

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐精帖子：3355 积分：24732 威望：0 精华：0 注册：2012/3/26 21:47:00

Post By：2012/11/28 10:48:00 [显示全部帖子]

狐爸的这个功能虽好但是还是要放到某个文件夹的啊我现在就是按照你这个思路来的每个美工一个目录现在才半个月就已经2000多张图片了平均每个人也有500多张纠结

rjh4078

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐精帖子：3355 积分：24732 威望：0 精华：0 注册：2012/3/26 21:47:00

Post By：2012/11/28 11:05:00 [显示全部帖子]

狐爸的那个建议我考虑过但是有个问题 ftp的服务器不可能给非IT部门的人控制的涉及到内部管理的一些问题如果让他们自己建目录就乱套了如果让我们IT来建我们根本那么多精力主要是想用foxtable解决这样的需求不过没想到半个月就出现这样的问题狐爸有没有其他好的建议啊我看用友的直接添加文件保存就OK了保密效果也好只是公司已经用foxtable开发了一个ERP在用如果换用友的我们大半年的心血就白费了

[此贴子已经被作者于2012-11-28 11:06:58编辑过]

rjh4078

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐精帖子：3355 积分：24732 威望：0 精华：0 注册：2012/3/26 21:47:00

Post By：2012/11/28 11:12:00 [显示全部帖子]

lin_hailun 你的这个建议不错但是有个问题如何让这些目录自动建成呢？

如果手动建的话其他部门的同事不一定能这么严格执行

rjh4078

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐精帖子：3355 积分：24732 威望：0 精华：0 注册：2012/3/26 21:47:00

Post By：2012/11/28 12:48:00 [显示全部帖子]

感谢帅哥，在线噢！

lin_hailun一直回复我按照帮助来操作了了发现无法触发以下代码

Dim dr As DataRow = e.DataRow
    If dr.IsNull("客户名称") Or Dr.IsNull("存档日期") Then
        MessageBox.Show("客户名称和存档日期不能为空!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
        e.Cancel = True
    Else
        e.SubFolder = dr("客户名称") & "\" & dr("存档日期").Year & "\" & dr("存档日期").month
    End If