Как проверить наличие и создать папку с точкой в ​​VBS? - PullRequest
Новая
       37

Как проверить наличие и создать папку с точкой в ​​VBS?

0 голосов
/ 17 марта 2019

Я должен проверить наличие папки, начинающейся с точки. Когда я запускаю этот скрипт, он возвращает False на .FolderExists (но эта папка уже существует!). Затем он возвращает номер Err.Number 53 на .CreateFolder (да, эта папка уже существует!).

Как мне работать с папками, начинающимися с точки? 

Dim objFSO
Set objFSO = CreateObject("Scripting.FileSystemObject")

Dim strFolderTest
strFolderTest = "C:\project\node_modules\.bin"

If objFSO.FolderExists(strFolderTest) = False Then
    WScript.Echo("Folder does not exists: " & strFolderTest)
    On Error Resume Next
    objFSO.CreateFolder(strFolderTest)
    If Err.Number <> 0 Then
        If Err.Number = 53 Then
            WScript.Echo("Ops, folder already exists!")
            Err.Clear
            WScript.quit(1)
        End If
    End If
    WScript.Echo("Folder created!")
Else
    WScript.Echo("Ok, folder already exists!")
End If

Кто-нибудь может мне помочь?

...