@echo off
echo Set oWS = WScript.CreateObject("WScript.Shell") > C:temp8CreateShortcut.vbs
echo sLinkFile = "C:temp8notepad.lnk" >> C:temp8CreateShortcut.vbs
echo Set oLink = oWS.CreateShortcut(sLinkFile) >> C:temp8CreateShortcut.vbs
echo oLink.TargetPath = "C:Windowsnotepad.exe" >> C:temp8CreateShortcut.vbs
echo oLink.Save >> C:temp8CreateShortcut.vbs
cscript C:temp8CreateShortcut.vbs
del C:temp8CreateShortcut.vbs
copy "C:temp8notepad.lnk" "%AppData%MicrosoftInternet ExplorerQuick LaunchUser PinnedTaskBarnotepad.lnk"
pause