Verknüpfung auf Desktop per Batch anlegen

md %DATE:~6,4%\%DATE:~3,2%\%DATE:~0,2%

Explorer /e,c:\%DATE:~6,4%\%DATE:~3,2%\%DATE:~0,2%

@echo off & setlocal
set "zielpfad=%userprofile%\Desktop"  

::Name der Verknüpfung (ohne ".lnk")  
set "progtitel=Heute"  
::Speicherort der Programmdatei (wird auch für "Ausführen in:" verwendet)  
set "progdir=C:\Pfad\%date:~-4%\%date:~-7,2%\%date:~-10,2%"  
set "progexe="  
::Kommentar
set "beschreibung=Erklärung eigentlich unnötig ..."  

::Bei Bedarf Ordner erstellen:
md "%zielpfad%" 2>nul  
md "%progdir%" 2>nul  

::temporäres VBScript erzeugen ...
 >%temp%\MakeShortCut.vbs echo Set objShell=WScript.CreateObject("Wscript.Shell")  
>>%temp%\MakeShortCut.vbs echo Set objShortcut=objShell.CreateShortcut("%zielpfad%\%progtitel%.lnk")  
>>%temp%\MakeShortCut.vbs echo objShortcut.TargetPath="%progdir%\%progexe%"  
>>%temp%\MakeShortCut.vbs echo objShortcut.Description="%beschreibung%"  
>>%temp%\MakeShortCut.vbs echo objShortcut.WorkingDirectory="%progdir%"  
>>%temp%\MakeShortCut.vbs echo objShortcut.Save

::... ausführen ...
cscript //nologo %temp%\MakeShortCut.vbs

::... und wieder löschen.
del %temp%\MakeShortCut.vbs

objShortcut.TargetPath = "C:\Neuer Ordner\" & Year(Date) & "\" & Right("0" & Month(Date), 2) & "\" & Right("0" & Day(Date), 2)

nircmdc shortcut "%PROGRAMME%\Macdoc7\MacDoc2006.exe" "~$folder.desktop$" "MacDoc2006"  

#   **************************************************************
#   * verknuepfung anlegen   *
#   * *
#   *                                                            *
#   **************************************************************
#    Das muß einmal auf der powershell ausgeführt werden
#     "Set-ExecutionPolicy Unrestricted" 
#   **************************************************************
#   * Erstellt M.N - POWERSHELL / Entwicklung   16.11.2010                   *
#   **************************************************************

#$ErrorActionPreference = 'stop' 
#$ErrorActionPreference = 'SilentyContinue' 
$WshShell = New-Object -ComObject WScript.Shell
$QUELLE = "C:\Temp"  
$YYYY = Get-Date -format 'yyyy'   
echo "Jahr: `t$YYYY"  
$MM = Get-Date -format 'MM'  
echo "Monat: `t$MM"  
$DD = Get-Date -format 'dd'  
echo "Tag: `t$DD"  
if (Test-Path $QUELLE\$YYYY) {
    echo "Verzeichnis $YYYY ist da" }  
else {
    echo "Verzeichnis $YYYY nicht da"  
    md "$QUELLE\$YYYY" }  

if (Test-Path $QUELLE\$YYYY\$MM) {
    echo "Verzeichnis $YYYY\$MM ist da" }  
else {
    echo "Verzeichnis $YYYY\$MM nicht da"  
    md "$QUELLE\$YYYY\$MM" }  
    
if (Test-Path $QUELLE\$YYYY\$MM\$DD) {
    echo "Verzeichnis $YYYY\$MM\$DD ist da" }  
else {
    echo "Verzeichnis $YYYY\$MM\$DD nicht da"  
    md "$QUELLE\$YYYY\$MM\$DD" }  

if (Test-Path "$HOME\desktop\heute.lnk") {  
    echo "verknüpfung ist da"  
    del "$HOME\desktop\heute.lnk"  
    sleep 2
    $link = $wshshell.CreateShortcut(”$HOME\Desktop\heute.lnk”)
    $link.targetpath = "$QUELLE\$YYYY\$MM\$DD"  
    $link.save() }
else {
    $link = $wshshell.CreateShortcut(”$HOME\Desktop\heute.lnk”)
    $link.targetpath = "$QUELLE\$YYYY\$MM\$DD"  
    $link.save() }