hola muchachos nose si me pueden apoyar en esto
bien tengo un sistema.mdb. en cual ese sistema.mdb quiero copiarlo y establecer la ruta desde visual basic y eliminar todos los datos ingresados anteriormente claro por si hay
espero que me haya expresado bien
saludos...........! y gracias
a ver tienes un sistema que usa una base de datos de access (.mdb) y quieres copiar la base de datos a otra ubicaión y borrarle todos los registros?
para copiar la base de datos puedes usar el FileCopy
Dim ArchOrigen, ArchDestino
ArchOrigen = "ARCHORIG" ' Se define el nombre del archivo de origen.
ArchDestino = "ARCHDEST" ' Se define el nombre del archivo de origen.
File Copy ArchOrigen, ArchDestino ' Se copia el archivo de origen en el archivo de destino.
hola que tal gracias por responder
si tengo un sistema.mdb en la cual el objetivo es copiar la db y darle un destino
y bueno en borrar los registros no hay problema .
bien, saludos y gracias
hola si me funciona el codigo gracias
Ahora como puedo hacer que al momento de guardar verifique si existe la base de datos en dicha carpeta a guardar
si existe que mande un mensaje , de lo contrario que lo guarde..
antetodo gracias y saludos.
puedes usar el getattr, este es para checar los atributos de un archivo pero da igual
mira pones
on local error resume next
dim i as long
i = getattr("c:\tu_archivo.mdb")
if err then
' No encontro el archivo
else
' si existe
end if
on local error goto 0
hola gracias por la resp
si me funciona
saludos........!