0
我已經寫了一個VBScript來根據特定文件夾路徑(作爲輸入給出)的文件類型對這些文件進行分組。我試圖處理一個場景,當文件夾路徑爲空時,腳本應該要求我們提及文件路徑。但是,我無法處理它。IsEmpty沒有按預期工作
v_Path = InputBox("Enter the FileName Along With Path")
If IsEmpty(v_Path) Then
MsgBox("What's the File Path?")
Else
Set objFso = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(v_Path)
Set colFiles = objFolder.Files
For Each objFile in colFiles
v_FileName = v_Path&"\" & objFile.Name
v_FileExtensionName = v_Path & "\" & objFso.GetExtensionName(v_FileName)
If Not(objFso.FolderExists(v_FileExtensionName)) Then
objFso.CreateFolder(v_FileExtensionName)
objFso.MoveFile v_FileName, v_FileExtensionName & "\"
Else
objFso.MoveFile v_FileName, v_FileExtensionName & "\"
End If
Next
MsgBox("Files Grouped Based on File Type!!")
End If
Set objFso = Nothing
Set objFolder = Nothing
Set colFiles = Nothing