>>Hello Everybody,
>>I have a problem when initializing some text boxes with values from a recordset. Everything seems to be fine but, at the end, when i exit the procedure, (kind of gather->foxpro), i get an error, error 0.
>>I dont know how to deal with it cause there is no description. Can anybody advice?
>>Thank you very much,
>>Vlad
>
>Can you send us a couples of lines to reproduce your problem?
>
>If you check for Err.Number, and it give 0, it means that you have no error!
>
>Maybe your lines will help us help you.
Eric, here's the code(part of it)
>>>>>>>>>>>>>>>>>>>>
<< on error goto erline
Case "MANAGER"
icntr = rdNinvm.Fields.Count
For Each contr In Me.Controls
If TypeOf contr Is TextBox And UCase(contr.Tag) = UCase(Trim(str)) Then
For j = 0 To icntr - 1
If UCase(rdNinvm.Fields(j).Name) = UCase(contr.Name) Then
contr = rdNinvm.Fields(j)
Exit For
End If
Next
End If
Next
.....
end select
erline:
MsgBox " Error occured " & Err.Description & " " & Err.Number & " " & Err.Source
End
end sub
>>>>>>>>>>>>>>>>
so after that i get the message box displayed. I hope the code is clear enough.
Thank you very much
Vlad
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only