DECLARE Integer SQLConfigDataSource in odbccp32.dll Integer, Integer,String, String lcNew="c:\temp\new.mdb" lcFile="c:\temp\Current.mdb" IF SQLConfigDataSource(0,1,"Microsoft Access Driver (*.mdb)","COMPACT_DB= "+lcNew+" "+lcFile)=0 * Failed ENDIFMartinJ