Moin,
ich rufe hierzu ein VB Script über einen Mapkey auf.
Allerdings soll die Mail bei uns nicht versendet werden.
Aber das sollte im VB Skript dann auch möglich sein.
Gruß,
Andi
Hab es eben mal ausprobiert, mit diesem VB Skript hat es funktioniert:
Dim arg, var1, var2
Set arg = WScript.Arguments
var1 = arg(0)
var2 = arg(1)
Set moft = CreateObject("Outlook.Application")
Set mMail = moft.CreateItemFromTemplate("C:\INNEO\cadpool\....\spec\nutzungsbedingungen.oft")
With mMail
.To = "Max.mustermann@entenhausen.de" ' Empfängeradresse
.Subject = "3D Step File: " & var2 ' Betreff
.Attachments.Add var1 ' Anhang
.Send ' E-Mail direkt senden
End With
------------------
„Glaubst Du, ich habe den Verstand verloren?“ -
„Ich fürchte, ja. Du bist übergeschnappt,
hast eine Meise, bist nicht ganz bei Sinnen.
Aber weißt Du was? Das macht die Besten aus!“
[Diese Nachricht wurde von Hutmacher am 01. Aug. 2025 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP