robertka
Goto Top

Outlook 2007 Bild mit Hyperlink per VBSrict

Hallo,

habe folgendes Problem:
Möchte mit VBScript eine Mail erstellen, die ein Bild enthält (nicht als Signatur) und welches einemn Link hinterlegt hat.

Als einfache Erklärung im normalen Maildialog in Outlook "Grafik einfügen" in die Dateileiste den Herkunftslink des Bildes eingeben, dann erscheint das Bild. Diesen dann mit einem Hyperlink hinterlegen. Der Empfänger kann somit das Bild anklicken und wird auf die entsprechende Website geführt.

Bei mir funktioniert bisher nur die Übergabe der Links, die auch jeweils als Link erscheinen und auch anklickbar sind. Das wars aber schon.

Jetzt muss ich dazu sagen, dass ich nicht der Programmierer bin sondern dies eher so nebenbei mache.

Das Script rufe ich aus meiner Datenbank auf. Die jeweiligen Links sind dort korrekt hinterlegt. Im entsprechenden Bereich sieht das so aus:

Dim sMailAdresse, sSubject, sBetreff, sBild, sObjLink, sObjID, sObjTitel

sBild = oRecord.GetContentsByName("BildLink")
sObjLink = oRecord.GetContentsByName("HPLink")
sMailAdresse = oRecord.GetContentsByName("Email")

sSubject = cstr("blablabla")

Dim sBody

'------------Darum geht es

sBody = sBild & vbLf
sBody = sBody & sObjLink & vbLf

'-------------------------------

ClipboardText(sBody)
Const oMailItem = 0
Set oApp = CreateObject("Outlook.Application")
Set oMail = oApp.CreateItem(olMailItem)

oMail.To = cstr(sMailAdresse)
oMail.Subject = cstr(sSubject)
oMail.Body = cstr(sBody)

oMail.Display
Jetzt mag man meinen, ich müsste >oMail.Body< durch >oMail.HTMLBody< ersetzen. Da erreiche ich aber nur eine Textmail.

Kann mir hier jemand helfen.

Vielen Dank schon vorab!

Robert

Content-Key: 244848

Url: https://administrator.de/contentid/244848

Printed on: April 25, 2024 at 08:04 o'clock

Member: colinardo
Solution colinardo Jul 29, 2014 updated at 08:27:41 (UTC)
Goto Top
Hallo Robert, Willkommen auf Administrator.de!
Jetzt mag man meinen, ich müsste >oMail.Body< durch >oMail.HTMLBody< ersetzen. Da erreiche ich aber nur eine Textmail.
Du musst den Body nur mit etwas HTML und den Links würzen, dann klappt das auch face-smile
sBody = "<a href=""" & sObjLink & """><img src=""" & sBild & """></a><br />"  
und dann an die richtige Eigenschaft übergeben:
oMail.HTMLBody = sBody
Grüße Uwe
Member: RobertKa
RobertKa Jul 29, 2014 at 08:27:21 (UTC)
Goto Top
Hallo Uwe,

danke für die schnelle Rückantwort. Ja genau das war's. Die doppelten Anführungszeichen waren mein Problem. Deshalb wurde das mit HTMLBody vorher auch nichts. Jetzt geht's einwandfrei und endlich spar ich mir die händische Hin- und Her Kopiererei.

Viele Grüße

Robert