windows – 通过cmd打开文件并在特定编辑器中显示所选

@ECHO OFF
SETLOCAL 
SET "ROOT=%~dp0"
SET "EXT=*.txt"
ECHO -----------------------------------------------
ECHO Listing text files on this folder - "%ROOT%"
ECHO -----------------------------------------------

SET "Count=0"
SETLOCAL enabledelayedexpansion
REM Iterates throw the files on this current folder.
REM And Populate the array with existent files in folder
FOR %%f IN ("%ROOT%%EXT%") DO (
    SET /a "Count+=1"
    set list[!Count!]=%%~nxf
)

set Files=%Count%
ECHO.
rem Display array elements
for /L %%i in (1,1,%Files%) do echo file number [%%i] : "!list[%%i]!"
SET /a "COUNT_TOT=%Count%"
ECHO.
ECHO Total of text files(s) : %Count% file(s)
EndLocal
PAUSE>nul

编辑：2016年7月25日@ 21:28

我下载并设置Sublime Text 2只是为了试试我的电脑！

Upadte版本与Sublime文本2

@ECHO OFF
Title Open the selected file with Sublime Text
:MenuLoop
Cls & Color 0A
SETLOCAL 
SET "ROOT=%~dp0"
SET "EXT=*.txt"
SET "Count=0"
SETLOCAL enabledelayedexpansion
REM Iterates throw the files on this current folder.
REM And Populate the array with existent files in folder
FOR %%f IN ("%ROOT%%EXT%") DO (
    SET /a "Count+=1"
    set list[!Count!]=%%~nxf
)

echo wscript.echo Len("%ROOT%"^) + 15 >"%tmp%length.vbs"
for /f %%a in ('Cscript /nologo "%tmp%length.vbs"') do ( set "cols=%%a")

set Files=%Count%
set /a lines=%Count% + 10
Mode con cols=%cols% lines=%lines%
ECHO ********************************************************
ECHO   Folder : "%ROOT%"
ECHO ********************************************************
ECHO.
rem Display array elements
for /L %%i in (1,%Files%) do echo [%%i] : !list[%%i]!

SET /a "COUNT_TOT=%Count%"
ECHO.
ECHO Total of text files(s) : %Count% file(s)
echo(
echo Type the number of what file did you want to open ?"
set /p "Input="

For /L %%i in (1,%Count%) Do (
    If "%INPUT%" EQU "%%i" (
        Rem Testing if sublime_text.exe exist to open with it the text file
        If Exist "%programfiles%Sublime Text 2sublime_text.exe" (
            Start "Sublime" "%programfiles%Sublime Text 2sublime_text.exe" "!list[%%i]!"
            Rem Otherwise we open the text file with defalut application like notepad
            ) else (
            Start "" "!list[%%i]!"
        )   
    )
)   
EndLocal
Goto:MenuLoop

编辑于2016年7月28日@ 14:15

具有sublime文本3的Upadte版本和子目录中的列表文件

@ECHO OFF
REM : To download Sublime Text 
REM https://www.sublimetext.com/3
Title Edit the selected file with Sublime Text 3
:MenuLoop
Cls & Color 0A
SETLOCAL 
SET "ROOT=%~dp0"
SET "EXT=*.bat"
SET "Count=0"
SETLOCAL enabledelayedexpansion
REM Iterates throw the files on this current folder.
REM And Populate the array with existent files in folder
FOR /f "delims=" %%f IN ('dir /b /s "%ROOT%%EXT%"') DO (
    SET /a "Count+=1"
    set "list[!Count!]=%%~nxf"
    set "listpath[!Count!]=%%~dpFf"
)

echo wscript.echo Len("%ROOT%"^) + 18 >"%tmp%length.vbs"
for /f %%a in ('Cscript /nologo "%tmp%length.vbs"') do ( set "cols=%%a")
If %cols% LSS 30 set /a cols=%cols% + 10
set Files=%Count%
set /a lines=%Count% + 10
Mode con cols=%cols% lines=%lines%
ECHO  *******************************************************
ECHO   Folder : "%ROOT%"
ECHO  *******************************************************
rem Display array elements
for /L %%i in (1,%Files%) do echo [%%i] : !list[%%i]!

SET /a "COUNT_TOT=%Count%"
ECHO.
ECHO Total of [%EXT%] files(s) : %Count% file(s)
echo(
echo Type the number of what file did you want to edit ?
set /p "Input="
set "sublimeEXE=%programfiles%Sublime Text 3sublime_text.exe"
For /L %%i in (1,%Count%) Do (
    If "%INPUT%" EQU "%%i" (
        Rem Testing if sublime_text.exe exist to open with it the text file
        If Exist "%sublimeEXE%" (
            Start "Sublime" "%sublimeEXE%" "!listpath[%%i]!"
            Rem Otherwise we open the text file with defalut application like notepad
            ) else (
            Start "" Notepad.exe "!listpath[%%i]!"
        )   
    )
)   
EndLocal
Goto:MenuLoop