offene Datenbank-Sessions

[TomDooley]

Hallo

Ich habe auf meiner DB immer sehr viele offene Sessions obwohl ich meiner Meinung nach alles sauber beende. Ich verwende Delphi 5.

Ein ähnliches Problem wurde bereits hier behandelt. Leider hat das alles nichts gebracht...

Mein Connection-String sieht folgendermassen aus:

ConnectionString := 'Provider=SQLOLEDB.1;OLE DB Services=-1;Persist Security Info=False;User ID=test;Password=test;Data Source=Server1;Initial Catalog=DB;Application Name=Test'; Hat jemand noch eine Idee??

Danke

[Phoenix]

Der Connection String sorgt aber nicht dafür, dass Du auf der Connection ein .Close() aufrufst, wenn Du sie nicht mehr brauchst. Das musst Du schon selber machen.

[TomDooley]

Ist mir klar. Das mache ich auch.

[TomDooley]

Hat mir hierzu jemand vielleicht noch einen Tip oder soll ich zusätzliche Infos posten?

[TomDooley]

Hier mal mein aktueller Code...

Delphi-Quellcode:

Query := TADOQuery.Create(nil);
with Query do begin
  Close;
  Connection := ADOConnection;
  ...
  SQL.Clear;
  SQL.Add(SQLStmt);
  ExecSQL;
  ...
  Close;
  Free;
end;
Query := nil;

....

if assigned(ADOConnection) then begin
  ADOConnection.Close;
  ADOConnection.free;
  ADOConnection := nil;
...

[TomDooley]

Könnte das vielleicht auch damit zusammenhängen dass mein SQL-Statement nicht "sauber" ist? Es wird jeweils folgendes Script ausgeführt:

SQL-Code:

Set Nocount ON  
Begin Transaction 
Insert Into TabelleXY (A,B,C) Values (a,b,c)  
Commit