LOCAL loConn as "ADODB.Connection" LOCAL loRS as "ADODB.Recordset" loConn = CREATEOBJECT("ADODB.Connection") loConn.Open("driver={SQL Server}; Server=(local); Uid=sa; Pwd=; Database=Northwind") loRS = loCOnn.Execute("select * from Customers") loRS.MoveFirst() DO WHILE NOT loRS.EOF ?loRS.Fields(2).Value loRS.MoveNext() ENDDO loRS.Close() loConn.Close() loRS = null loConn = nullVeja que para enviar outros comandos é só alterar a cláusula do loConn.Execute(). O ADO tem facilitades para persistir as mudanças no database, o que tornam a sua utilização um pouco direfente do SQL Pass Through...