El problema lo tienes, porque lo estás haciendo al revés
La instrucción
- Code: Select all Expand view
aTables := FW_AdoTables( oCn )
es incorrecta, eso te devuelve las tablas que hay en el servidor, y tú necesitas los dbf que vas a importar
Tienes que leer todos los dbf para pasárselos a la function de importación
- Code: Select all Expand view
aTables := HB_dirScan( cPath, "*.dbf", "A" ) // Por ejemplo
XBrowse( aTables )
Después haces un For .... Next y le vas aplicando cada elemento de la tabla a la function de importacion ( ojo con añadirle el path al nombre si es necesario ), todo en minúsculas eso si