以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于判断文件夹是否存在问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=154093)

--  作者:裴保民
--  发布时间:2020/9/3 13:04:00
--  关于判断文件夹是否存在问题
怎样判断所选的文件夹下是否包含某一个文件夹呢?如果有就复制该文件夹到某一个指定的位置
--  作者:linyunu1
--  发布时间:2020/9/3 13:48:00
--  
http://www.foxtable.com/webhelp/topics/0334.htm


--  作者:裴保民
--  发布时间:2020/9/3 14:14:00
--  
怎么判断文件夹下是否包含某一子文件夹呢?不是某一路径是否存在
--  作者:有点蓝
--  发布时间:2020/9/3 14:27:00
--  
一样的用法

If FileSys.DirectoryExists("C:\\MyFolder\\abc"Then 目录C:\\MyFolder包含子目录abc

--  作者:裴保民
--  发布时间:2020/9/3 14:46:00
--  
Dim dlg As new FolderBrowserDialog
If dlg.ShowDialog = DialogResult.OK Then
    Dim dir As String = "Publish"
    If FileSys.DirectoryExists( dlg.SelectedPath & dir) = True Then
        MessageBox.Show("是")
    Else
        MessageBox.Show("否")
    End If
End If

这段代码代码,怎么都是“否”呢?

图片点击可在新窗口打开查看此主题相关图片如下:截图01.jpg
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:截图02.jpg
图片点击可在新窗口打开查看



[此贴子已经被作者于2020/9/3 14:48:29编辑过]

--  作者:有点蓝
--  发布时间:2020/9/3 14:54:00
--  
调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm

msgbox(dlg.SelectedPath & dir)
[此贴子已经被作者于2020/9/3 14:54:08编辑过]