Ik heb een programma gemaakt met access zodat ik via een listbox kan selecteren naar wie ik de emails moet sturen... nu zit ik met een probleem dat als ik op verstuur email druk ik steeds een foutmelding krijg en ik niet weet waar ik moet zoeken..
foutmelding is deze
"de typen komen niet overeen: kan het type van de parameter waarde niet in overeenstemming brengen. Kan de tekenreeks niet converteren.."
dit geeft die aan bij deze regel
.To = lstTijdelijkeExtern
de code is deze
foutmelding is deze
"de typen komen niet overeen: kan het type van de parameter waarde niet in overeenstemming brengen. Kan de tekenreeks niet converteren.."
dit geeft die aan bij deze regel
.To = lstTijdelijkeExtern
de code is deze
Code:
Private Sub Knop3_Click()
Dim obj01 As Outlook.Application
Dim objMail As Object
Set obj01 = Outlook.Application 'Start Outlook
Set objMail = obj01.CreateItem(olMailItem)
'Maakt e-mailbericht aan
With objMail
.To = lstTijdelijkeExtern
'.CC =
'.BCC =
'het is heelaas niet mogelijk het FROM-veld aan te passen
.Subject = Onderwerp
.Body = Tekst0
'.HTMLBody = "<HTML><P>Test</P></HTML>"
.NoAging = True
'.Attachments.Add "C:\Windows\WIN.INI" 'de locatie van de bijlage
'.Display 'Laat e-mail zien voordat hij verzonden wordt
'.Save 'Voorkomt de vraag om op te slaan, slaat op in Postvak In
.Send 'Verzenden van e-mailbericht
End With
Set objMail = Nothing
obj01.Quit
Set obj01 = Nothing
End Sub
