ACCESS 2010 - Button soll E-Mail in MS Outlook erstellen

Question

Hi Leute,

ich hab eine in Access 2003 erstellte Datenbank und dort funktioniert dieser Code:

Private Sub GEBbuttonSENDEN_Click()
Dim Applikation As New Outlook.Application
Dim mail As Outlook.MailItem
Set mail = Applikation.CreateItem(olMailItem)
If Weekday(GEBdatVERSAND) = 1 Then
mail.To = Me![GEBemail]
mail.Subject = Me![TEXTbetreff]
mail.Attachments.Add "Z:\3 Verwaltung\Weiterempfehlung.jpg", jpg, 1, "Pfullingen"
mail.HTMLBody = "<span style=""font-size:10pt; font-family:'Verdana'"">" & Me![TEXTtext]
mail.DeferredDeliveryTime = Me![GEBdatVERSAND]
mail.SentOnBehalfOfName = "pfullingen1@tui-reisecenter.de"
mail.Display
End If
If Weekday(GEBdatVERSAND) > 1 Then
mail.To = Me![GEBemail]
mail.Subject = Me![TEXTbetreff]
mail.Attachments.Add "Z:\3 Verwaltung\Weiterempfehlung.jpg", jpg, 1, "Pfullingen"
mail.HTMLBody = "<span style=""font-size:10pt; font-family:'Verdana'"">" & Me![TEXTtext]
mail.DeferredDeliveryTime = Me![GEBdatVERSAND]
mail.SentOnBehalfOfName = "pfullingen1@tui-reisecenter.de"
mail.Display
Set mail = Nothing
End If
Me![GEBdatVERSANDletzter] = Date
End Sub

doch bei einer neuen Datenbank die soeben in Access 2010 erstellt wird kommt die Fehlermeldung:

Fehler beim Kompilieren.
Benutzerdefinierter Typ nicht definiert.


Leider kann ich damit garnix anfangen - hab mir den Code so zusammen geschustert bzw. schustern lassen (vor Jahren) ...

Kann mir jemand helfen?

Lieben Dank.
Sascha

Answer 1

deine neue access db läuft auf 64bit windows, nicht wahr? da musst du bestimmte deklarationen in die alten scripte einbauen, damit das weiterhin klappt.

Answer 2

ja du hast recht - 64bit version isses ... was muss ich da wo einbauen? (kannst mir helfen?)

Answer 3

...kann mir jemand helfen hierzu?

mir fehlt die information wo ich was einbauen muss damit es unter 64bit wieder läuft

vielen dank
sascha