Foros del Web » Programación » Programación General » Visual Basic clásico »

VBA de access 2003 en access 2007!!

Estas en el tema de VBA de access 2003 en access 2007!! en el foro de Visual Basic clásico en Foros del Web. hola!! tengo una base de datos en access 2003 que uso en el trabajo y queria pasarlo a access 2007 asi puedo usar la opcion ...
  #1 (permalink)  
Antiguo 06/08/2008, 13:07
 
Fecha de Ingreso: mayo-2008
Mensajes: 5
Antigüedad: 6 años, 5 meses
Puntos: 0
VBA de access 2003 en access 2007!!

hola!!
tengo una base de datos en access 2003 que uso en el trabajo y queria pasarlo a access 2007 asi puedo usar la opcion de "adjuntar archivo" y poder guardar de forma mas eficiente imagenes en la tabla.
el problema que al pasarlo al access 2007 no me funciona mi precedimiento para buscar datos en la tabla y volcarlos en un excell...
que estoy haciendo mal si asi me funcionaba en access 2003... ahora con el formato de access 2007 me dice que el archivo no es reconocido como una base de datos (1.accdb)

MUCHAS GRACIAS POR SU AYUDA!!

Sub BUSCAR_ARTICULO()
'dimensiones
Dim datConnection As ADODB.Connection
Dim recSet As ADODB.Recordset
Dim strDB, strSQL As String
Dim strTabla As String
Dim lngTablas As Long

'archivo Access

strDB = "C:\Documents and Settings\ale\Escritorio\base de datos\articulos.accdb"

'nombre de la tabla del archivo Access
strTabla = "ARTICULOS"

'crear la conexión
Set datConnection = New ADODB.Connection
Set recSet = New ADODB.Recordset
datConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source =" & strDB & ";"

'consulta SQL
strSQL = "SELECT * FROM ARTIC " & _
"WHERE ARTICULO = '" & Worksheets("Hoja1").Range("G6") & "' ;"
recSet.Open strSQL, datConnection

If recSet.BOF = False And recSet.EOF = False Then
'copiar datos a la hoja
ActiveSheet.[D13] = recSet("LIBRAS")
ActiveSheet.[D12] = recSet("MATERIAL")
ActiveSheet.[G20] = recSet("CIERRE")

'desconectar
recSet.Close
Set recSet = Nothing
datConnection.Close
Set datConnection = Nothing

End Sub
  #2 (permalink)  
Antiguo 07/08/2008, 11:02
Colaborador
 
Fecha de Ingreso: enero-2008
Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 6 años, 9 meses
Puntos: 37
Respuesta: VBA de access 2003 en access 2007!!

Hola, para hacer la conexión a una BD Access 2007, sólo tienes que cambiar el provider:

datConnection.Open "Provider=Microsoft.ACE.OLEDB.12.0;" & _
"Data Source =" & strDB & ";"


El resto es igual que con Access 2003

  #3 (permalink)  
Antiguo 07/08/2008, 11:53
 
Fecha de Ingreso: mayo-2008
Mensajes: 5
Antigüedad: 6 años, 5 meses
Puntos: 0
Respuesta: VBA de access 2003 en access 2007!!

Cita:
Iniciado por Avellaneda Ver Mensaje
Hola, para hacer la conexión a una BD Access 2007, sólo tienes que cambiar el provider:

datConnection.Open "Provider=Microsoft.ACE.OLEDB.12.0;" & _
"Data Source =" & strDB & ";"


El resto es igual que con Access 2003

MUCHAS MUCHAS GRACIAS!!!!
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 01:02.
SEO by vBSEO 3.3.2