DaniWeb Forum Index > Software Development > Visual Basic 4 / 5 / 6

Visual Basic 4 / 5 / 6 RSS

Error!!!

Thread Solved

•

Join Date: Oct 2009

Posts: 23

Reputation: Israelsimba is an unknown quantity at this point

Solved Threads: 0

Israelsimba Israelsimba is offline

Offline

Newbie Poster

Error!!!

16 Days Ago

My subscription system is now running though with errors here and there.the error that concerns me a lot is a runtime error that says

•

multiple steps generated an error check value status

and points to this code....

 Help with Code Tags 
 Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text) 
r.Fields("companyphone") = txtcphone.Text
r.Fields("companywebsite") = txtcwebsite.Text
r.Fields("companyphone") = txtcphone.Text
r.Fields("companywebsite") = txtcwebsite.Text

and this code is in my save button. at times the error doesnt show but at times it pops up when a user is testing...
how best can i trap such an error because i know there must be a way which i dont know.
thank you in advance!!!

•

Join Date: Jul 2007

Posts: 300

Reputation: jireh is an unknown quantity at this point

Solved Threads: 42

jireh

Offline

Posting Whiz

12 Days Ago

check the fields if it allows null value. if not then put a trappings to force the user to enter a value on the field.

A conclusion is the place where you got tired of thinking.
http://www.martin2k.co.uk/forums/index.php?showforum=4
http://www.a1vbcode.com/a1vbcode/vbforums/Forum3-1.aspx
http://www.developerfusion.co.uk/for...orum&ForumID=4

•

Join Date: Oct 2009

Posts: 23

Reputation: Israelsimba is an unknown quantity at this point

Solved Threads: 0

Israelsimba Israelsimba is offline

Offline

Newbie Poster

12 Days Ago

it doesnt enforce any fields in the database..but i have enforced at form level..ie a person cannot save without entering all the required fields on the form. this error pops up a any time but not always..

•

Join Date: Nov 2009

Posts: 14

Reputation: akhileshbc is an unknown quantity at this point

Solved Threads: 4

akhileshbc akhileshbc is offline

Offline

Newbie Poster

11 Days Ago

 Help with Code Tags 
 Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text) 
 
on error goto Er
 
      r.Fields("companyphone") = txtcphone.Text
 
      r.Fields("companywebsite") = txtcwebsite.Text
exit sub
Er:
msgbox "Error occured"
   
on error goto Er

      r.Fields("companyphone") = txtcphone.Text
  
      r.Fields("companywebsite") = txtcwebsite.Text
exit sub
Er:
msgbox "Error occured"

Please post your entire code inside save button...