AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken SQL-Statement doesn't return rows
Thema durchsuchen
Ansicht
Themen-Optionen

SQL-Statement doesn't return rows

Ein Thema von Khanysha · begonnen am 22. Sep 2016 · letzter Beitrag vom 23. Sep 2016
Antwort Antwort
Khanysha

Registriert seit: 11. Jun 2015
Ort: Dunkeldeutschland
23 Beiträge
 
Delphi 7 Professional
 
#1

AW: SQL-Statement doesn't return rows

  Alt 23. Sep 2016, 07:49
Als Beispiel:
Delphi-Quellcode:
qry.sql.text := memo.text;
if AnsiLowerCase(Copy(qry.sql.text,1,6)) = 'selectthen begin
  qry.Open;
end else begin
  qry.ExceSQL;
end;
StatusBar.SimpleText := Format('Von der Abfrage waren %d Zeilen betroffen.',[qry.RowsAffected]);
Getestet und funktioniert Nun probiere ich die anderen Sachen aus



Das mit dem SELECT am Anfang ist nicht immer richtig (und ziemlich frustrierend wenn ein Programm für ein paar K€ das nicht weiß)
Kannst du mir das genauer erklären? Es soll doch nur für SELECT OPEN genommen werden, hab ich am Anfang einer Anweisung nicht SELECT oder die anderen stehen? Also kann ich das auch verdrehen oder gar verschachteln?
LG
Lizzy

Geändert von Khanysha (23. Sep 2016 um 08:01 Uhr)
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.875 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: SQL-Statement doesn't return rows

  Alt 23. Sep 2016, 08:29
Verdrehen nicht aber verschachteln oder Klammern.
Markus Kinzler
  Mit Zitat antworten Zitat
Morphie

Registriert seit: 27. Apr 2008
Ort: Rahden
630 Beiträge
 
#3

AW: SQL-Statement doesn't return rows

  Alt 23. Sep 2016, 08:29
Es gibt auch noch diverse andere SQL-Befehle, die dir Daten zurück liefern.
z.B. INSERT mit einer entsprechenden Returning-Clause: http://firebirdsql.org/refdocs/langr...sert-returning

Die Regel "wenn select dann open und sonst execsql" ist grundlegend falsch.
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.875 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: SQL-Statement doesn't return rows

  Alt 23. Sep 2016, 08:32
Füt seienn Zweck extra einen komplexen Parser zu Schreiben, wäre aber mit Atomraketen auf Ameisen geschossen.
Markus Kinzler
  Mit Zitat antworten Zitat
jobo

Registriert seit: 29. Nov 2010
3.072 Beiträge
 
Delphi 2010 Enterprise
 
#5

AW: SQL-Statement doesn't return rows

  Alt 23. Sep 2016, 08:37
Füt seienn Zweck extra einen komplexen Parser zu Schreiben, wäre aber mit Atomraketen auf Ameisen geschossen.
Genau!
Gruß, Jo
  Mit Zitat antworten Zitat
Morphie

Registriert seit: 27. Apr 2008
Ort: Rahden
630 Beiträge
 
#6

AW: SQL-Statement doesn't return rows

  Alt 23. Sep 2016, 08:38
Das Fangen der Exception wäre aber eine zumutbare Option, finde ich.
  Mit Zitat antworten Zitat
jobo

Registriert seit: 29. Nov 2010
3.072 Beiträge
 
Delphi 2010 Enterprise
 
#7

AW: SQL-Statement doesn't return rows

  Alt 23. Sep 2016, 08:42
Die Regel "wenn select dann open und sonst execsql" ist grundlegend falsch.
Sie ist nicht immer richtig, das allerdings in ganz anderen Anwendungsfällen. Hier im Beispiel bei programmatischer Weiterverarbeitung, die sowieso nur auf gezielte Anwendungsfälle zutreffen kann und nicht bei der interaktiven Eingabe eines SQL Statements durch den Anwender.
Wir können ruhig die Kirche im Dorf lassen oder?
Gruß, Jo
  Mit Zitat antworten Zitat
jobo

Registriert seit: 29. Nov 2010
3.072 Beiträge
 
Delphi 2010 Enterprise
 
#8

AW: SQL-Statement doesn't return rows

  Alt 23. Sep 2016, 08:37
Ich vermute p80286 findet es traurig, dass die Komponenten nicht "von allein" erkennen, welche Form (Datenabfrage oder Befehl) verwendet wird.

Die Interpretation mittels
Code:
AnsiLowerCase(Copy(qry.sql.text,1,6)) = 'select'
funktioniert natürlich, aber eben nur genau dann, wenn es genauso im String drin steht. Was nötig wäre, um es "wasserdicht" zu machen wäre ein parsind (Parser) für diesen String und das ist nicht unbedingt anfänger Stoff.
Nur mal als Idee:
"select" ist nicht das gleiche wie
Code:
 Select ..
(voranstehendes Leerzeichen)
Code:
-- Kommentar: jetzt die Menge abfragen
select ..
Code:

select ..
(voranstehende Leerzeile)
Ein Parser könnte man verwenden, um den SQL String zu analysieren und festzustellen, welche Form im SQL String steht und anhand dessen entscheiden, ob "OPEN" oder "EXECUTE" verwendet wird.

Wenn Du die Erkennung mittels "copy(1,6)" verwendest, wirst Du sicher bald mal darüber stolpern, wenn Du versehentlich ein Leerzeichen vor dem Select stehen hast oder sowas.

Aber mach Dich nicht verrückt deswegen. Softwareentwicklung ist nicht immer eine Frage von Richtig/Falsch. Häufig geht es um Aufwand und Nutzen. Der Grad der Umsetzung wird gelegentlich damit beschrieben, dass 10% Aufwand 90% Nutzen bringen, der restliche Aufwand (90%) für die letzen 10% Nutzen drauf geht. (So ungefähr, dazu gibt es glaube ich unter bestimmten Begriffen auch wissenschaftliche Untersuchungen)
Gruß, Jo
  Mit Zitat antworten Zitat
Khanysha

Registriert seit: 11. Jun 2015
Ort: Dunkeldeutschland
23 Beiträge
 
Delphi 7 Professional
 
#9

AW: SQL-Statement doesn't return rows

  Alt 23. Sep 2016, 08:44
"select" ist nicht das gleiche wie
Code:
 Select ..
(voranstehendes Leerzeichen)
Code:
-- Kommentar: jetzt die Menge abfragen
select ..
Code:

select ..
Ich bin mir dessen bewusst das Select nicht select ist, aber deswegen doch AnsiLowerCase, das macht doch alle Buchstaben klein. Gut das mit dem Leerzeichen ist natürlich so ne Sache.

Ich mache mich mal dran die Exception abzufangen.

EDIT: Also mit der Exception hab ich noch so meine Probleme, hab ich aber jedesmal... Aber was die Leerzeichen anbelangt, kann ich doch mit TrimLeft arbeiten, dann kannst soviele Leerzeichen davor tackern und es interessiert keinen.

Edit2: Okay der Ausschnitt mit dem Kommentar könnte noch ein Problem werden. Nachher werden ja nur Daten aus der Datenbank abgefragt, um sie auswählen zu können und dann nachher noch zu Drucken. Man/Der Benutzer arbeitet gar nicht mit den SQL-Abfragen.

LG
Lizzy

Geändert von Khanysha (23. Sep 2016 um 12:26 Uhr)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:43 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz