Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Suche in Adressbuch (https://www.delphipraxis.net/173092-suche-adressbuch.html)

hansklok 6. Feb 2013 18:49

AW: Suche in Adressbuch
 
wie, was? Nein, oder ich verstehe etwas nicht.
Ich prüfe ob Vor- und Nachname vorhanden, wenn ja, dann True, sonst False. Oder verstehe ich da etwas falsch? ;-)

DeddyH 6. Feb 2013 18:52

AW: Suche in Adressbuch
 
So sehe ich das auch. Du hast aber doch den umgekehrten Fall geschildert: Nachname vorhanden, aber nicht in Kombination mit dem Vornamen, trotzdem true als Ergebnis. Oder kommt jetzt immer false zurück, auch bei vorhandenem Datensatz?

haentschman 6. Feb 2013 18:56

AW: Suche in Adressbuch
 
Zäume das Pferd doch mal anders herum auf:
Code:
  Dim AutorVorname As String =Trim(Vorname)
  Dim AutorNachname As String =Trim(Nachname)
  Dim rsAutor As RecordSet = DB.SQLSelect("SELECT * FROM Autoren WHERE (Nachname = '" + AutorNachname + "' AND Vorname = '" + AutorVorname + "')")
// Alternative
 Dim rsAutor As RecordSet = DB.SQLSelect("SELECT * FROM Autoren WHERE (Nachname = '" + AutorNachname + "' AND Vorname LIKE '" + AutorVorname + "%'")
  Return False
  //wenn Autor bereits vorhanden
  If rsAutor <> Nil Then
 
    'If not rsAutor.EOF Then // ggf. rsAutor.IsEmpty oder über rsAutor.Count (RecordCount) ... also quasi ist Leer
    'Return True
    'End If
  End If
... ohne Gewährleistung für die Syntax...

hansklok 6. Feb 2013 18:59

AW: Suche in Adressbuch
 
Es ist mir ein Rätsel,

nachdem ich die letzten 1,5 h damit verbracht habe alle möglichen Varianten der Abfrage zu checken, funktionierts plötzlich doch mit:

Code:
"select * from Autoren where Nachname = '"+ Nachname +"' AND Vorname = '"+ Vorname +"'"
Vielen Dank für euren Einsatz, auch wenn ich mittlerweile nicht mehr aktiv mit Delphi programmiere, ich weiß schon, warum ich weiterhin in diesem Forum aktiv bin.

HG HansKlok


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:19 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz