urgente como hago para conectar visual basic con access
Hola Maria, ahi te envio una funcion super documentada, espero te sirva.. puedes escribirme si tienes alguna duda
Function Conect(DAT As Adodc, STR As String)
DAT.ConnectionString = "DSN=DSNCURSA" \' ESTA ES LA DIRECCION DE LA BASE DE DATOS
\' APP.PATH : LO QUE HACE ES QUE RETORNA LA DIRECCION
\' DEL FORDER DONDE ESTA EL PROGRAMA. EJM SI EL PROGRAMA ESTA EN
\' C:\WINDOWS\Desktop\MAXIMINA\PROGRAMA.EXE
\' APP.PAHT RETORNA C:\WINDOWS\Desktop\MAXIMINA Y SI LE CONCATENAMOS EL NOMBRE DE LA BASE DE DATOS OBTENEMOS
\' C:\WINDOWS\Desktop\MAXIMINA\db1.mdb QUE ES LA DIRECCION DONDE ESTA LA BASE DE DATOS.
\' NOTA ESTO SOLO FUNCIONA CUANDO LA BASE DE DATOS ESTA EN EL MISMO DIRECTORIO DEL PROGRAMA
DAT.RecordSource = STR \' AQUI SE LE ASIGNA EL SELECT O LA TABLA A UTILIZAR
DAT.Refresh \' SE REFRESCA EL DATA PARA QUE LOS CAMBIOS HAGAN SU EFECTO
End Function
Function Conect(DAT As Adodc, STR As String)
DAT.ConnectionString = "DSN=DSNCURSA" \' ESTA ES LA DIRECCION DE LA BASE DE DATOS
\' APP.PATH : LO QUE HACE ES QUE RETORNA LA DIRECCION
\' DEL FORDER DONDE ESTA EL PROGRAMA. EJM SI EL PROGRAMA ESTA EN
\' C:\WINDOWS\Desktop\MAXIMINA\PROGRAMA.EXE
\' APP.PAHT RETORNA C:\WINDOWS\Desktop\MAXIMINA Y SI LE CONCATENAMOS EL NOMBRE DE LA BASE DE DATOS OBTENEMOS
\' C:\WINDOWS\Desktop\MAXIMINA\db1.mdb QUE ES LA DIRECCION DONDE ESTA LA BASE DE DATOS.
\' NOTA ESTO SOLO FUNCIONA CUANDO LA BASE DE DATOS ESTA EN EL MISMO DIRECTORIO DEL PROGRAMA
DAT.RecordSource = STR \' AQUI SE LE ASIGNA EL SELECT O LA TABLA A UTILIZAR
DAT.Refresh \' SE REFRESCA EL DATA PARA QUE LOS CAMBIOS HAGAN SU EFECTO
End Function