Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Un codigo sin coneccion :(

Estas en el tema de Un codigo sin coneccion :( en el foro de Visual Basic clásico en Foros del Web. Hola Tengo un problema me pasaron un codigo y de visual 6.o que tiene una base de datos access. Bueno trate de buscar algun conecction ...
  #1 (permalink)  
Antiguo 06/07/2005, 06:23
Avatar de netorres  
Fecha de Ingreso: marzo-2004
Ubicación: 32 kms de Santiago a la costa
Mensajes: 132
Antigüedad: 20 años, 1 mes
Puntos: 0
Un codigo sin coneccion :(

Hola Tengo un problema me pasaron un codigo y de visual 6.o que tiene una base de datos access.

Bueno trate de buscar algun conecction o la llamada algun odbc pero no tiene...


se que se conecta y ve los datos de la base de datos, pero como lo hace???


Tendra que ver porke tiene instalado sqlserver????
__________________
Contento Señor contento :-) (Sto. Padre Alberto Hurtado)
  #2 (permalink)  
Antiguo 06/07/2005, 08:30
Avatar de netorres  
Fecha de Ingreso: marzo-2004
Ubicación: 32 kms de Santiago a la costa
Mensajes: 132
Antigüedad: 20 años, 1 mes
Puntos: 0
Una parte del codigo es el sigte:


Data1.DatabaseName = "Sistemas.mdb"
Data2.DatabaseName = "Sistemas.mdb"

Data2.RecordSource = "SELECT * FROM menaut " & _
"WHERE au_Operad = '" & DBCombo1.BoundText & "' " & _
"ORDER BY au_Operad+au_Menu"
Data2.Refresh

With Data2.Recordset
If .RecordCount = 0 Then Exit Sub
.MoveFirst
Do While Not .EOF
strOpcion = .Fields("au_Menu")
strSelect = .Fields("au_Autori")
Cambia_Autorizacion
.MoveNext
Loop
End With



no se como se conecta???
__________________
Contento Señor contento :-) (Sto. Padre Alberto Hurtado)
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 22:25.