Hallo *.*
ich habe ein Problem, bei dem ich so nicht weiter komme:<BR>
Wenn ich die Procedure unten in meiner Applikation aufrufe, dann<BR>
arbeitet alles soweit normal. Jedoch nur unter MSSQL. Sobald ich<BR>
das gleiche unter Oracle versuche, dauert das setzen der Property<BR>
DS.CommandText geschlagene 11 Sekunden. Das Lesen der Daten ist dann<BR>
mit 500 ms wieder ok. Selbst das Öffnen des DataSets dauert nur ca. 1/2<BR>
Sekunde.<BR>
<BR>
Systemumgebund : WinNT 4.0 SP6 MDAC 2.6 Delphi 5 SP1 Borland Ado-Komponenten SP1/2<BR>
<BR>
Hat jemand einen Tip?<BR>
<BR>
Danke<BR>
<BR>
Mark<BR>
<BR>
<PRE>
Procedure GetADOResult(OLEV: Variant; DS : TADODataSet ; KundeKonto: integer; FieldID : integer);
var
FieldValue : String;
begin
if DS.active = true then DS.Close;
FieldValue := OLEV.GetObjAttrib(FieldID);
try
Case KundeKonto of
0 : begin
// start
DS.CommandText := 'select * from ' + ViewName + ' where NO=''' + FieldValue + '''';
// now 11 seconds are passed
DS.Open; // only takes 1/2 seconds
1 : begin // KundenNrID gegeben
:
:
end;
:
:
end;
except
// Schließen der Datenverbindung<BR>
DS.Close;
end;
end;</PRE>
ich habe ein Problem, bei dem ich so nicht weiter komme:<BR>
Wenn ich die Procedure unten in meiner Applikation aufrufe, dann<BR>
arbeitet alles soweit normal. Jedoch nur unter MSSQL. Sobald ich<BR>
das gleiche unter Oracle versuche, dauert das setzen der Property<BR>
DS.CommandText geschlagene 11 Sekunden. Das Lesen der Daten ist dann<BR>
mit 500 ms wieder ok. Selbst das Öffnen des DataSets dauert nur ca. 1/2<BR>
Sekunde.<BR>
<BR>
Systemumgebund : WinNT 4.0 SP6 MDAC 2.6 Delphi 5 SP1 Borland Ado-Komponenten SP1/2<BR>
<BR>
Hat jemand einen Tip?<BR>
<BR>
Danke<BR>
<BR>
Mark<BR>
<BR>
<PRE>
Procedure GetADOResult(OLEV: Variant; DS : TADODataSet ; KundeKonto: integer; FieldID : integer);
var
FieldValue : String;
begin
if DS.active = true then DS.Close;
FieldValue := OLEV.GetObjAttrib(FieldID);
try
Case KundeKonto of
0 : begin
// start
DS.CommandText := 'select * from ' + ViewName + ' where NO=''' + FieldValue + '''';
// now 11 seconds are passed
DS.Open; // only takes 1/2 seconds
1 : begin // KundenNrID gegeben
:
:
end;
:
:
end;
except
// Schließen der Datenverbindung<BR>
DS.Close;
end;
end;</PRE>
Comment