Query Abfrage

Arne Danikowski · Beiträge: 194

ich befüchte mal, damit komm ich nicht zurecht aber trotztem vielen dank für deine Bemühungen.
jetzt geht zwar das ftString aber ein ASString hab ich immer noch ich

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

uses lager_data, lager_eingang, db;

lagerdata.ADOEingangQuery.SQL.Clear;
    lagerdata.ADOEingangQuery.SQL.Text:= 'SELECT Seriennummer FROM Eingang WHERE Seriennummer = :seriennr';
    lagerdata.ADOWareneingangQuery.Parameters.ParamByName('seriennr').DataType := ftString;
    lagerdata.ADOEingangQuery.Parameters.ParamByName('seriennr').??? (geht nicht)ASString
    lagerdata.ADOEingangQuery.open;

Robert.Wachtel · Verfasst: Mo 01.09.08 13:41

Du könntest ja auch mal in die Hilfe schauen und nachsehen, welche Methoden/Eigenschaften ParamByName hat. Vielleicht gibt es ja eine Eigenschaft namens Value?

Arne Danikowski · Beiträge: 194

Das hat irgenwie nicht hingehauen aber ich konnte das Proplem so lösen:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

Lagerdata.ADOEingangQuery.close;
  Lagerdata.ADOEingangQuery.SQL.clear;
  Lagerdata.ADOEingangTable.IndexFieldNames:='Seriennummer';
  lagerdata.ADOEingangQuery.SQL.Text := 'Select * From Eingang WHERE (Seriennummer LIKE ' + QuotedStr(sucheseriennr + '%') + ')';
  Lagerdata.ADOEingangQuery.Open;

alzaimar · Verfasst: Mo 01.09.08 15:09

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

lagerdata.ADOEingangQuery.SQL.Text:= 'SELECT Seriennummer FROM Eingang WHERE Seriennummer = :seriennr';
//lagerdata.ADOWareneingangQuery.Parameters.ParamByName('seriennr').DataType := ftString;
//          xxxxxxxxxxxxxxxxxxxx  BLÖDSINN wir arbeiten ja mit "ADOEingangQuery"
lagerdata.ADOEingangQuery.Parameters.ParamByName('seriennr').DataType := ftString;
lagerdata.ADOEingangQuery.Parameters.ParamByName('seriennr').Value := MyEdit.Text;
lagerdata.ADOEingangQuery.open;

Sollte funktionieren.

_________________
Na denn, dann. Bis dann, denn.

Arne Danikowski · Beiträge: 194

tut es auch
vielen Dank !!

saxe66 · Beiträge: 104

Sofern du in Textfeldern sucht, ist, so denke ich jedenfalls, die QuotedStr-Anweisung am effektivsten.

Also etwa so ...

var suche: string;

suche:=Edit1.Text;

Query.SQL.Add('select * from datenbank where seriennummer='+QuotedStr(suche));

Mehr ist hier nicht notwendig.

alzaimar · Verfasst: Do 11.09.08 13:10

saxe66, das ist keine gute Idee, denn es kann sein, das das DBMS diese einfachen Hochkommata nicht akzeptiert.

Es ist wirklich besser, mit parametrisierten Queries zu arbeiten, weil nur hier sicher ist, das die Formatierung des SQL-Befehls korrekt ist.

_________________
Na denn, dann. Bis dann, denn.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme