ADO og accessdatabase

Tags:    delphi

User
Bruger #353 @ 21.10.04 16:46
Jeg skal hente nogle ting i min DBgrid og bruger følgende kode til det:

path := (ExtractFilePath(ParamStr(0))+'Skema.mdb');
adoconnection1.Connected := false;
connstr := 'Provider=Microsoft.Jet.OLEDB.4.0;'+
'User ID=Admin;Data Source=' +
Path +
';Mode=Share Deny None;'+
'Persist Security Info=False;';

adoconnection1.ConnectionString := connstr;
adoconnection1.Connected := true;
adotable1.TableName := 'dag';
adotable1.Active := true;


Det virker fint nok.
Nu vil jeg så hente data ind i en anden dbgrid og sætter derfor en dbgrid på min form samt endnu en Datasource og en ADOTable, nu ville jeg så mene at min kode skulle se sådan ud:

path := (ExtractFilePath(ParamStr(0))+'Skema.mdb');
adoconnection1.Connected := false;
connstr := 'Provider=Microsoft.Jet.OLEDB.4.0;'+
'User ID=Admin;Data Source=' +
Path +
';Mode=Share Deny None;'+
'Persist Security Info=False;';

adoconnection1.ConnectionString := connstr;
adoconnection1.Connected := true;
adotable1.TableName := 'dag';
adotable1.Active := true;
adotable2.TableName := 'time';
adotable2.Active := true;


Men det virker bare ikke, jeg får besked om at der er syntax fejl i from sætningen??
Kan nogen hjælpe mig her?!



t