
CODE: [Copy to clipboard]@echo off
for /f "tokens=*" %%\ in ('dir /b /tc /o-d /a C:\*.txt') do (
set NewFile=%%\
goto :next
)
:next
for /f "tokens=1,2* delims=:" %%a in ('findstr /n . "C:\%NewFile%"') do (
if "%%a" equ "2" (
set ScdLine=%%b
goto :show
)
)
:show
mshta vbscript:createobject("wscript.shell").popup("%ScdLine%")(window.close) & exit
CODE: [Copy to clipboard]@echo off
for /f "tokens=*" %%\ in ('dir /b /tc /o-d /a C:\*.txt') do (
set NewFile=%%\
goto :next
)
:next
for /f "skip=1 tokens=*" %%a in ('findstr . "C:\%NewFile%"') do (
set ScdLine=%%a
goto :show
)
:show
mshta vbscript:createobject("wscript.shell").popup("%ScdLine%")(window.close) & exit
CODE: [Copy to clipboard]@echo off
for /f "tokens=*" %%\ in ('dir /b /tc /o-d /a C:\*.txt') do (
set NewFile=%%\
goto :next
)
:next
for /f "skip=1 tokens=*" %%a in ('findstr . "C:\%NewFile%"') do (
set ScdLine=%%a
goto :show
)
:show
mshta vbscript:createobject("wscript.shell").popup("%ScdLine:~1,-1%")(window.close) & exit
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |