BOF E EOF

MARCELO.TREZE 04/09/2009 21:07:55
#322031
desculpe troque

.Row = Row [ô]faltava esta linha

por

GrdIncluiPec.Row = Row [ô]faltava esta linha
NEREU1301 04/09/2009 21:14:41
#322032
cara
desculpe o trabalho que to te dando, mas sinto muito voltamos ao erro 30009 invalid row value
MARCELO.TREZE 04/09/2009 21:17:31
#322033
tem como vc postar seu projeto
NEREU1301 04/09/2009 21:26:18
#322035
seguinte marcelo
eu já postei ele quando postei a duvida anterior [Ô]mshflexgrid.... [Ô] ai resolvi o problema com ajuda do ashkatchup e danikull
entao fiz alguma modificaçoes nesse form que agora ta me dando problema dai vou postar ele agora
valeu
os outro forms eu aindo to trabalhando neles
MARCELO.TREZE 04/09/2009 21:43:29
#322037
Então aqui não apresentou o erro, claro que tive de fazer umas adaptações para poder executar pois só veio um form, mas não apresentou o erro indicado

veja como ficou

Private Sub Incluir()
Dim Row As Integer
With rsOficina2
For Row = 1 To GrdIncluiPec.Rows - 1
Call NewIdITens
GrdIncluiPec.Row = Row
If GrdIncluiPec.CellBackColor <> &HC0C0C0 Then
If NewRecord = True Then
.AddNew
!Itens_nr = IdItens
!Numero_OS = CboNumOS.Text
!Item = GrdIncluiPec.TextMatrix(Row, 0)
!CodPeca = GrdIncluiPec.TextMatrix(Row, 1)
!NomePeca = GrdIncluiPec.TextMatrix(Row, 2)
!Quant = GrdIncluiPec.TextMatrix(Row, 3)
!valor = GrdIncluiPec.TextMatrix(Row, 4)
!TotLinha = GrdIncluiPec.TextMatrix(Row, 5)
.Update
.Requery
End If
End If
Next
End With

If NewRecord = True Then
Call AtualizaFormulario
CboNumOS.SetFocus
GrdIncluiPec.Clear
Call CabecalhoGrdIncluiPec
End If
End Sub
NEREU1301 04/09/2009 21:59:46
#322040
obrigado marcelo
vou refazer algumas rorinas pra ver onde estou errando porque aqui simplesmente nao funciona. é como se nao tivesse a sub incluir.

valeu
vou revisar e depois retorno

abraço
nereu
DANIKULL 04/09/2009 23:42:55
#322052
Nereu, boa noite.

Existe este campo
Citação:
[txt-color=#b40404] !Itens_nr [/txt-color]

existe na sua tabela???
NEREU1301 05/09/2009 20:43:36
#322131
danikull, boa noite
ta em branco a tua perguta ai em cima ou pelo menos nao aparece pra mim aqui, ai nao consegui identificar a qual campo voce se refere.

nereu
DANIKULL 05/09/2009 23:39:55
#322141 Resposta escolhida
NEREU1301, boa noite.

Pelo que percebi na dúvida postada, o erro esta na hora que você vai gerar o código na rotina NewIdITens, certo???
pois na rotina Incluir() a atribuição desta linha !Itens_nr = IdItens diz que ha erro. Isto deve estar acontecendo pelo fato da variavel estar vazia, rodo o projeto com break point na rotina NewIdITens e veja se esta tudo ok.
NEREU1301 06/09/2009 00:06:45
#322142
danikull
poderia me explicar exatamento como fazer break point
nunca utilizei
Página 2 de 3 [24 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar