프로그래밍 방식으로 파일 번호를 VBScript로 바꿉니다.

Question

사용자 VBScript를 사용하고 싶지만 배치 파일을 사용할 수는 있습니다.

Season (1) 
Season (2) 
..snip.. 
Season (9) 
Season (10) 
Season (11) 
Season (12) 

에 :

은 내가 이런 식으로 명명 된이 일부 파일 이름을 바꿀

Season (01) 
Season (02) 
..snip.. 
Season (09) 
Season (10) 
Season (11) 
Season (12) 

보다는 100 + TV에 대해 수동으로이 일을하는 것은 내가 가지고 보여줍니다 더 가질 수 10 년이 넘는 시간을 프로그램 방식으로 달성 할 수있는 방법이 있습니까? 감사. VB/VBA에서

Answer 1

이 같은 수행 할 수 있습니다

를

Set objFso = CreateObject("Scripting.FileSystemObject") 
Set objFolder = objFso.GetFolder("C:\test") 

For i = 1 To 15 
    strPath = objFolder.Path & "\Season (" & i & ")" 
    If Not objFso.FolderExists(strPath) Then objFso.CreateFolder strPath 
Next 

For Each objSubfolder In objFolder.SubFolders 
    strName = objSubfolder.Name 
    intPos1 = InStr(strName, "(") 
    intPos2 = InStr(strName, ")") 
    strOrder = Mid(strName, intPos1 + 1, intPos2 - intPos1 - 1) 
    If Len(strOrder) = 1 Then 
     objSubfolder.Name = Left(strName, intPos1) _ 
          & "0" & strOrder _ 
          & Right(strName, Len(strName) - intPos2 + 1) 
    End If 
Next 

그러면 주어진 폴더의 모든 하위 폴더를보고 계절 번호를 찾습니다. 한 자릿수 인 경우 해당 숫자를 채우고 폴더의 이름을 바꿉니다. 코드가 테스트되고 작동합니다.

Answer 2

가의 라인을 따라 뭔가있을 것 :

: 당신이 박쥐 파일에 필요한하려는 명령을 생성 할 수 있습니다 (VB/VBA에서 다시)

For x = 1 to 100 ' or however many you have 
Name "Season (" & cstr(x) & ")" as "Season (" & Format(x,"00") & ")" 
Next 

또는이

Sub Thing() 

Dim x As Long 

For x = 1 To 100 ' or however many you have 
    Debug.Print "Ren " & Chr$(34) & "Season (" & CStr(x) & ")" & Chr$(34) & " " _ 
    & Chr$(34) & "Season (" & Format(x, "00") & ")" & Chr$(34) 
Next 

End Sub 

당신에게주는이 :

VBScript로

Ren "Season (1)" "Season (01)" 
Ren "Season (2)" "Season (02)" 
Ren "Season (3)" "Season (03)" 
Ren "Season (4)" "Season (04)" 
Ren "Season (5)" "Season (05)" 
Ren "Season (6)" "Season (06)" 
Ren "Season (7)" "Season (07)" 
Ren "Season (8)" "Season (08)" 
Ren "Season (9)" "Season (09)" 
Ren "Season (10)" "Season (10)" 
Ren "Season (11)" "Season (11)" 
Ren "Season (12)" "Season (12)" 
Ren "Season (13)" "Season (13)" 
Ren "Season (14)" "Season (14)" 
Ren "Season (15)" "Season (15)" 
Ren "Season (16)" "Season (16)" 
Ren "Season (17)" "Season (17)" 
Ren "Season (18)" "Season (18)" 
Ren "Season (19)" "Season (19)" 
Ren "Season (20)" "Season (20)" 
Ren "Season (21)" "Season (21)" 
Ren "Season (22)" "Season (22)" 
Ren "Season (23)" "Season (23)" 
Ren "Season (24)" "Season (24)" 
Ren "Season (25)" "Season (25)" 
Ren "Season (26)" "Season (26)" 
Ren "Season (27)" "Season (27)" 
Ren "Season (28)" "Season (28)" 
Ren "Season (29)" "Season (29)" 
Ren "Season (30)" "Season (30)" 
Ren "Season (31)" "Season (31)" 
Ren "Season (32)" "Season (32)" 
Ren "Season (33)" "Season (33)" 
Ren "Season (34)" "Season (34)" 
Ren "Season (35)" "Season (35)" 
Ren "Season (36)" "Season (36)" 
Ren "Season (37)" "Season (37)" 
Ren "Season (38)" "Season (38)" 
Ren "Season (39)" "Season (39)" 
Ren "Season (40)" "Season (40)" 
Ren "Season (41)" "Season (41)" 
Ren "Season (42)" "Season (42)" 
Ren "Season (43)" "Season (43)" 
Ren "Season (44)" "Season (44)" 
Ren "Season (45)" "Season (45)" 
Ren "Season (46)" "Season (46)" 
Ren "Season (47)" "Season (47)" 
Ren "Season (48)" "Season (48)" 
Ren "Season (49)" "Season (49)" 
Ren "Season (50)" "Season (50)" 
Ren "Season (51)" "Season (51)" 
Ren "Season (52)" "Season (52)" 
Ren "Season (53)" "Season (53)" 
Ren "Season (54)" "Season (54)" 
Ren "Season (55)" "Season (55)" 
Ren "Season (56)" "Season (56)" 
Ren "Season (57)" "Season (57)" 
Ren "Season (58)" "Season (58)" 
Ren "Season (59)" "Season (59)" 
Ren "Season (60)" "Season (60)" 
Ren "Season (61)" "Season (61)" 
Ren "Season (62)" "Season (62)" 
Ren "Season (63)" "Season (63)" 
Ren "Season (64)" "Season (64)" 
Ren "Season (65)" "Season (65)" 
Ren "Season (66)" "Season (66)" 
Ren "Season (67)" "Season (67)" 
Ren "Season (68)" "Season (68)" 
Ren "Season (69)" "Season (69)" 
Ren "Season (70)" "Season (70)" 
Ren "Season (71)" "Season (71)" 
Ren "Season (72)" "Season (72)" 
Ren "Season (73)" "Season (73)" 
Ren "Season (74)" "Season (74)" 
Ren "Season (75)" "Season (75)" 
Ren "Season (76)" "Season (76)" 
Ren "Season (77)" "Season (77)" 
Ren "Season (78)" "Season (78)" 
Ren "Season (79)" "Season (79)" 
Ren "Season (80)" "Season (80)" 
Ren "Season (81)" "Season (81)" 
Ren "Season (82)" "Season (82)" 
Ren "Season (83)" "Season (83)" 
Ren "Season (84)" "Season (84)" 
Ren "Season (85)" "Season (85)" 
Ren "Season (86)" "Season (86)" 
Ren "Season (87)" "Season (87)" 
Ren "Season (88)" "Season (88)" 
Ren "Season (89)" "Season (89)" 
Ren "Season (90)" "Season (90)" 
Ren "Season (91)" "Season (91)" 
Ren "Season (92)" "Season (92)" 
Ren "Season (93)" "Season (93)" 
Ren "Season (94)" "Season (94)" 
Ren "Season (95)" "Season (95)" 
Ren "Season (96)" "Season (96)" 
Ren "Season (97)" "Season (97)" 
Ren "Season (98)" "Season (98)" 
Ren "Season (99)" "Season (99)" 
Ren "Season (100)" "Season (100)"