怎样用批处理修改某一个文件的图标？(例如：vbs格式的文件)

::例如，把vbs文件图标改为默认图标
@echo off
for /f "delims=" %%i in ('assoc.vbs') do set a=%%i
if not defined a pause&exit
if "%a:~5%"=="" echo 扩展名关联为空 &pause&exit
reg add HKCR\%a:~5%\DefaultIcon /ve /t REG_EXPAND_SZ /d %%SystemRoot%%\System32\WScript.exe,2 /f
echo 完成 &pause
::其中 %a:~5% 中的数字是扩展名(不包括点)字符数加2
::为了使修改立即生效，还需要下面一句
taskkill /im explorer.exe /f & start %windir%\explorer.exe