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:
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?

[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 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,
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 SQL.Add('WHERE (ArtNr = ' + QuotedStr(VddQuery1.Fieldbyname('ArtNr').asstring) + ')'); war wirklich unbedacht, hatte es einfach aus einem Beispielprogramm rauskopiert und mich dann drin verbissen