vkill'blog

::批量写入影片地址到xml的批处理
@echo off&setlocal enabledelayedexpansion
::需要concmd.exe，http://www.vkill.net/tools.html下载
set "路径=H:\游戏\gamestv_sc_flv_g;"H:\影 片""
set "后缀=flv"
>xvcastr.xml cd.
>>xvcastr.xml echo ^<?xml version="1.0" encoding="utf-8"?^>
>>xvcastr.xml echo ^<vcaster^>

for %%a in (%路径%) do (
 echo %%a|findstr "^\".*\"$" >nul&&(
   set "var=%%a"
   set "var=!var:~1,-1!
                                   ) || (set "var=%%a")
 if exist "!var!" (
 for %%b in (%后缀%) do (
   for /f "tokens=*" %%? in ('dir /a-d/s/b "!var!\*.%%b" 2^>nul^|sort') do (
     set "v=%%?"
     >>xvcastr.xml echo ^<item item_url="file:///!v:\=/!" item_title="%%~nx?" /^>

                                                                           )
                        )
                   )
                      )
>>xvcastr.xml echo ^</vcaster^>
concmd /i:gbk /o:utf8 /f:s xvcastr.xml vcastr.xml >nul 2>nul
del /f/q xvcastr.xml
start "C:\Program Files\Internet Explorer\IEXPLORE.EXE" "index.htm"
goto :eof