Problem mit Sql Statement

[Borschti]

Hallo mal wieder ;)

Ich habe ein kleines Problem mit einem SQL Statement, und zwar will ich eine ganz simple Abfrage mit meiner Query machen die so in SQL aussehen würde:

SQL-Code:

SELECT * FROM art WHERE ArtNr = '10000'

Nun gibt es aber ein Problem mit den Hochkommas um die 10000, das wollte ich so lösen:

Delphi-Quellcode:

SQL.Add('SELECT ArtNr FROM art');
SQL.Add('WHERE (ArtNr = ' + QuotedStr(VddQuery1.Fieldbyname('ArtNr').asstring) + ')'); // Hier die Fehlermeldung!
Sql.Add('ORDER BY ArtNr');

Ich bekomme aber eine Fehlermeldung die besagt das das Feld ArtNr nicht gefunden wurde, Ich bin mir 100% sicher das das Feld in der Spalte ArtNr mit dem Inhalt 10000 existiert.

Woran kann das liegen?

mfg
Alex

[mkinzler]

Stimmt die Groß-/Klein-Schreibung des Feldes überein?

[DP-Maintenance]

Dieses Thema wurde von "Sharky" von "Sonstige Fragen zu Delphi" nach "Datenbanken" verschoben.
Ist hier sicher besser aufgehoben.

[Sharky]

Hai Borschti,

wie sieht denn der SQL-Befehl von VddQuery1 aus?

[Borschti]

Ja, da bin Ich mir absolut sicher, groß A rt groß N r xD

Aldo alles zusammen siehts so im Code aus:

Delphi-Quellcode:

With VddQuery1 do
  begin
   Close;
   SQL.Clear;
   SQL.Add('SELECT ArtNr FROM art');
   SQL.Add('WHERE (ArtNr = ' + QuotedStr(VddQuery1.Fieldbyname('ArtNr').asstring) + ')');
   Sql.Add('ORDER BY ArtNr');
   Open;
  end;

[5etH]

warum benutzt du nicht standard elemente für die ADS datenbank

[Sharky]

Zitat:

Zitat von Borschti

Ja, da bin Ich mir absolut sicher, groß A rt groß N r xD

Aldo alles zusammen siehts so im Code aus:

Code:

With [b]VddQuery1[/b] do
  begin
   [b]Close;[/b]
   SQL.Clear;
   SQL.Add('SELECT ArtNr FROM art');
   SQL.Add('WHERE (ArtNr = ' + QuotedStr([b]VddQuery1[/b].Fieldbyname('ArtNr').asstring) + ')');
   Sql.Add('ORDER BY ArtNr');
   Open;
  end;

Du kannst doch nicht auf ein Feld des Querys zugreifen wenn des geschlossen ist.

[Borschti]

Ok ;) also habs jtz so,

Delphi-Quellcode:

SQL.Add('WHERE (ArtNr = ' + QuotedStr(Edit1.Text)+')');

Danke.

[RavenIV]

Entweder hast Du uns bei der Query etwas vorbehalten, oder die Query macht keinen Sinn.
Du lässt Dir die ArtNr geben, wo die ArtNr = <Nummer> ist.

[Borschti]

Naja das mit dem Editfeld war nur ein Zwischenschritt, Ich wollte es so machen das ausgewählt werden kann von welchem bis welchem Datensatz der Tabelle die Query gefüllt werden soll ;)

Also es sieht jetzt so aus:

Delphi-Quellcode:

SQLSmt := 'WHERE (ArtNr >= ' + QuotedStr(Edit1.Text)+ 'AND ArtNr <= '+QuotedStr(Edit2.Text)+')';


 With VddQuery1 do
  begin
   Close;
   SQL.Clear;
   SQL.Add('SELECT * FROM art');
   SQL.Add(SQLSmt);
   Sql.Add('ORDER BY ArtNr');
   Open;
  end;

Danke für die Hilfe, aber das mit

Delphi-Quellcode:

SQL.Add('WHERE (ArtNr = ' + QuotedStr(VddQuery1.Fieldbyname('ArtNr').asstring) + ')');

war wirklich unbedacht, hatte es einfach aus einem Beispielprogramm rauskopiert und mich dann drin verbissen :roll: