以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  文件管理器中目录如何改动路径  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=107008)
--  作者：shixia
--  发布时间：2017/9/20 8:24:00
--  文件管理器中目录如何改动路径
文件管理器下面有增加、目录等几个选项，其中点击目录后，在文件管理器中自动引用了目录的路径，但是我想：首先把整个目录全部复制到一个新的路径中，再把文件管理器中的路径重新指定到新路径，在那个事件中写代码？怎么写代码？
--  作者：有点甜
--  发布时间：2017/9/20 8:50:00
--  

DataColChanged事件

 

If e.DataCol.Name = "第十列" Then
    If e.DataRow.Lines("第十列").count>0 Then
        Dim ls = e.DataRow.Lines("第十列")
        Dim path As String = ls(ls.Count-1).trim("[", "]")
        msgbox(path)
        If FileSys.DirectoryExists(path) Then
            FileSys.CopyDirectory(path, ProjectPath & FileSys.GetName(path), True)
            ls(ls.Count-1) = "[" & ProjectPath & FileSys.GetName(path) & "]"
            systemready = False
            e.DataRow.Lines("第十列") = ls
            systemready = True
        End If
    End If
End If
--  作者：wangyanan
--  发布时间：2018/10/20 16:09:00
--  
大哥，你发的帖子的问题，是怎么解决的，跪求
--  作者：有点蓝
--  发布时间：2018/10/20 16:17:00
--  
2楼就是方法。请描述您具体的问题。