TADOQuery Komponente unidirektionalen Datenmenge

[Kevin11]

Hallo,

mit der normalen Select-Abfrage geht ja alles problemlos.

ConnectionString:
Provider=SQLOLEDB.1;Password=***;Persist Security Info=True;User ID=***;Initial Catalog=datenbank;Data Source=servername Ich greife mit ADO auf die MS-SQL Datenbank zu und schreibe es per Firebird 2.0 in eine andere aktuellere Datenbank.

Das letzte Projekt war genau das selbe, nur habe ich auf Acces via ADO Zugegriffen.

Komische Sache

[Kevin11]

Also ich weiß jetzt, dass wenn ich eine ADOQuery auf die Form ziehe und damit arbeite, geht alles. Hat irgendjemand schoneinmal eine ADOQuery Kompontente im Code erzeugt? Fehlen bei mir evtl. wichtige Eigenschaften?

Kevin

[Bernhard Geyer]

Zitat von Kevin11:

Das letzte Projekt war genau das selbe, nur habe ich auf Acces via ADO Zugegriffen.

Bei Access solltest du immer mit Curserlocation clUseServer arbeiten.

[Jumpy]

Delphi-Quellcode:

procedure test;
var
  q:TADOQuery;
Begin
  q:=TADOQuery.Create(self oder nil oder ...);
  q.SQL.Text:='Select * From MyTable';
  try
    q.Connection:=MyADOConnection; //gehe mal davon aus, das MyADOConnection konfiguriert auf der Form liegt
    q.Open;
  finally
    q.Close;
End;

So würd ich das machen und so ähnlich hast du das doch auch gemacht.
Liegts vllt. an der Connection, dass du den Connection-String anders aufgebaut hast, als du die Connection auf die Form gezogen hast?

[Kevin11]

Also ich habe jetzt ein 2. Projekt neu gemacht und baue dort alles Zeile für Zeile nach und dort erzeuge ich alle Querys die ich brauche und es kommt kein Fehler.

[Kevin11]

Jetzt habe ich Probleme mit der Erstellung von dem TClientDataSet.

Delphi-Quellcode:

  zqJuInsert  := TClientDataSet.Create(zqJuInsert);
  with zqJuInsert do
  begin
    ProviderName := 'Form2.DataSetProviderSQL';
    CommandText := 'SELECT * FROM JU_STAMM';
    Open;
  end;

Wenn ich den ProviderName so zuweise:
515: ProviderName := Form2.DataSetProviderSQL; [DCC Fehler] funktionen.pas(515): E2010 Inkompatible Typen: 'string' und 'TDataSetProvider'

[DeddyH]

Was sagt die Hilfe dazu?

Zitat:

Befindet sich der Provider in derselben Anwendung wie die Client-Datenmenge, muss er dieselbe übergeordnete Komponente (Owner) wie die Client-Datenmenge besitzen. Soll ein lokaler Provider mit anderem Owner genutzt werden, verwenden Sie stattdessen die Methode SetProvider.

[Kevin11]

Zitat von DeddyH:

Was sagt die Hilfe dazu?

Zitat:

Befindet sich der Provider in derselben Anwendung wie die Client-Datenmenge, muss er dieselbe übergeordnete Komponente (Owner) wie die Client-Datenmenge besitzen. Soll ein lokaler Provider mit anderem Owner genutzt werden, verwenden Sie stattdessen die Methode SetProvider.

Ich habe es jetzt so gemacht und die Fehler Meldung bleibt gleich:

Delphi-Quellcode:

  zqJuInsert  := TClientDataSet.Create(Form2.DataSetProviderSQL);
  with zqJuInsert do
  begin
    ProviderName := 'Form2.DataSetProviderSQL';
    CommandText := 'SELECT * FROM JU_STAMM';
    Open;
  end;

Fehler: Fehlernder Daten-Provider oder Datenpaket

[DeddyH]

Und das soll jetzt derselbe Owner sein? Schau nochmal genau hin.

[Kevin11]

Jetzt kommt der Fehler:

Änderung am CommandText sind nicht gestattet.

Delphi-Quellcode:

  zqJuInsert  := TClientDataSet.Create(Form2);
  with zqJuInsert do
  begin
    Close;
    ProviderName := 'Form2.DataSetProviderSQL';
    CommandText := 'SELECT * FROM JU_STAMM';
    Open;
  end;