Salut A Tous
Du coup j'ai trouvé ma solution
chdir(GETDIR("C:\org\"))
NBTABLE=ADIR(TABLEAU,'*.dbf')
for k=1 to nbtable
curnom=tableau(k,1)
curnom2=left(curnom,len(curnom)-4)
* insérer vos requêtes
use &curnom2
count to nbenr
req = "select * from '"+curnom2+"' where recno()=1 or recno()="+alltrim(str(nbenr))+" nowait"
&req
req1="copy to diito"+curnom2+" xl5"
&req1
close tables
next k
close tables
messagebox("Les dittos ont bien ete exportés !!")
