Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Error # 0 encountered
Message
From
20/11/1998 13:01:05
 
General information
Forum:
Visual Basic
Category:
Other
Miscellaneous
Thread ID:
00159792
Message ID:
00159837
Views:
18
>>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
Map
View

Click here to load this message in the networking platform