set shortCutPath="d:\proeuser\%e_%\ProeWildfire3.0.lnk"
echo Dim WshShell,Shortcut>>d:\proeuser\%e_%\tmp.vbs
echo Dim path,fso>>d:\proeuser\%e_%\tmp.vbs
echo path="Z:\ProeWildfire3.0\bin\proe1.bat">>d:\proeuser\%e_%\tmp.vbs
echo Set fso=CreateObject("Scripting.FileSystemObject")>>d:\proeuser\%e_%\tmp.vbs
echo Set WshShell=WScript.CreateObject("WScript.Shell")>>d:\proeuser\%e_%\tmp.vbs
echo Set Shortcut=WshShell.CreateShortCut(%shortCutPath%)>>d:\proeuser\%e_%\tmp.vbs
echo Shortcut.TargetPath=path>>d:\proeuser\%e_%\tmp.vbs
echo Shortcut.Save>>d:\proeuser\%e_%\tmp.vbs
d:\proeuser\%e_%\tmp.vbs
del d:\proeuser\%e_%\tmp.vbs