Of course:
After you connect to AccessDB (see this line with SQLSTRINGCONNECT()) you could do:

SQLTABLES(lcOBDCh,[TABLE],[cTableCursor])
SELECT cTableCursor
BROWSE
IF LASTKEY() # 27 && user press ESC
   lcTableName = ALLTRIM(Table_Name)
   SQLEXEC(lcOBDCh,"SELECT * FROM ["+ALLTRIM(Table_Name)+"]",[VFPCursor])
   SELECT VFPCursor
   COPY TO (CHRTRAN(lcTableName,[ ],[_]))
ENDIF

This is only an example, no much error checking here


>hi,
>thank you so much,it works
>still i'm very week in english languge,
>is there another way to get all tables form my mdb, after that can i choise any table i need to convert via the same code,
>--------------
>after convert can i make ...
>copy VFPCursor to anyname.dbf.
>
>thanks
>
>>The error message is self describing :-)
>>You do a select to a non existing table, change:
>>[SELECT * FROM MyAccessTable]
>>to [SELECT * FROM HERE_PUT_A_NAME_OF_TABLE_THAT_EXISTS_IN_ACCESS_DATABASE]
>>
>>
>>>hi,
>>>ok i chang the user name and password,
>>>
>>>the error message is:
>>>cannot get data from myaccesstable connectivity error:[microsoft][odbc micrososft acsess driver]the microsoft jet database engin cannot find the input table or query[myacess table] make shure it exists and that its name is spelled correctly.
>>>
>>>--------
>>>i fetch *.mdb
>>>via search result
>>>i see as ex...
>>>name infolder
>>>---- --------
>>>order d:\order
>>>121 d:\fadi
>>>.
>>>.
>>>etc....
>>>i open this folders i see the tables inside and data....
>>>thanks.
>>>>What is the error message? Also you didn't change USERNAME PASSWORD to their appropriate values :-)
>>>>
>>>>
>>>>>hi,
>>>>>i try to use your code as under i get error message, what is rong,
>>>>>i have accesss.mdb at drive d:\ as
>>>>>order\order.mdb and d:\fadi\121.mdb....etc
>>>>>

>>>>>lcOBDCh = SQLSTRINGCONNECT([Driver={Microsoft Access Driver (*.mdb)};Dbq=d:\order\order.mdb;Uid=USERNAME;Pwd=PASSWORD;])
>>>>>

>>>>>
>>>>>thanks
>>>>>
>>>>>>>Hi all,
>>>>>>>
>>>>>>>I need to import the contents of an Access table into an existing FoxPro table. What is the best way to do this? I'm new to FoxPro so don't know much about setting up ODBC links - are there any good examples out there?
>>>>>>>
>>>>>>>Thanks
>>>>>>
>>>>>>An example how to connect to Access DB and get data from one of its tables:
>>>>>>

>>>>>>lcOBDCh = SQLSTRINGCONNECT([Driver={Microsoft Access Driver (*.mdb)};Dbq=FULL PATH TO ACCESS DATABASE HERE;Uid=USERNAME;Pwd=PASSWORD;])
>>>>>>IF lcOBDCh < 1
>>>>>>   AERROR(laError)
>>>>>>   MessageBox([Cannot connect to AccessDB ]+laError[1,2])
>>>>>>   RETURN .f.
>>>>>>ENDIF
>>>>>>IF SQLEXEC(lcOBDCh, [SELECT * FROM MyAccessTable],[VFPCursor]) < 1
>>>>>>   AERROR(laError)
>>>>>>   MessageBox([Cannot get data from MyAccessTable ]+laError[1,2])
>>>>>>   SQLDISCONNECT(lcOBDCh)
>>>>>>   RETURN .f.
>>>>>>ENDIF
>>>>>>SELECT VFPCursor
>>>>>>GO TOP
>>>>>>BROWSE NORMAL
>>>>>>