none
problemas con DLL MSDRdo20.dll RRS feed

  • Pregunta

  • Buen dia

    Instale una aplicación vb6 en un equipo windows 10 con compatibilidad a apps de 32 bit instala bien pero al momento de ejecutar una instrucción en el programa donde sale el siguiente problema.

    donde realiza la consulta es en esta linea

     Set rdoRSW = rdoConApp.OpenResultset(sW, rdOpenForwardOnly, rdConcurReadOnly, rdExecDirect)
        iCont = 0
        Do While Not rdoRSW.EOF
            ReDim Preserve clsInfoQry(iCont)
            With rdoRSW
                clsInfoQry(iCont).Campo = .rdoColumns("Campo").Value
                clsInfoQry(iCont).PosCampo = .rdoColumns("PosCampo").Value
                clsInfoQry(iCont).NomCampo = .rdoColumns("NomCampo").Value
                clsInfoQry(iCont).LenCampo = .rdoColumns("LenCampo").Value
                clsInfoQry(iCont).AliCampo = .rdoColumns("AliCampo").Value
                clsInfoQry(iCont).FmtCampo = .rdoColumns("FmtCampo").Value
                clsInfoQry(iCont).TypCampo = .rdoColumns("TypCampo").Value
            End With
            rdoRSW.MoveNext

    y no entiendo porque falla en equipo de la instalación y en desarrollo no pone ningun problema.

    viernes, 1 de noviembre de 2019 13:08

Todas las respuestas