2016-06-08 2 views
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 

답변

3

IsEmpty는 여기에 문자열을보고 v_Path가 initiliazed인지 여부를 알려줍니다. 변수가 객체 참조이거나 선언되지 않은 경우 isEmpty는 true를 반환합니다. 이 경우, 메시지 상자가 빈 문자열 또는 ""

이 변화를 시도

If Isempty(v_Path) or v_Path = "" Then 

하거나

If v_Path = "" Then 
을 반환
관련 문제