bluefad
2003-04-21, 20:10:36
原帖：http://www.themex.net/bbs/dispbbs.asp?boardID=11&ID=459
解决方案三：
利用批处理程序：iCal.bat
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
@echo off
if [%min%]==[1] goto 2
set min=1
start /min ical.bat
goto end
:2
set min=
cls
taskkill /F /IM YzDock.exe
attrib -r -a -s -h date.txt
del date.txt
attrib -r -a -s -h ical.png
del ical.png
set png=
echo.|date|find "当前日期:">date.txt
FOR /F "tokens=2 " %%i in (date.txt) do @echo %%i>date.txt
FOR /F "tokens=2,3* delims=-" %%i in (date.txt) do set png=%%i_%%j
copy images\%png%.png ical.png
start ....YzDock.exe
del date.txt
cd ....
echo.|type itemlist.ini|find /I "icaliCal.png"
if errorlevel 1 echo iCal type.app %CD%iconsiCaliCal.exe - %CD%iconsiCal show.normal icaliCal.png>>itemlist.ini
:end
exit
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
viewfile.asp?ID=1123
解决方案三：
利用批处理程序：iCal.bat
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
@echo off
if [%min%]==[1] goto 2
set min=1
start /min ical.bat
goto end
:2
set min=
cls
taskkill /F /IM YzDock.exe
attrib -r -a -s -h date.txt
del date.txt
attrib -r -a -s -h ical.png
del ical.png
set png=
echo.|date|find "当前日期:">date.txt
FOR /F "tokens=2 " %%i in (date.txt) do @echo %%i>date.txt
FOR /F "tokens=2,3* delims=-" %%i in (date.txt) do set png=%%i_%%j
copy images\%png%.png ical.png
start ....YzDock.exe
del date.txt
cd ....
echo.|type itemlist.ini|find /I "icaliCal.png"
if errorlevel 1 echo iCal type.app %CD%iconsiCaliCal.exe - %CD%iconsiCal show.normal icaliCal.png>>itemlist.ini
:end
exit
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
viewfile.asp?ID=1123