View difference between Paste ID: JpqkC0si and bLPu2kDR
SHOW: | | - or go back to the newest paste.
1
@echo off
2
setlocal enabledelayedexpansion
3
if "%~1" == "" goto checkinst
4
del %1 2>nul
5
echo Enter subfolders to create. e.g.: sub dir\another sub dir\and more...
6
set /p dirs=
7
set dirs=%dirs%
8
if "%dirs%" == "" (
9
  echo Aborted.
10
  pause
11
  goto :eof
12
)
13
md %~dp0\%dirs%
14
if %errorlevel% == 0 echo Subfolders successfully created.
15
pause
16
goto :eof
17
18
:checkinst
19
reg query hkcr\.subdirs /v "" 2>nul >nul
20
if %errorlevel% == 0 goto uninst
21
choice /n /m "Subfolders Maker is not yet installed. Install it now [Y/N]?"
22
if %errorlevel% == 2 goto :eof
23
if %errorlevel% == 0 goto :eof
24
reg add hkcr\.subdirs /v "" /d subdirs >nul
25
if errorlevel 1 (
26
  pause
27
  goto :eof
28
)
29
reg add hkcr\.subdirs\shellnew /v command /d "%~f0 ""%%1""" >nul
30
reg add hkcr\subdirs /v "" /d Subfolders >nul
31
echo Subfolders Maker has been installed.
32
echo Use the "New > Subfolders" right-click popup menu to create subfolders.
33
echo Reopen Explorer window if the "Subfolders" menu item is not shown.
34
pause
35
goto :eof
36
37
:uninst
38
choice /n /m "Subfolders Maker is already installed. Uninstall it now [Y/N]?"
39
if %errorlevel% == 2 goto :eof
40
if %errorlevel% == 0 goto :eof
41
reg delete hkcr\.subdirs /f >nul
42
if errorlevel 1 (
43
  pause
44
  goto :eof
45
)
46
reg delete hkcr\subdirs /f >nul
47
echo Subfolders Maker has been uninstalled.
48
choice /n /m "Delete this batch file too [Y/N]?"
49
if %errorlevel% == 2 goto :eof
50
if %errorlevel% == 0 goto :eof
51
start "" /min cmd.exe "/c timeout 1 & del "%~f0""