@echo off
set SKF=c:\exp\iconlist\mkshrtct.vbs
for /l %%Z in (0,1,237) do (
echo Set oWS = WScript.CreateObject^("WScript.Shell"^) > %SKF%
echo. >> %SKF%
echo sLinkFile = "C:\exp\iconlist\%%Z.lnk" >> %SKF%
echo. >> %SKF%
echo Set oLink = oWS.CreateShortcut^(sLinkFile^) >> %SKF%
echo. >> %SKF%
echo oLink.TargetPath = "C:\exp\w.bat" >> %SKF%
rem oLink.Arguments = ""
rem oLink.Description = "Comment field."
rem oLink.HotKey = "ALT+CTRL+Z"
echo oLink.IconLocation = "%windir%\system32\SHELL32.dll, %%Z" >> %SKF%
rem oLink.WindowStyle = "1"
rem oLink.WorkingDirectory = "C:\exp"
echo oLink.Save >> %SKF%
echo %%Z
call %SKF%
z adresy http://forums.devshed.com/archive/t-226495/create-shortcut-lnk-using-XP-cmd-batch
google je mocný..