locked
No me funciona el Script en WinXP RRS feed

  • Pregunta

  • Buen día a todos.

    Estoy diseñando un archivo txt para convertirlo a Script. El archivo debería ser sencillo. Sólo debe abrir un Recordset que está en una base de datos Access 2003 y luego arrojar en un Msgbox la cantidad de registros de dicho Rs. Pero el problema es que el Msgbox me arroja un "-1" en la cantidad. No se que me falta. En Visual Basic, esto se corregía modificando la propiedad de la conexión "CursorLocation=AdUseClient".... pero acá no se que esté pasando. El código que uso en el Script es este:

    -----------------------------------------------------

    Dim Cnn
    Dim Rs

    Set Cnn = CreateObject("ADODB.Connection")
    Set Rs = CreateObject("ADODB.Recordset")

    Cnn.Open "Provider=MSDASQL.1;Persist Security Info=False;Data Source=MS Access Database;Initial Catalog=C:\Duplicados.mdb"
    Rs.open "RecordsetX",Cnn
    MsgBox Rs.RecordCount

    Rs.Close
    cnn.Close
    Set Cnn = Nothing
    Set Rs = Nothing

    --------------------------------------------

    Gracias por su ayuda.

    jueves, 10 de junio de 2010 16:32

Respuestas

  • Procede a preguntar en los foros msdn http://social.msdn.microsoft.com/forums/es-ES/categories/

    aqui en technet es soporte IT

    Saludos


    njguibert.wordpress.com
    jueves, 10 de junio de 2010 18:29
    Moderador