Ayuda con ADO

23/03/2005 - 00:00 por Victorio > | Informe spam
Estoy empezando con ADO
alguno tiene un buen tutorial?
saludos
Gracias
Victorio

Preguntas similare

Leer las respuestas

#1 dtto086
23/03/2005 - 16:04 | Informe spam
Esta respuesta me la dio Esparta:

Esparta Palma" escribió en el
mensaje news:%
Mostrar la cita
ADO?
Mostrar la cita
"Victorio ><)))º>" escribió en el mensaje
news:
Mostrar la cita
#2 Alex Feldstein
23/03/2005 - 20:33 | Informe spam
On 22 Mar 2005 15:00:06 -0800, "Victorio ><)))º>"
wrote:

Mostrar la cita
Ejemplos de ADO (clásico):

http://fox.wikis.com/wc.dll?Wiki~CategoryADO
http://fox.wikis.com/wc.dll?Wiki~UsingADO
http://www.eps-software.com/knowled...ordset.htm
http://fox.wikis.com/wc.dll?Wiki~OleDB
http://fox.wikis.com/wc.dll?Wiki~VFP_OleDB_Provider

ADO para desarrolladores Visual FoxPro
http://www.portalfox.com/article.php?

ADO Jumpstart for Visual FoxPro Developers
http://msdn.microsoft.com/library/t...DOJump.htm
http://msdn.microsoft.com/library/d...dojump.asp


VFP Help: Cursoradapter

-
* OleDB y ADO a BD Nortwhind en Access

#Define adUseClient 3
#Define adLockBatchOptimistic 4
#Define adCmdTable 2

oConnection = CreateObject("ADODB.Connection")

*-- Abrir la conexión por medio de una cadena
oConnection.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=c:\temporthwind.mdb;")

*-- extraer datos
oRecordSet = CreateObject("adodb.recordset")
*oRecordSet.Open("Select * From Customers",oConnection)

With oRecordset
.ActiveConnection = oConnection
.Source = "Select * From Customers"
.CursorLocation = adUseClient
.Open
EndWith


CREATE TABLE Customers FREE (CustID C(10), cName C(40) NULL)

oRecordSet.MoveFirst
DO WHILE NOT oRecordSet.EOF
INSERT INTO Customers (CustID, cName) ;
VALUES (oRecordSet.Fields("CustomerID").Value,
oRecordSet.Fields("CompanyName").Value)
oRecordSet.MoveNext
ENDDO

oRecordSet.Close
oConnection.Close

GO TOP
BROWSE
-



Alex Feldstein
________________________________
Microsoft Visual FoxPro MVP
Please respond in the public groups so that everybody
can benefit from the exchange.
Favor de responder en los foros públicos asi todos se benefician.
(address munged with ROT-13)

Blog: http://www.bloglines.com/blog/AlexFeldstein
Website: http://feldstein.net
Ads by Google
Search Busqueda sugerida