|
|
Postada em 07/06/2006 20:09 hs
ERRO-> 3229
"OPERAÇÃO NÃO PERMITIDA NESTE CONTEXTO"
o erro esta quando passa no moveprevious
Do While Not Reg.EOF
.
.
.
Reg.MoveNext 'vou para o proximo registro e se for = Filme então
If Reg("honora") = "Filme" Then
Total_Conta = Total_Conta + Reg("valor")
Total_Lote = Total_Lote + Reg("valor")
Vvalor = CDbl(Vvalor) + Format(Reg("valor"), "#,##0.00")
End If
Reg.MovePrevious 'preciso voltar para o registro anterior
.
.
.
reg.MoveNext
loop
Desde ja Agradeço a todos
Ralph Teixeira
Ralph Teixeira
|
|
|
|
|
|
|
|
Postada em 07/06/2006 20:12 hs
Creio eu q depende de como está o cursortype qdo vc abriu este recordset... se vc abriu como adOpenForwardOnly não dá pra usar o moveprevious... Bom, pode ser outra coisa... Coloca como vc abriu o recordset |
|
|
|
|
|
Postada em 07/06/2006 20:21 hs
Reg.Open "Select * from honora where bau = 1 and " & _
" id_agenda = " & Grid3.TextMatrix(Aux, 15) & " " & _
" order by id_hon, codigo ", Banco
Ralph Teixeira
|
|
|
|
|
|
Postada em 07/06/2006 20:29 hs
Coloquei assim
Reg.Open "Select * from honora where bau = 1 and " & _
" id_agenda = " & Grid3.TextMatrix(Aux, 15) & " " & _
" order by id_hon, codigo ", Banco, adOpenDynamic
Funcionou
Obrigado ghost_jlp
Valeu
Ralph Teixeira
|
|
|
|
