Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Spaß mit UPPERCASE / LOWERCASE ? (https://www.delphipraxis.net/205829-spass-mit-uppercase-lowercase.html)

jobo 21. Okt 2020 11:52

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
I Like! ;)

Ich würde empfehlen, immer auf beiden Seiten die DB Funktion zu nutzen, um eine "analoge" Funktion zu erhalten.
Ein UpperCase auf der Spalte macht allerdings einen Index unbrauchbar und verlangsamt die Suche deutlich.
Lösungen wären einerseits Expression Indizes wie schon gesagt, allerdings ist es meist nicht vertretbar, alle denkbaren Felder mit diesen Indizes zu versehen. Andererseits gibt es auch Lösungswege über erweiterte like Operatoren (ilike) und jenachdem auch spezielle Collations oder normalisierte Suchspalten.

Uwe Raabe 21. Okt 2020 13:15

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
Zitat:

Zitat von rokli (Beitrag 1475874)
Hallo Uwe,

jetzt sag nicht, dass Du auch noch türkisch sprichst??

Nein, nicht wirklich. Aber ich hatte mal einen Kunden in Istanbul.

himitsu 21. Okt 2020 14:06

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
Zu schön wäre es, wenn jemand Parameter benutzen würde,

aber nocc toller wäre es, wenn endlich mal niemand mehr das QuoteStr für SQL-Statements benutzen täte, denn dafür ist es nicht da und auch noch total falsch.

Delphi-Quellcode:
EdPfad.Text := 'E:\inPfad\';
SQL.Text := 'SELECT * FROM irgendwas WHERE sonstwas = ' + QuoteStr(EdPfad) + ' AND nochwas';
Es ist hier zwar schwerer ein DROP DATABASE ins Edit zu schreiben, aber zumindestens kann man ganz leicht das SQL verrecken lassen (Syntaxfehler, mit nur einem einzigen \)

Einer unserer Kunden kam auf die geile Idee ' in Artikelnamen zu benutzen,
was besonders toll Endete, als diese Strings von Delphi durch Python, zurück in PascalScript und zu PSQL wanderte.
Teilweise mehrfaches Escaping mit unterschiedlichen Syntaxen (Pascal/Pythen/SQL).

QuoteString kennt ausschließlich die Syntax von Pascal-Strings, also nur das '.

rokli 27. Okt 2020 09:21

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
Hallo himitsu,

Zitat:

Zitat von himitsu (Beitrag 1475901)
aber nocc toller wäre es, wenn endlich mal niemand mehr das QuoteStr für SQL-Statements benutzen täte, denn dafür ist es nicht da und auch noch total falsch.

Ich wäre Dir sehr dankbar, wenn Du mir Deine Version - ohne QuotedStr - einmal zeigen würdest!
Vielen Dank für Deine Mühe!

Bernhard Geyer 27. Okt 2020 09:37

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
Zitat:

Zitat von himitsu (Beitrag 1475901)
Einer unserer Kunden kam auf die geile Idee ' in Artikelnamen zu benutzen,
was besonders toll Endete, als diese Strings von Delphi durch Python, zurück in PascalScript und zu PSQL wanderte.
Teilweise mehrfaches Escaping mit unterschiedlichen Syntaxen (Pascal/Pythen/SQL).

Hatten mal eine CRM das auch mit (dem Access-Gegenstück zu) direkten Zusammenbau und Ausführen von Queries gearbeitet hat.
Ein DropDatabase wäre leicht möglich (hat keiner gemacht).
Aber die "bösen Franzosen" mit ihren ' in den Adressen ...

Delphi.Narium 27. Okt 2020 11:14

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
Zitat:

Zitat von rokli (Beitrag 1476175)
Hallo himitsu,

Zitat:

Zitat von himitsu (Beitrag 1475901)
aber nocc toller wäre es, wenn endlich mal niemand mehr das QuoteStr für SQL-Statements benutzen täte, denn dafür ist es nicht da und auch noch total falsch.

Ich wäre Dir sehr dankbar, wenn Du mir Deine Version - ohne QuotedStr - einmal zeigen würdest!
Vielen Dank für Deine Mühe!

Delphi-Quellcode:
qryKD.Close;
qryKd.SQL.Text := sSQL + ' AND UPPER(Kd.Name1) LIKE UPPER(:KdName) ORDER BY Kd.Name1';
qryKD.Params[0].AsString := TRIM(edtName1.Text) + '%';
// oder über den Parameternamen:
qryKD.ParamByName('KdName').AsString := TRIM(edtName1.Text) + '%';
qryKD.Open;

rokli 27. Okt 2020 11:30

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
Danke, Delphi.Narium

und was bedeutet:
Zitat:

Zitat von himitsu (Beitrag 1475901)
denn dafür ist es nicht da und auch noch total falsch.


Delphi.Narium 27. Okt 2020 12:20

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
QuotedStr setzt die Hochkommata pascalkonform und nicht sqlkonform.
Oft passt das mit den ' aber nicht immer und bei dem "nicht immer" ist es möglich, durch geschicktes setzen der Hochkommata "so mal eben" in ein gültig aussehendes SQL weitere SQL-Statements einzufügen, mit denen man im "Idealfall" den gesamten Datenbestand ruinieren kann.

Oder mal anders formuliert: Unter Zuhilfenahme von QuotedStr (bzw. dem Zusammenbau von SQLs durch das Zusammenfügen von Strings) kann man Schadcode in ein SQL einfügen und diesen dann per Open bzw. ExecSQL ausführen lassen.

Bei der Nutzung von Parametern ist dies nicht möglich. Egal was man da in den Parameter "reinschiebt", es wird immer als Gesamtes (als Inhalt) in einem einzigen Wert interpretiert.

Da QuotedStr nur das ' kennt, wird man mit QuotedStr bei allen Datenbanken, die auch noch was anderes als das ' unterstützen / verlangen, scheitern.

rokli 28. Okt 2020 07:44

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
Guten Morgen Delphi.Narium,

vielen Dank für Deine ausführlichen Informationen! Das war sehr hilf- und lehrreich für mich!

Da ich aber schon etliche hundert SQL Statements in dieser Form geschrieben habe, werde ich das in Zukunft so machen!

Beste Grüße

himitsu 28. Okt 2020 08:25

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
QuoteStr:
Eine orgendliche SQL-Library sollte irgendwo eine Quote-/Escape-Funktion besitzen, welche die Sprache des entsprechenden SQL spricht.

Wenn man nicht umher kommt und den SQL-Text zusammensetzen muß,
entweder direkt oder mit Makros, dann sollte man eben auch die richtige Funktion benutzen.


In PgDAC z.B. gibt es eine/zwei Funktion mit zuvielen Parametern, welche 'Strings' und "Bezeicher" behandeln kann. (über Ableitung oder ClassHelper kann man sich dann die Verwendung vereinfachen und sie zum leichtern Auffinden auch direkt an die Klassen der Conneecton oder des Query anhängen)


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:39 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