21/11/2006, 06:40
|
 | | | Fecha de Ingreso: agosto-2006
Mensajes: 381
Antigüedad: 17 años, 9 meses Puntos: 2 | |
| Frutilla (jaja me dio hambre)
buenas, mmm si no quieres cargar uno a uno los registros intenta exportarlos directamente con una sentencia asi
dim Base as DataBase
set Base = opendatabase(RutaDBF,false,false, "Dbase IV;")
base.execute "Select * Into " & TablaAccess & " IN '" & RutaBaseAccess & "' from " & ArchivoDBF
recuerda que
RutaDBF = Es solo el nombre del Directorio donde esta el Archivo DBf
TablaAccess = nombre de la Tabla donde se guardaran los Datos en access
RutaBaseAccess = ruta de la base de datos con Extension ( .MDB) incluido
ArchivoDBF = Nombre de Archivo Dbase con extension (.DBF) incluido
espero te sirva. |