TKSoft-Online

Willkommen, Gast
Benutzername: Passwort: Angemeldet bleiben:
Passwort vergessen? Benutzername vergessen?
Forum TKSoft-Online
MS-Access
MS-Access - Fragen und Antworten

Laufzeitfehler bei NICHT Mailversand
(1 Leser) (1) Gast
Alles rund um MS-Access
Auf Thema antworten
Neues Thema
  • Seite:
  • 1

THEMA: Laufzeitfehler bei NICHT Mailversand

Laufzeitfehler bei NICHT Mailversand 2 Jahre, 11 Monate her #545

  • Monika
Hallo,

bin Neuling in Access.

Habe einen:
>>
Laufzeitfehler '2501':

Die Aktion SendObject wurde abgebrochen.
erhindern?

 
If Mail  \"\" Then
 
Dim MailZeile As String
MailZeile = Vorname & \" \" & Nachname & \" \"
DoCmd.SendObject , , , MailZeile, , , , , True
 
End If
 


Danke schon mal.

Gruß Monika
Antwort Zitieren

Re:Laufzeitfehler bei NICHT Mailversand 2 Jahre, 11 Monate her #547

  • TommyK
  • OFFLINE
  • Administrator
  • Beiträge: 502
  • Karma: 4
Hallo Monika,

aus diesem Codeschnipsel kann ich nicht viel entnehmen.
Wo, Wann und wie wird der Code aufgerufen?
Gruß TommyK
Antwort Zitieren

Re:Laufzeitfehler bei NICHT Mailversand 2 Jahre, 11 Monate her #549

  • Monika
Hallo TommyK,

Danke für die schnelle Antwort.

Wo: in einem Formular
Wann: beim klicken auf den \"Mail\"-Button
Wie: über das Ereignis \"Beim Klicken\" (Ereignisprozedur)

Wenn ich ein ausversehen geöffnetes Mailfenster direkt wieder schließe kommt dieser Laufzeitfehler.

Gruß
Monika
Antwort Zitieren

Re:Laufzeitfehler bei NICHT Mailversand 2 Jahre, 11 Monate her #550

  • TommyK
  • OFFLINE
  • Administrator
  • Beiträge: 502
  • Karma: 4
Hallo Monika,

dann nimm diesen Code:
 
   On Error GoTo ErrHandler
 
    If Mail  \"\" Then
 
        Dim MailZeile As String
        MailZeile = Vorname & \" \" & Nachname & \" \"
        DoCmd.SendObject , , , MailZeile, , , , , True
    End If
 
   On Error GoTo 0
   Exit Sub
 
ErrHandler:
    If Err.Number = 2501 Then
        Exit Sub
    Else
        Dim strErrString As String
        strErrString = \"Error Information...\" & vbCrLf
        strErrString = strErrString & \"Error#: \" & Err.Number & vbCrLf
        strErrString = strErrString & \"in Zeile: \" & Erl & vbCrLf
        strErrString = strErrString & \"Description: \" & Err.Description
        MsgBox strErrString, vbCritical + vbOKOnly, \"Error in procedure Mail\"
    End If
 
Gruß TommyK
Letzte Änderung: 2 Jahre, 11 Monate her von TommyK.
Antwort Zitieren

Re:Laufzeitfehler bei NICHT Mailversand 2 Jahre, 11 Monate her #551

  • Monika
Hallo TommyK,

herzlichen Dank mit dem so erweiterten Code funktioniert es jetzt einwandfrei.

Gruß
Monika
Antwort Zitieren
Auf Thema antworten
Neues Thema
  • Seite:
  • 1
Forum TKSoft-Online
MS-Access
MS-Access - Fragen und Antworten
Moderatoren: TommyK
Powered by Kunena
Ladezeit der Seite: 2.22 Sekunden

Login

Hauptmenü

Latest News

Latest Comments

Latest Downloads

Arbeiten mit EXIF-Tags und der GDI+ Library
05.09.2011
in MS-Access Datei & System
Errechnen einer IBAN mit Access
16.06.2011
in MS-Access Sonstiges
Verwaltung eines Skatturniers
31.05.2011
in MS-Access Sonstiges
Arbeiten mit dem TempVars-Objekt
25.03.2011
in MS-Access Sonstiges
Arbeiten mit Fakultät, Variationen und Permutation...
10.02.2011
in MS-Access Sonstiges

Latest Forum Posts

Mehr »

Download Statistik

41 Kategorien
187 Dateien
173377 Downloads

JoomlaWatch 1.2.11 - Joomla Monitor and Live Stats by Matej Koval