Zur Laufzeit auf Datenbank verbinden

[Tyrael Y.]

Ich benutze eine MSSQL Datenbank.

Ich versuche mich folgendermassen zu verbinden

Code:

procedure TForm1.FormCreate(Sender: TObject);
begin
  fDBConnector := TADOConnection.Create(nil);
  ConnectDatabase();
end;

Procedure TForm1.ConnectDatabase();
begin
  fDBConnector.LoginPrompt := False;
  fDBConnector.ConnectionString := 'Provider=SQLOLEDB.1;Password=test;Persist Security Info=True;User ID=sa;Data Source='myHost';
  fDBConnector.Connected := True;
end;

.. ich krieg die Meldung, daß ich kein ConnectionString hätte.

Was ist hier falsch?


Grüße Tyrael

[Tyrael Y.]

habs gelöst


den Connector.ConnectionString musste ich gleich Query.ConnectionString setzen

[Tyrael Y.]

völliger Unsinn was ich da geschrieben habe...

... das

Zitat:

den Connector.ConnectionString musste ich gleich Query.ConnectionString setzen

... hat nur ZUFÄLLIG geklappt, da ich so gesehen eine neue Verbindung hierdurch aufgebaut habe...

... der obige Code ist völlig einwandfrei...

.. nur WICHTIG....

Code:

lQuery.Connection := fDBConnector;

das muss noch rein bei der Query, dann ist alles gut