取一个目录下所有的文件的扩展名

　2012-05-26 14:15:10　来源：WEB开发网　　　

核心提示：@echo offsetlocal ENABLEDELAYEDEXPANSIONtype nul>exttype nul>ext.txtFOR /r D:\Desktop\xlslib %%i in (*) do @echo %%~xi >> extfor /f "delims=&qu

@echo off
setlocal ENABLEDELAYEDEXPANSION
type nul>ext
type nul>ext.txt
FOR /r D:\Desktop\xlslib %%i in (*) do @echo %%~xi >> ext
for /f "delims=" %%e in ('sort ext') do (
if not defined %%e set %%e=Def & >>ext.txt echo %%e
)
notepad ext.txt