Registriert seit: 6. Aug 2003
43 Beiträge
Delphi 5 Professional
|
öffnen v. ADO Table sehr langsam
29. Okt 2003, 14:07
Hallo an alle,
das öffenen einer simplen dBase Table mit ca. 300 Records dauer fast ewig..
1. Einstellungen:
1.1. folgende Einstellungen habe ich bei der ADOConnection:
ConnectionOption := coConnectUnspecified
CursorLocation=clUseClient
IsolationLevel=ilReadCommitted
LoginPrompt=false;
Mode=cmReadWrite
1.2. Einstellung ADOTable
AutiCalcFields=false
CacheSize=1
CursorLocation=clUserClient
CursorType=ctDynamic
LockType=ltBatchOptimistic
MarshalOption=moMarshalModifiedOnly
MaxRecords=0
ReadOnly=false
TableDirect=true;
2. so öffne ich di Tabelle:
2.1.) ADOConnection aufbauen und connect
Screen.Cursor := crSQLWait;
ImpAusstForm.ADODBFTable.Close;
x_DBFDir := ExtractFileDir(ImpAusstForm.OpenDialog1.FileName);
vFileName := ExtractFilename(ImpAusstForm.OpenDialog1.FileName) ;
ImpAusstForm.ADODBFConnection.ConnectionString := '';
ImpAusstForm.ADODBFConnection.ConnectionString:='P rovider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='+ x_DBFDir +';Mode=ReadWrite; Extended Properties=dBase III;';
ImpAusstForm.ADODBFConnection.LoginPrompt:=false;
ImpAusstForm.ADODBFConnection.Connected:=true;
2.2. öffnen der ADTable
//bis daher gehts ja noch schnell, aber das öffnen der tabelle dauert ca. 20-30Sec.
ImpAusstForm.ADODBFTable.TableName := vFileName;
ImpAusstForm.ADODBFTable.open;
Screen.Cursor := crDefault;
meine Frage:
1. was kann man bei den Einstellungen verbessern (ADOConnection u. ADOTable)
2. wie schauts mit dem connectionstring aus, ist der OK ?
danke für eure hilfe
fredi
|