| Pregunta: | 48384 - ENLAZAR ACCESS CON VISUAL.NET |
| Autor: | celia martinez |
| Hola mi duda es sobre como debo hacer para enlazar una base de datos con visual.net. ya lo he intentado pero si no es mucho pedir me podriais decir paso a paso como hacerlo?? es que siempre me sale algun error :-( MUCHAS GRACIAS | |
| Respuesta: | Nicolas Visual |
| Probá esto, no vas a tener problema: Agrega una referencia COM llamada "Microsoft ActiveX DataObjects 2.1 Library". Variable Global: Dim cn As ADODB.Connection Dim rs1 As ADODB.Recordset Load: cn = New ADODB.Connection() cn.ConnectionString = "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & Application.StartupPath & "\bdatos.mdb" cn.Open() rs1 = New ADODB.Recordset() Procedimiento: Dim consulta As String consulta = "select * from clientes" rs1.Open(consulta, cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic) 'cargo combo Do While Not rs1.EOF cboCliente.Items.Add(rs1("nombre").Value & " " & rs1("apellido").Value) cboIds.Items.Add(rs1("id").Value) rs1.MoveNext() Loop rs1.close() Closing: cn.close() sds Nicolas [email protected] | |