Rem : =========== 创建文本文件 Rem : =========== 不能有同名的文件或文件夹 Rem : =========== 父文件夹必须存在 Sub CreateTextFile( file ) Dim f f = Trim( file ) If Right(f,1) = "/" Then f = Left(f,Len(f) -1 ) If fso.fileexists(f) = True Or fso.folderexists(f) = True Then Err.Raise vbObjectError
vbs脚本:CreateTextFile
最新推荐文章于 2021-07-16 16:29:00 发布
![](https://img-home.csdnimg.cn/images/20240711042549.png)