Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Access 2003 - Unzulässige Verwendung von Null - Abfrage von 3 DropDown

Frage Microsoft Microsoft Office

Mitglied: 69304

69304 (Level 1)

08.12.2008, aktualisiert 10.12.2008, 10504 Aufrufe, 5 Kommentare

Ein Formular hat 3 DropDows, die von einer anderen Tabelle gefüllt werden. Klappt soweit Prima.

Es soll eine Mail an die User aus den DropDown geschickt werden. Würde auch soweit klappen, aber!

Wenn Feld 2 und/oder 3 leer ist, bekomm ich immer die Meldung "Unzulässige Verwendung von Null"...

Hier mein VBA-Code, vllt sieht ja jemand die Lösung sofort...


01.
Dim Empfaenger1 As String 'Zwischenvariablen 
02.
Dim Empfaenger2 As String 'Zwischenvariablen 
03.
Dim Empfaenger3 As String 'Zwischenvariablen 
04.
   
05.
Dim Empfaenger As String 'Der eigentliche SendTo-String 
06.
   
07.
Empfaenger1 = Me!Bearbeiter1.Value 'Wert aus Formular auslesen 
08.
Empfaenger2 = Me!Bearbeiter2.Value 'Wert aus Formular auslesen 
09.
Empfaenger3 = Me!Bearbeiter3.Value 'Wert aus Formular auslesen 
10.
   
11.
If Not IsNull(Empfaenger1) Then 
12.
  MsgBox ("Bitte mindestens einen Bearbeiter auswählen!!!") 'Sicherheitsabfrage, dass mindestens einer ausgewählt ist! 
13.
Else 
14.
  If Not IsNull(Empfaenger2) Then 
15.
      If Not IsNull(Empfaenger3) Then 
16.
          Empfaenger = Empfaenger1 + ";" + Empfaenger2 + ";" + Empfaenger3 
17.
      Else 
18.
          Empfaenger = Empfaenger1 + ";" + Empfaenger2 
19.
      End If 
20.
  Else 
21.
      Empfaenger = Empfaenger1 
22.
  End If 
23.
End If 
24.
   
25.
DoCmd.SendObject , "", "", Empfaenger, "mail@adresse.de", Null, "Betreff", "!!! TEST TEST TEST !!!", False
Gruß,
René.
Mitglied: dog
08.12.2008 um 20:42 Uhr
Das letzte mal, dass ich mit VB gearbeitet hat war das Concatenation-Zeichen noch &:

01.
  Empfaenger = Empfaenger1 & ";" & Empfaenger2 
Vielleicht hilft das?
Bitte warten ..
Mitglied: 69304
09.12.2008 um 08:07 Uhr
Hallo!

Danke erstmal für die Antwort.

Ich habe alle "+" in "&" geändert - trotzdem noch die selbe Fehlermeldung...

Sonst noch jemand einen Idee?
Bitte warten ..
Mitglied: Bolle97
09.12.2008 um 08:40 Uhr
Hallo,

Variablen vom Type "String" können keine NULL-Werte speichern, eine nicht gefüllte String-Variable prüft man mit <> "" (2 Anführungszeichen hintereinander). Nur Variablen vom Type Variant können Null-Werte speichern.

Gruß - René
Bitte warten ..
Mitglied: Logan000
09.12.2008 um 08:59 Uhr
Moin Moin

01.
... 
02.
If Not IsNull(Empfaenger1) Then  
03.
  MsgBox ("Bitte mindestens einen Bearbeiter auswählen!!!") 'Sicherheitsabfrage, dass mindestens einer ausgewählt ist!  
04.
... 
Müste da nicht das NOT weg? Oder wie mus ich mir das vorstellen?

Später prüfst du zwar ob Empfänger2 & 3 nicht NULL sind, aber Empfänger 1 kann eigentlich nur NULL sein (da ELSE Zweig des obrigen IFs) und das wird bei der Stringverkettung diesen Fehler auslösen.

Gruß L.
Bitte warten ..
Mitglied: 69304
10.12.2008 um 08:38 Uhr
Tja, waren dann doch mehrere Faktoren.

Erstmal alle Variablen als Typ "Variant" deklariert

01.
Dim Nachricht As Variant
Den Code an sich hab ich auch noch so umgestellt:

01.
If IsNull(Empfaenger1) Then 'Wenn Empfaenger1 leer... 
02.
    MsgBox ("Bitte mindestens einen Bearbeiter auswählen!!!") 'Sicherheitsabfrage, dass mindestens einer ausgewählt ist! 
03.
  Else 'Wenn mindestens 1 Empfänger gesetzt ist... 
04.
    If Empfaenger2 <> "" Then 
05.
        If Empfaenger3 <> "" Then 
06.
            Empfaenger = Empfaenger1 & ";" & Empfaenger2 & ";" & Empfaenger3 
07.
        Else 
08.
            Empfaenger = Empfaenger1 & ";" & Empfaenger2 
09.
        End If 
10.
    Else 
11.
        Empfaenger = Empfaenger1 
12.
    End If 
13.
    MsgBox ("DEBUG: Empfaenger: " & Empfaenger) 
14.
    DoCmd.SendObject , "", "", Empfaenger, CC, Null, Betreff, "!!! TEST TEST TEST !!!", False 'SendObejct aus Access (Zum Emails senden) 
15.
  End If
Bitte warten ..
Neuester Wissensbeitrag
Internet

Unbemerkt - Telekom Netzumschaltung! - BNG - Broadband Network Gateway

(3)

Erfahrungsbericht von ashnod zum Thema Internet ...

Ähnliche Inhalte
Datenbanken
gelöst Access 2010 Abfrage erster Werktag (10)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Datenbanken
gelöst Access 2010 komplizierte Abfrage (3)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Heiß diskutierte Inhalte
Switche und Hubs
Trunk für 2xCisco Switch. Wo liegt der Fehler? (17)

Frage von JayyyH zum Thema Switche und Hubs ...

Windows Server
Outlook Verbindungsversuch mit Exchange (15)

Frage von xbast1x zum Thema Windows Server ...

Microsoft Office
Keine Updates für Office 2016 (11)

Frage von Motte990 zum Thema Microsoft Office ...