Ad:

Visual Basic 4 / 5 / 6 Discussion Thread
Marked Solved
Views: 594

Nov 7th, 2009

Error!!!

Expand Post »

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

Quote ...

multiple steps generated an error check value status

and points to this code....

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!!!

Similar Threads

GTK Hangs & An Index Error in C#
Php email error in PHP
When I boot computer Error Appear. in Windows Vista and Windows 7
Error with a linked function in C++
How to Fix "Error loading Operating System" in Windows NT / 2000 / XP

Israelsimba

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

41 posts
since Oct 2009

Permalink

Nov 11th, 2009

Re: Error!!!

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.

jireh

Reputation Points: 11

Solved Threads: 49

Posting Whiz

Offline

316 posts
since Jul 2007

Permalink

Nov 11th, 2009

Re: Error!!!

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..

Israelsimba

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

41 posts
since Oct 2009

Permalink

Nov 12th, 2009

Re: Error!!!

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...

Last edited by akhileshbc; Nov 12th, 2009 at 4:14 am.

akhileshbc

Reputation Points: 10

Solved Threads: 5

Newbie Poster

Offline

14 posts
since Nov 2009

This thread is solved

Either the thread starter or a moderator has marked this thread as solved. You can most likely trust the responses and answers given. There is most likely no reason for any further responses to be posted here. If you have a related question, please start a new thread in this forum instead.

This thread is more than three months old

No one has posted to this discussion for at least three months. Please let old threads die and do not reply to them unless you feel you have something new and valuable to contribute that absolutely must be added to make the discussion complete. Otherwise, please start a new thread in this forum instead.

Previous Thread in Visual Basic 4 / 5 / 6 Forum Timeline: communicate with the system

Next Thread in Visual Basic 4 / 5 / 6 Forum Timeline: VB6 - Access Database

DaniWeb Message

Cancel Changes

User Name
Password