Re: DAO to ADo


Dim rs as ADODB.Recordset
Set rs = New ADODB.Recordset

sql="select * from consulta"
rs.open sql,cnn, adOpenStatic, adLockReadOnly, adCmdText


--
Un saludo, Víctor Koch.


"TatanMax" <tatanmax@xxxxxxxxxx> escribió en el mensaje
news:#ck4HPxUGHA.5652@xxxxxxxxxxxxxxxxxxxxxxx
Hola, necesito convertir el siguiente código a ADO:


Dim DaoRs as Dao.recordset
Set DaoRS = Forms!frmTLP!sfrmTLPVidaMes.Form.RecordsetClone
DaoRS.OpenRecordset

Esto funciona, pero lo necesito en ADO u obtener los datos desde la
consulta
(parametrizada) de la que el formulario recibe los datos (en ADO).

Estoy utilizando:

dim rs as new ado.recordset
sql="select * from consulta"
rs.open sql,cnn,openkeyset,readonly (con la conexion ya definida)

también he reemplazado sql por el nombre de la consulta pero no lo
acepta...
indica que faltan parámetros.


Gracias.




.

Relevant Pages

  • Re: Excel als Recordset
    ... > dim withevents adodb.adoExcelRS as adodb.recordset ... Set cnn = New ADODB.Connection ... Der Connectionstring verweist den Jet-Provider lediglich auf eine DB, ...
    (microsoft.public.de.vb.datenbank)
  • Re: Daten über ODBC-Datenquellen in Access-DB importieren
    ... Dim objConn As adodb.Connection ... Set objConn = New adodb.Connection ... Object Library" aufzurufen. ...
    (microsoft.public.de.vb.datenbank)
  • Re: Übergabeproblem cmd.Execute
    ... Dim strTbl As String ... Dim cn As New ADODB.Connection ... Set cn = CurrentProject.Connection ...
    (microsoft.public.de.access.clientserver)
  • Re: Form Schreibgeschützt?
    ... >> Dim cmd As New ADODB.Command ... >> Dim rst as new ADODB.Recordset ... >> End With ... Set cnn = CurrentProject.Connection ...
    (microsoft.public.de.sqlserver)
  • Re: Requery verzögert
    ... Dim dbsDaten As New ADODB.Connection ... Set dbsDaten = New ADODB.Connection ...
    (microsoft.public.de.access)