먼저 노트패드 같은 텍스트 에디터에 다음 스크립트를 복사해 붙여 넣습니다.
Set oShell = CreateObject("WScript.Shell")
oShell.Run("""C:\windows\explorer.exe""")
WScript.Sleep 1000
oShell.AppActivate "Explorer"
WScript.Sleep 500
oShell.SendKeys "%d"
WScript.Sleep 300
oShell.SendKeys "PATH1"
WScript.Sleep 300
oShell.SendKeys "{ ENTER}"
WScript.Sleep 500
oShell.SendKeys "^t"
WScript.Sleep 300
oShell.SendKeys "%d"
WScript.Sleep 300
oShell.SendKeys "PATH2"
WScript.Sleep 300
oShell.SendKeys "{ ENTER}"
이 스크립트는 탐색기 실행 후 탭 2개를 여는데,윈도탐색기탭여러개열면서시작하는스크립트클리앙 실행 전에 폴더의 경로를 수정해 주셔야 합니다. 탐색기 실행 시 열기 원하시는 폴더로 이동한 다음에 주소창을 클릭해 경로를 복사합니다.
8행의 PATH1을 앞에서 복사한 폴더의 경로로 바꿔줍니다. 예. "C:\Windows\Users\Taras\Downloads"
같은 방식으로 16행의 PATH2도 바꿔 줍니다.
탭을 하나 더 추가하고 싶으면, 아래 항목을 추가하고 PATH3도 바꿔 줍니다. 같은 식으로 탭을 더 늘릴 수 있습니다.
WScript.Sleep 500
oShell.SendKeys "^t"
WScript.Sleep 300
oShell.SendKeys "%d"
WScript.Sleep 300
oShell.SendKeys "PATH3"
WScript.Sleep 300
oShell.SendKeys "{ ENTER}"
원하는 폴더를 다 추가했으면 .vbs 확장자를 붙여 적당한 이름으로 저장합니다. (예. tap_exp.vbs)
이 vbs 스크립트를 실행하면 탐색기 실행 후 탭이 순서대로 열립니다.
탭이 열리는 속도를 높이고 싶으면 WScript.Sleep값(ms 단위)를 줄이면 됩니다. 그런데 너무 낮은 값을 잡으면 원하는 경로의 탭이 제대로 열리지 않더군요. 컴퓨터 성능이 좋을수록 값을 낮출 수 있으니 적당한 값을 실험해 보시면 됩니다.