Erro Refresh

[Belcristinapsi 0]

Pessoal,Sou "novatassa" no VB e está dando um run-time error 80040e14 na linha Refreshcom a mensagem Method "Refresh" of object "IAdodc" failed, alguém sabe me dizer como resolver esse problema???

[Luizgrs 0]

Mostra a parte do código que você está fazendo (até o método refresh)

[Belcristinapsi 0]

Pessoal,

 

Sou "novatassa" no VB e está dando um run-time error 80040e14 na linha Refresh

 

com a mensagem Method "Refresh" of object "IAdodc" failed, alguém sabe me dizer como resolver esse problema???

<{POST_SNAPBACK}>

Private Sub DataList1_Click()

Dim strconsulta As String

strconsulta = "Select * from Products Where SupplierID = " & DataList1.BoundText

 

With Adodc2

.RecordSource = strconsulta

.Refresh

End With

 

With DataGrid1

.ClearFields

.ReBind

End With

 

Label2.Caption = DataList1.Text

 

End Sub

[Luizgrs 0]

Hm...As propriedades relacionadas ao Banco de Dados do ADODC estão preenchidas corretamente?

[Belcristinapsi 0]

Pessoal,

 

Sou "novatassa" no VB e está dando um run-time error 80040e14 na linha Refresh

 

com a mensagem Method "Refresh" of object "IAdodc" failed, alguém sabe me dizer como resolver esse problema???

<{POST_SNAPBACK}>

Private Sub DataList1_Click()

Dim strconsulta As String

strconsulta = "Select * from Products Where SupplierID = " & DataList1.BoundText

 

With Adodc2

.RecordSource = strconsulta

.Refresh

End With

 

With DataGrid1

.ClearFields

.ReBind

End With

 

Label2.Caption = DataList1.Text

 

End Sub

<{POST_SNAPBACK}>

Dei uma olhada geral e está tudo ok