rem @echo %~1

 @SET Shortcut=%~1
 @ECHO SET WshShell = WScript.CreateObject("WScript.Shell")>DecodeShortCut.vbs
 @ECHO SET Lnk = WshShell.CreateShortcut(WScript.Arguments.Unnamed(0))>>DecodeShortCut.vbs
 @ECHO wscript.Echo Lnk.TargetPath>>DecodeShortCut.vbs
 @SET vbscript=cscript //nologo DecodeShortCut.vbs
 @for /f "delims=" %%T in ( ' %vbscript% "%Shortcut%" ' ) do @set target=%%T
 @DEL DecodeShortCut.vbs
 @ECHO Shortcut: %shortcut%
 @ECHO Target: %target%

@rem pause
@if exist "%target%" goto good
@echo deleting %shortcut%
@del "%shortcut%"
@exit /b

:good
@echo Keeping %shortcut%