INSERT INTO extrait2011 SELECT * FROM extrait2011 IN 'C:\WINDOWS\PG\MH.PG]'
INSERT INTO extrait2011 SELECT * FROM extrait2011 IN 'C:\WINDOWS\PG\MH.PG'
Set RS = NothingSet RS = New ADODB.RecordsetRS.Open "Insert Into Table1 In'" & App.Path & "\db2.mdb" & "'[;Database=db2.mdb;PWD=123]" & " Select * From Table1", DB, adOpenDynamic, adLockOptimistic