Dublikate ausblenden

[DeddyH]

Und so?

SQL-Code:

SELECT DISTINCT(T.MaTyp) FROM Anlagentyp T, Anlagen A 
WHERE A.Typ_ID = T.Typ_ID
AND A.Kunden_ID = :Kunden_ID

[marabu]

Hallo Leute,

wenn Access 2003 ein Subselect unterstützt, dann würde ich es so machen:

SQL-Code:

SELECT MaTyp FROM AnlagenTyp WHERE Typ_Id IN (SELECT Typ_ID FROM Anlagen WHERE Kunden_ID = :Kunden_Id)

Freundliche Grüße

[MCOP2001DE]

es wird wohl nicht unterstützt fehlermeldung ist für mindetens einen erfordelichen Parameter ist kein Wert angegeben.

[marabu]

Das ist kein Hinweis auf eine fehlende SubSelect-Unterstützung, sonder soll dich daran erinnern den Parameter 'Kunden_ID' zu besetzen ...

[DeddyH]

Du hast in Access getestet? Falls ja, hast Du auch die Variable :Kunden_ID durch einen echten Wert ersetzt?

[edit] 2 late :? [/edit]

[MCOP2001DE]

in dem Feld DBT_Kunden_ID.Caption ist der Wert gesetzt.
oder kann er ihn nicht zuweisen?

ersetzte ich den Wert so

Delphi-Quellcode:

with Anlagensuche.Anlagentyp do
    begin
      close;
      SQL.Clear;
      SQL.Text := 'SELECT MaTyp FROM AnlagenTyp WHERE Typ_Id IN (SELECT Typ_ID FROM Anlagen WHERE Kunden_ID = :Kunden_Id)';
      Parameters.ParamByName('Kunden_ID').Value := '1';//DBT_Kunden_ID.Caption;
      open;
    end;

bekomme ich den gleichen Fehler

[DeddyH]

ADO ist immer noch nicht meine Welt, aber...

Delphi-Quellcode:

Parameters.ParamByName('Kunden_ID').Value := 1;

Does it work?

[MCOP2001DE]

Auch so kann er keinen Wert finden selbe Fehlermeldung

[DeddyH]

Dann kann ich Dir nicht weiterhelfen, ich habe kein Access zum Ausprobieren.

[MCOP2001DE]

:lol: So klappt es

SQL-Code:

'SELECT * FROM Anlagentyp WHERE Typ_ID IN (SELECT Typ_ID FROM Anlagen WHERE Kunden_ID=:Kunden_ID)'

Danke für eure Antworten

:hello: