Script zum erstellen einer neuen SendTo Email Verknüpfung
Hallo.
Erstmal zu meinem Problem.
Wenn man eine Datei über SendTo in eine Email einfügt, wird die Email nicht im HTML Format gestartet.
Dadurch wird auch die Signatur nicht richtig angezeigt.
Dafür gibts ja die Lösung dass man eine neue Verknüpfung im SendTo Ordner macht die direkt auf Outlook zeigt und nicht über Mapi läuft.
Dadurch startet Outlook die Email im HTML Format.
Jetzt meine eigentliche Frage.
Gibt es ein Script, das ich z.B. bei meinem Anmeldescript hinzufügen kann, um die Verknüpfung beim Anmelden erstellen zu lassen?
Ich hab schon was Probiert, jedoch funktioniert es so leider nicht, bekomme zwar die Verknüpfung jedoch öffnet sich keine neue Email sondern Outlook.
Was ich ja auch verstehe, nur weiss ich leider nicht wie ich es umschreiben muss damit es eine neue Email öffnet.
@echo off & setlocal
set "zielpfad=%userprofile%\AppData\Roaming\Microsoft\Windows\SendTo"
set "progtitel=EMAIL"
::Speicherort
set "progdir=C:\Program Files (x86)\Microsoft Office\Office14\OUTLOOK.EXE"
set "progexe="
set "SendTo Email"
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>>%temp%\MakeShortCut.vbs
cscript //nologo %temp%\MakeShortCut.vbs
del %temp%\MakeShortCut.vbs
Danke schonmal im Voraus.
Erstmal zu meinem Problem.
Wenn man eine Datei über SendTo in eine Email einfügt, wird die Email nicht im HTML Format gestartet.
Dadurch wird auch die Signatur nicht richtig angezeigt.
Dafür gibts ja die Lösung dass man eine neue Verknüpfung im SendTo Ordner macht die direkt auf Outlook zeigt und nicht über Mapi läuft.
Dadurch startet Outlook die Email im HTML Format.
Jetzt meine eigentliche Frage.
Gibt es ein Script, das ich z.B. bei meinem Anmeldescript hinzufügen kann, um die Verknüpfung beim Anmelden erstellen zu lassen?
Ich hab schon was Probiert, jedoch funktioniert es so leider nicht, bekomme zwar die Verknüpfung jedoch öffnet sich keine neue Email sondern Outlook.
Was ich ja auch verstehe, nur weiss ich leider nicht wie ich es umschreiben muss damit es eine neue Email öffnet.
@echo off & setlocal
set "zielpfad=%userprofile%\AppData\Roaming\Microsoft\Windows\SendTo"
set "progtitel=EMAIL"
::Speicherort
set "progdir=C:\Program Files (x86)\Microsoft Office\Office14\OUTLOOK.EXE"
set "progexe="
set "SendTo Email"
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>>%temp%\MakeShortCut.vbs
cscript //nologo %temp%\MakeShortCut.vbs
del %temp%\MakeShortCut.vbs
Danke schonmal im Voraus.
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 212074
Url: https://administrator.de/forum/script-zum-erstellen-einer-neuen-sendto-email-verknuepfung-212074.html
Ausgedruckt am: 26.04.2025 um 09:04 Uhr
6 Kommentare
Neuester Kommentar
So das hat an den Anführungszeichen gelegen, die dürfen nicht die Parameter umfassen.
Versuch mal das Script
echo off & setlocal
set "zielpfad=%userprofile%\AppData\Roaming\Microsoft\Windows\SendTo"
set "progtitel=EMAIL"
::Speicherort
set "progdir=C:\Program Files (x86)\Microsoft Office\Office14"
set "progexe=OUTLOOK.EXE"
set "args=/c ipm.note /a"
echo %progdir%
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.Arguments="%args%">>%temp%\MakeShortCut.vbs
echo objShortcut.Description="%beschreibung%">>%temp%\MakeShortCut.vbs
echo objShortcut.WorkingDirectory="%progdir%">>%temp%\MakeShortCut.vbs
echo objShortcut.Save>>%temp%\MakeShortCut.vbs
cscript //nologo %temp%\MakeShortCut.vbs
del %temp%\MakeShortCut.vbs
Versuch mal das Script
echo off & setlocal
set "zielpfad=%userprofile%\AppData\Roaming\Microsoft\Windows\SendTo"
set "progtitel=EMAIL"
::Speicherort
set "progdir=C:\Program Files (x86)\Microsoft Office\Office14"
set "progexe=OUTLOOK.EXE"
set "args=/c ipm.note /a"
echo %progdir%
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.Arguments="%args%">>%temp%\MakeShortCut.vbs
echo objShortcut.Description="%beschreibung%">>%temp%\MakeShortCut.vbs
echo objShortcut.WorkingDirectory="%progdir%">>%temp%\MakeShortCut.vbs
echo objShortcut.Save>>%temp%\MakeShortCut.vbs
cscript //nologo %temp%\MakeShortCut.vbs
del %temp%\MakeShortCut.vbs