VB.NET如何创建文件夹名称中含有“.\\”的文件夹？？
VB.NET如何创建文件夹名称中含有“.\\”的文件夹？？
VB.NET如何创建 文件夹名称 中含有“.\\”的文件夹？？
补充：我需要通过VB.net创建文件名含有 “.\\”已实现文件夹不能轻易删除的功能
我用My.Computer.FileSystem.CreateDirectory
(&d:\\test\\test2.\\&)
只会在test目录下创建test2文件夹，不会创建test2.\\文件夹
补充：我需要通过VB.net创建文件名含有 “.\\”已实现文件夹不能轻易删除的功能
我用My.Computer.FileSystem.CreateDirectory
(&d:\\test\\test2.\\&)
只会在test目录下创建test2文件夹，不会创建test2.\\文件夹
补充：我需要通过VB.net创建文件名含有 “.\\”已实现文件夹不能轻易删除的功能
我用My.Computer.FileSystem.CreateDirectory
(&d:\\test\\test2.\\&)
只会在test目录下创建test2文件夹，不会创建test2.\\文件夹
操作系统要实现文件夹不能直接删除的格式是： 文件名..\

操作系统里面，创建一个文件夹后文件夹并非空的，里面还有 . 和 .. 这两个名字的隐藏文件夹来作为是否文件夹的标识，所以CreateDirectory (&d:\\test\\test2.\\&) 是创建了test文件夹和test.文件
夹，所以你要创建不能直接删除的文件夹，可以改成CreateDirectory (&d:\\test\\test2..\\&)
其他回答 (2)
文件夹名称里不可能有“\”的。
不用想了，这是不可能的事。
不可能,FS的文件系统是不允许文件或文件夹中包含&\&的.
相关知识等待您来回答
编程领域专家4267人阅读
&前几日，有个哥们说有很多电影，问我要不要？我就让他一个一个的写过来，让哥们累个不轻。所以就想简单写个程序，获取一下文件夹下面的所有文件名称，这样就可以节省很多时间了。
软件呢，我已经上传到网站了：
vb版本目录获取器 1.0（龙卷风出品）说明：1.选好目录后，可以直接得到目录下的文件夹和文件名称，以及统计数目。2."树形结构"按键将会把各文件夹和文件罗列下来。3."树形展开"将把目录下的子目录也一并展开。大家测试的时候需要注意，不要用太深的目录来测。
下面开始动手的步骤：
&vb中有个函数Dir()，这个就是今天的主角了。Dir()第一次调用的时候，必须指定路径。然后其会返回一个string，这就是一个文件夹，或者一个文件的名称了。具体用法，大家google一下吧。我就不多说了。
然后就是区分返回值是文件夹，还是文件。这里用到的就是vbDirectory(=16)这个属性了。
OK. 剩下的就简单了，我把我软件中的这部分发出来share一下，大家不要说水平太差哟：
首先我是将文件显示做了区分：文件夹名称显示folderlist()，文件名称显示filelist():
Private Function folderlist(pathname As String, treeflag As Integer) 'treeflag:0列表 1树形 2树形展开'文件夹数和名称Dim sf As Stringsf = Dir(pathname, vbDirectory) '获取第一个目录名foldernum = 0Do While sf && ""' 跳过当前的目录及上层目录&&& If sf && "." And sf && ".." Then&&&&&&& If (GetAttr(pathname + sf) And vbDirectory) = vbDirectory Then&&&&&&&&&&& If treeflag = 0 Then&&&&&&&&&&&&&&& Text2 = Text2 & sf & vbCrLf& ' 如果它是一个目录，将其名称添加到列表&&&&&&&&&&& ElseIf treeflag = 1 Then&&&&&&&&&&&&&&& Text2 = Text2 & Treestr & sf & vbCrLf&&&&&&&&&&& ElseIf treeflag = 2 Then '树形展开的时候，需要了解子目录，所以还需进行递归调用&&&&&&&&&&&&&&& Text2 = Text2 & Treestr & sf & vbCrLf&&&&&&&&&&&&&&& folderlist pathname + sf, treeflag&&&&&&&&&&&&&&& filelist pathname + sf, treeflag&&&&&&&&&&& End If&&&&&&&&&&& foldernum = foldernum + 1 '统计文件夹数目&&&&&&& End If&&& End Ifsf = Dir() ' 查找下一个目录Loop
If treeflag = 0 Then&&& If foldernum && 0 Then&&&&&&& Text2 = Text2 & vbCrLf & "======共有" & foldernum & "个文件夹======" & vbCrLf & vbCrLf&&& Else&&&&&&& Text2 = Text2 & "======无子目录======" & vbCrLf & vbCrLf&&& End IfElseIf foldernum && 0 Then&&& Text2 = Text2 & Nullstr & vbCrLf & Nullstr & vbCrLfEnd If
End Function
Private Function filelist(pathname As String, treeflag As Integer) '0列表 1树形 2树形展开'文件数和名称Dim a As String
a = Dir(pathname & "/*.*")filenum = 0
Do While a && ""
&&& If treeflag = 0 Then&&&&&&& Text2 = Text2 & a & vbCrLf&&& Else&&&&&&& Text2 = Text2 & Treestr & a & vbCrLf&&& End If&&& filenum = filenum + 1 '统计文件数目&&& a = DirLoop
If treeflag = 0 Then&&& If filenum && 0 Then&&&&&&& Text2 = Text2 & "======共有" & filenum & "个文件======"&&& Else&&&&&&& Text2 = Text2 & "======无文件信息======"&&& End IfEnd If
End Function
OK，现在大家都已经了解处理机制了。应该不会再管我要什么源码了吧！呵呵
* 以上用户言论只代表其个人观点，不代表CSDN网站的观点或立场
访问：225469次
积分：3622
积分：3622
排名：第3470名
原创：145篇
转载：26篇
评论：79条
(4)(1)(2)(1)(2)(2)(2)(1)(1)(6)(1)(1)(5)(1)(2)(6)(4)(1)(1)(3)(11)(27)(2)(26)(30)(22)(2)(4)vb excel文件名字没有规律怎么循环
vb excel文件名字没有规律怎么循环
09-04-08 &匿名提问 发布
用for each就可以了
请登录后再发表评论!vb中52文件名或编号错误。错误如何处理？_百度知道
vb中52文件名或编号错误。错误如何处理？
提问者采纳
for append as #1检查一下你打开那个文件用的是什么号:\1.txt&quot，比如open &quot，否则就会出现52文件名或编号错误，调用的又是什么号，那么以后对这个文件进行操作时就必须用#1;C
其他类似问题
文件名的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁vb如何生成一个文本文件名字为1，内容为123_vb吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：53,138贴子：
vb如何生成一个文本文件名字为1，内容为123收藏
我想用vb在c盘根目录下生成一个文件叫1.txt,内容为123，怎么做到？
Open "C:\1.txt" for output as #1print #1,"123"Close #1
非常感谢，这个太重要了
如果在print #1,123后面加个;那就不会换行输出
登录百度帐号推荐应用
为兴趣而生，贴吧更懂你。或}