Einzelnen Beitrag anzeigen

fredi

Registriert seit: 6. Aug 2003
43 Beiträge
 
Delphi 5 Professional
 
#1

öffnen v. ADO Table sehr langsam

  Alt 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
  Mit Zitat antworten Zitat