Hallo zusammen,
ich habe folgenden Code, der fast funktioniert. Habe ein HTA Programm geschrieben. Das "Subject" wird passend angezeigt. (ausgelesen aus der comboParts.value)
Aber der Inhalt der Email der sich aus den Variablen (txtBeschreibung, txtAuswahl, txtAuswahl1) ergebn soll wird mit Fehlern abgebrochen. Was habe ich falsch gemacht?
Gruß TheFalcon
ich habe folgenden Code, der fast funktioniert. Habe ein HTA Programm geschrieben. Das "Subject" wird passend angezeigt. (ausgelesen aus der comboParts.value)
Aber der Inhalt der Email der sich aus den Variablen (txtBeschreibung, txtAuswahl, txtAuswahl1) ergebn soll wird mit Fehlern abgebrochen. Was habe ich falsch gemacht?
Gruß TheFalcon
Quellcode
- Set MyOutApp = CreateObject("Outlook.Application")
- Set MyMessage = MyOutApp.CreateItem(0)
- With MyMessage
- .To = "deineemail@adresse.net"
- .Subject = comboParts.value
- .body = & txtBeschreibung & vbNewLine & vbNewLine & "Dringlichkeit: " & txtAuswahl & vbNewLine & vbNewLine & "Grund: " & txtAuswahl1 & vbNewLine & vbNewLine
- .Display
- .send
- End With
- ' Mail senden und Hinweis
- Set MyOutApp = Nothing
- Set MyMessage = Nothing
- MsgBox "Email wurde versand"