lcDataBaseName = 'MSDN' lcMDBDir = 'C:\My Documents\MSDN CD SUBCRIPTION INDEXES\UN-SUPPED' lcMDBName = 'MSDN APRIL CD SUBCRIPTION INDEX.MDB' lnConnHandle = SQLSTRINGCONNECT('DSN=MS Access Database;DBQ='+; lcMDBDir+'\'+lcMDBName+';DefaultDir='+; lcMDBDir+';DriverId=25;FIL=MS Access;MaxBufferSize=2048;'+; 'PageTimeout=5;UID=admin;') Create data (lcDataBaseName) SQLTABLES(lnConnHandle, ['TABLE'], 'myMDB') Select myMDB Scan lcSQL = 'select * from "'+trim(table_name)+'"' lcCursor = chrtran(trim(table_name),' ','_') lcTableName = '_'+lcCursor SQLEXEC(lnConnHandle,lcSQL,lcCursor) Select (lcCursor) Copy to (lcTableName) Add table (lcTableName) Endscan SQLDISCONNECT(lnConnHandle) Modi dataCetin