Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Datentypen in Kriterienausdruck unverträglich
zurück: Neue Tabelle mittels Befehlsschaltfläche erstellen weiter: Bild(+/-Pfad) in einen DS einfügen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Bodde
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Aug 2007, 11:08
Rufname:

Datentypen in Kriterienausdruck unverträglich - Datentypen in Kriterienausdruck unverträglich

Nach oben
       Version: Office 2k (2000)

Hey Leute... Hab folgendes Problem...

Habe ein Formular mit mehreren Textfeldern... In dem einen Textfeld soll eine PLZ eingegeben werden. Wurde dies gemacht, soll überprüft werden, ob diese PLZ schon in der Tabelle vorhanden ist. Ist diese vorhanden soll er in das nächste Textfeld springen! Ist diese Allerdings nicht vorhanden, soll eine msgbox aufgehen und die Aktion abgebrochen werden.

Mein bisheriger Code:
Code:
Private Sub PLZ_LostFocus()
    Dim l_Rs As DAO.Recordset
    Dim l_sql As String
   
    Me!cboOrt.RowSource = ""
    If Not DCount("plz_5", "dbo_T_Stamm_PLZ_Gebiet", _
                  "plz_5 = " & Me!PLZ) > 0 Then
        MsgBox "PLZ '" & Me!PLZ & "' nicht vergeben. " & _
               "Bitte kontaktieren Sie den Administrator..."
    End If
    If Not IsNull(Me!PLZ) Then
         If Not IsEmptyString(Me!PLZ) Then
             Me!cboOrt.RowSource = _
                     "SELECT DISTINCT Ort " & _
                                "FROM dbo_T_Stamm_PLZ_Gebiet " & _
                               "WHERE plz_5 = '" & Me!PLZ & "'"
             l_sql = "SELECT DISTINCT [Land],[zuständiger ADM] " & _
                                "FROM dbo_T_Stamm_PLZ_Gebiet " & _
                               "WHERE plz_5 = '" & Me!PLZ & "'"
             Set l_Rs = CurrentDb.OpenRecordset(l_sql)
             If l_Rs.EOF And l_Rs.BOF Then   'keine Datensaetze vorhanden
                 Exit Sub
             End If
             If Not IsNull(l_Rs![Land]) Then
                 Me!Bundesland = l_Rs![Land]
             End If
             l_Rs.Close
         End If
     End If
End Sub
Wenn ich diesen jetzt Ausführe bringt er mir die Meldung Datentypen in Kriterienausdruck unverträglich!

Was ist denn falsch??

Bitte um Hilfe!

Danke

Gruß

Bodde

Moderatorenanmerkung:
Brauche dringend Hilfe ist kein besonders hilfreicher Titel. Titel geändert und Codetags gesetzt.
KlausMz
KlausMz
Moderator Access


Verfasst am:
17. Aug 2007, 11:28
Rufname:
Wohnort: Irgendwo in der Pfalz


AW: Datentypen in Kriterienausdruck unverträglich - AW: Datentypen in Kriterienausdruck unverträglich

Nach oben
       Version: Office 2k (2000)

Hallo,
die Hochkomma fehlen. In der Where Bedingung weiter unten sind diese drin. Oder umgekehrt wenn PLZ als Datentyp Zahl definiert ist. Zahl ohne Hochkomma, String(Text) mit Hochkomma. Ich weis nicht wo Deine Fehlermeldung kommt (an welcher Stelle im Code). Es fehlt eventuell auch noch der Ausstieg aus der Sub. Nach der MsgBox vor dem End If noch ein "Exit Sub". Habe den Code nicht genau nachvollzogen, kann vieleicht auch nicht notwendig sein.

_________________
Gruß
Klaus . . . . . Feedback wäre wünschenswert.
Ich möchte bitte keine unaufgeforderten PN. Fragen bitte im Forum.
Bodde
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Aug 2007, 11:32
Rufname:

AW: Datentypen in Kriterienausdruck unverträglich - AW: Datentypen in Kriterienausdruck unverträglich

Nach oben
       Version: Office 2k (2000)

hey

also die Fehlermeldung kommt bei diesem Feld:
Code:
    If Not DCount("plz_5", "dbo_T_Stamm_PLZ_Gebiet", _
                  "plz_5 = " & Me!PLZ) > 0 Then
PLZ in der Tabelle ist als Text definiert...

Gruß
Willi Wipp
Moderator


Verfasst am:
17. Aug 2007, 13:43
Rufname:
Wohnort: Raum Wiesbaden

Re: Datentypen in Kriterienausdruck unverträglich - Re: Datentypen in Kriterienausdruck unverträglich

Nach oben
       Version: Office 2k (2000)

Hi Bodde,

na das hat KlausMz doch schon geschrieben Wink
Code:
    If Not DCount("plz_5", "dbo_T_Stamm_PLZ_Gebiet", _
                  "plz_5 = '" & Me!PLZ & "'") > 0 Then

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
Bodde
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Aug 2007, 14:18
Rufname:


AW: Datentypen in Kriterienausdruck unverträglich - AW: Datentypen in Kriterienausdruck unverträglich

Nach oben
       Version: Office 2k (2000)

Hey...

Ja ich habe es jetzt auch schon gerafft.... Very Happy

Danke vielmals...
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Verknüpfen von Datum: Datentypen unverträglich 2 fragme 95 10. Dez 2013, 17:29
Gast Verknüpfen von Datum: Datentypen unverträglich
Keine neuen Beiträge Access Berichte: Beziehungen mit Datentypen 0 Gast 180 12. Jul 2011, 13:49
Gast Beziehungen mit Datentypen
Keine neuen Beiträge Access Tabellen & Abfragen: Datentyp in Kriterienausdruck unverträglich 5 Gast 1627 04. Jun 2010, 11:06
Gast Datentyp in Kriterienausdruck unverträglich
Keine neuen Beiträge Access Tabellen & Abfragen: Abfragefehler DATENTYP IN KRITERIENAUSDRUCK UNVERTRÄGLICH 10 MBGast 2455 30. März 2010, 12:39
MBGast Abfragefehler DATENTYP IN KRITERIENAUSDRUCK UNVERTRÄGLICH
Keine neuen Beiträge Access Tabellen & Abfragen: Mit Alter Column mehrere Datentypen ändern 2 tazzmania1610 2229 14. Jan 2010, 14:00
MAPWARE Mit Alter Column mehrere Datentypen ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Datentypen in Kriterienausdruck unverträglich 2 flx4000 793 23. Jul 2009, 13:34
flx4000 Datentypen in Kriterienausdruck unverträglich
Keine neuen Beiträge Access Tabellen & Abfragen: Beziehung zwischen Datenbanken, unterschiedliche Datentypen 0 Apocalyptica666 1010 28. Nov 2008, 10:32
Apocalyptica666 Beziehung zwischen Datenbanken, unterschiedliche Datentypen
Keine neuen Beiträge Access Tabellen & Abfragen: Datentypen in Kriterienausdruck unverträglich 3 Gast 1608 14. Dez 2007, 13:35
Gast Datentypen in Kriterienausdruck unverträglich
Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten. Access Formulare: suche nach zwei unterschiedlichen Datentypen 1 pezi4u 394 18. Sep 2007, 11:31
KlausMz suche nach zwei unterschiedlichen Datentypen
Keine neuen Beiträge Access Formulare: Datentyp in Kriterienausdruck unverträglich SQL 1 dummyn 1198 03. Feb 2007, 09:00
gerhardg Datentyp in Kriterienausdruck unverträglich SQL
Keine neuen Beiträge Access Programmierung / VBA: Typen unverträglich???? 1 BorisDieKlinge 501 05. Sep 2006, 13:43
jens05 Typen unverträglich????
Keine neuen Beiträge Access Tabellen & Abfragen: Zwei verschiedene Datentypen Joinen 3 DaGunMan 1010 30. Aug 2006, 08:08
lothi Zwei verschiedene Datentypen Joinen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Word Serienbriefe