Teresa
|
PRESIDENTE PRUDENTE
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 13/09/2005 17:04 hs
Está dando uma mengagem de erro: Run-time error '2147217887' Operação OLE DB de várias etapas gerou erros. Verifique cada valor de status OLE DB. Nada foi Executado. E então fecha o programa. |
|
|
|
|
|
|
|
Postada em 13/09/2005 17:52 hs
Vc poderia passar o código em q ocorre o erro indicando a linha em q acontece isso por favor? t+ |
|
|
|
TheXeriffe
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 01/09/2009 16:51 hs
Tipo de erro:
Microsoft OLE DB Provider for ODBC Drivers (0x80020009)
Operação OLE DB de várias etapas gerou erros. Verifique cada valor de status OLE DB. Nada foi executado.
Esse erro acontece comigo em um lup do while, ele entra no while faz tudo e quando vai execultar o while pela segunda vez dar essa mensagem, sem falar em qual linha.
|
|
|
|
|
|
Postada em 05/10/2010 10:10 hs
Seria interesante ver o codigo desse do while loop para ver onde esta o erro;
|
|
|
|
Marcus Salles
não registrado
|
|
Postada em 26/03/2015 23:09 hs
Eu encontro o mesmo erro quando especifico a conexão ADO, vide abaixo:
Private Sub Command1_Click()
Dim adoRS As ADODB.Recordset
Set adoRS = New ADODB.Recordset
Dim a As MSXML2.DSOControl26
' Set up the Connection
adoRS.ActiveConnection = "Provider=MSDAOSP; Data Source=MSXML2.DSOControl26;"
' Open the XML source
adoRS.Open "G:Sistema InterativaSistema MySQLNFS-eAccess Solution/portfolio.xml"
On Error GoTo RecError
printtbl adoRS, 0
GoTo Bye
RecError:
Debug.Print Err.Number & ": " & Err.Description
If adoRS.State = adStateOpen Then
For Each Col In adoRS.Fields
Debug.Print Col.Name & ": " & Col.Status ' Error Status
Next Col
End If
Bye:
If adoRS.State = adStateOpen Then
adoRS.Close
End If
Set adoRS = Nothing
End Sub
|
|
|
|
