[求助]当前层级目录树节点文件夹里面添加附件或照片 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]当前层级目录树节点文件夹里面添加附件或照片

共有6399人关注过本帖树形打印复制链接主题：[求助]当前层级目录树节点文件夹里面添加附件或照片

miaoqingqing

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

加好友

发短信

等级：三尾狐帖子：660 积分：5180 威望：0 精华：0 注册：2019/7/26 12:54:00

[求助]当前层级目录树节点文件夹里面添加附件或照片 发帖心情

Post By：2022/4/25 13:32:00 [显示全部帖子]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:aa.foxdb

求助

附件和图片列添加文件到盘符+目录树节点文件夹里面

miaoqingqing

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

加好友

发短信

等级：三尾狐帖子：660 积分：5180 威望：0 精华：0 注册：2019/7/26 12:54:00

回复：（有点蓝）Dim dr As DataRow = e.DataRowIf dr... 发帖心情

Post By：2022/4/25 15:42:00 [显示全部帖子]

蓝主，报错，帮忙看看

.NET Framework 版本：4.0.30319.42000

Foxtable 版本：2022.1.30.2

错误所在事件：

详细错误信息：

不支持给定路径的格式。

D:\24_SS_学习\1test\中国\广东文件夹创建失败，上传图片失败

此主题相关图片如下：报错.png

[此贴子已经被作者于2022/4/25 15:48:16编辑过]

miaoqingqing

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

加好友

发短信

等级：三尾狐帖子：660 积分：5180 威望：0 精华：0 注册：2019/7/26 12:54:00

回复：（有点蓝）先判断文件夹是否存在，不存在的先创... 发帖心情

Post By：2022/4/25 16:06:00 [显示全部帖子]

文件夹已经存在了，还是上面的报错。

加入判断文件是否存在了，也还是报错

Dim trv = e.Form.Controls("LayersTree1").basecontrol

Dim p As String = "\(\w+(?=\))\)"

Dim str = System.Text.RegularExpressions.Regex.Replace(trv.Selectednode.fullpath, p ,"")

str = e.Form.Controls("ComboBox1").text & str

'msgbox(str)

If FileSys.DirectoryExists(str) = False Then

If MessageBox.Show("要新建这个文件夹吗?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.Yes Then

FileSys.CreateDirectory(str)

Dim Proc As New Process '定义一个新的Process

Proc.File = str

Proc.File = "D:\11_SF_SOFT\21_az_install\21_FA_fast\11_Tc\Totalcmd.exe"

Proc.Arguments = str '指定命令行参数

Proc.Start()

End If

Else

Dim Proc As New Process '定义一个新的Process

Proc.File = str

Proc.File = "D:\11_SF_SOFT\21_az_install\21_FA_fast\11_Tc\Totalcmd.exe"

Proc.Arguments = str '指定命令行参数

Proc.Start()

End If

Dim dr As DataRow = e.DataRow

'If dr.IsNull("盘符") Then

'msgbox("盘符不能为空")

'e.cancel = True

'Else

Select Case e.DataCol.Name

Case "图片"

e.SubFolder = dr("盘符") & dr("zfwl")

'取消了这列

End Select

'End If

miaoqingqing

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

加好友

发短信

等级：三尾狐帖子：660 积分：5180 威望：0 精华：0 注册：2019/7/26 12:54:00

回复：（有点蓝）调试Dim trv = e.Form.Control... 发帖心情

Post By：2022/4/25 16:22:00 [显示全部帖子]

蓝主，上楼代码，截图，辛苦看看

下载信息 [文件大小：下载次数： ]
点击浏览该文件:调试截图.zip

miaoqingqing

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

加好友

发短信

等级：三尾狐帖子：660 积分：5180 威望：0 精华：0 注册：2019/7/26 12:54:00

回复：（有点蓝）请上传实例测试 发帖心情

Post By：2022/4/25 16:50:00 [显示全部帖子]

辛苦，蓝主

Totalcmd.exe 这个绿色资源管理器要上传吗？26m上传失败

下载信息 [文件大小：下载次数： ]
点击浏览该文件:aa2.foxdb

[此贴子已经被作者于2022/4/25 16:53:17编辑过]

miaoqingqing

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

加好友

发短信

等级：三尾狐帖子：660 积分：5180 威望：0 精华：0 注册：2019/7/26 12:54:00

回复：（有点蓝）e.SubFolder 不能指定完整路径，... 发帖心情

Post By：2022/4/25 17:44:00 [显示全部帖子]

蓝主，上楼的代码，行切换时，只能新建第一级目录树节点的文件夹 D:\24_SS_学习\1test ，怎么实现创建文件夹里面多层子文件夹呢？

类似，下面

D:\24_SS_学习\1test\中国\广东文件夹里面多层子文件夹创建失败

还有上楼代码上传图片还是在项目里面Attachments里面，不能实现外部完整路径吗？

miaoqingqing

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

加好友

发短信

等级：三尾狐帖子：660 积分：5180 威望：0 精华：0 注册：2019/7/26 12:54:00

回复：（有点蓝）多层子文件夹的获取改为从目录树获取... 发帖心情

Post By：2022/4/25 22:46:00 [显示全部帖子]

蓝主，很想用这个功能做资源管理器，辛苦有空的时候帮忙

从目录树可以新建含子文件夹

求助，插入附件是，新建的文件夹中国广东位置有误，在根文件夹下面。应该在1test文件夹里面是子文件夹才对

图片插入位置应该在中国，不在广东

下载信息 [文件大小：下载次数： ]
点击浏览该文件:aa-3new.foxdb

此主题相关图片如下：还是报错，辛苦帮忙了，要管理资料很需要这个功能.png

[此贴子已经被作者于2022/4/25 22:50:29编辑过]

miaoqingqing

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

加好友

发短信

等级：三尾狐帖子：660 积分：5180 威望：0 精华：0 注册：2019/7/26 12:54:00

回复：（有点蓝）[upload=zip,aa-3new.zip]viewFile.a... 发帖心情

Post By：2022/4/26 8:56:00 [显示全部帖子]

蓝主，上楼项目，上传本地磁盘只成功过一次

后来上传上传本地磁盘、移动硬盘，都上传到项目里面，辛苦再帮忙解决一下了

此主题相关图片如下：上传在项目里面有问题.png

miaoqingqing

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

加好友

发短信

等级：三尾狐帖子：660 积分：5180 威望：0 精华：0 注册：2019/7/26 12:54:00

回复：（有点蓝）我测试没有问题。不行就把currentcha... 发帖心情

Post By：2022/4/26 9:57:00 [显示全部帖子]

蓝主，currentchanged事件代码放到BeforeSelChange事件后，上传文件不在项目文件夹里了

文件和图片不能上传到子文件夹里面，在第一级文件夹

此主题相关图片如下：放到beforeselchange后上传文件夹位置不对.png

miaoqingqing

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

加好友

发短信

等级：三尾狐帖子：660 积分：5180 威望：0 精华：0 注册：2019/7/26 12:54:00

回复：（有点蓝）通过层级编码来获取路径吧比如1.1.1，... 发帖心情

Post By：2022/4/26 10:31:00 [显示全部帖子]

蓝主，帮忙find代码

级别是动态的，不会弄，不是固定的1、1.1、1.1.1

下一主题 >> << 上一主题

总数 12 1 2 下一页

主题：[求助]当前层级目录树节点文件夹里面添加附件或照片