Aug 22
Excelente ejemplo que demuestra como puedes conectarte a una base de datos de Access a través de ADO y como trabajan con comandos SQL. En el ejemplo se utiliza la base de datos NWIND.MDB que viene con Visual Studio.
oRst = CreateObject("ADODB.Recordset")
oConn = CreateObject("ADODB.Connection")
cStrConn = "PROVIDER=Microsoft.Jet.OLEDB.4.0;"+ ;
"DATA SOURCE=C:NWIND.MDB;"
With oConn
.ConnectionString = cStrConn
.CursorLocation = 3 && adUseClient
.Mode = 3 && adModeReadWrite
.Open(cStrConn)
EndWith
cSQL = "Select * from Clientes"
With oRst
.ActiveConnection = oConn
.CursorType = 3 && adOpenStatic
.CursorLocation = 3
&& adUseClient
.LockType = 3 && adLockOptimistic
.Open(cSQL)
EndWith
Do While !oRst.Eof
? oRst.Fields("IdCliente").Value
oRst.MoveNext
EndDo
Si tienes inquietudes, sígueme en Twitter para contactarme.
Seguir a @davamadort¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?
Contrata un plan de hosting en www.winnethost.com y recibes totalmente gratis el registro de tu sitio web en más de 24 buscadores, entre ellos google, yahoo, msn
El Sitio La Web de Davphantom se encuentra hospedado en WinNetHost.com
