vb6 update record in microsoft access

1.18/5 (3 votes)

See more:

HI all,

Can someone please assist me on below.

I want to update the records in microsoft access using VB6. It works fine with below code. But I want to take the column name from user (textbox6) instead of fixed parameter.

What should be the code

Set mySet = mydb.OpenRecordset("Sheet1", dbOpenDynaset)
mySet![Vertical] = data1.Text

Posted 6-May-15 1:19am

Gaus Shaikh

Updated 6-May-15 1:30am

Add a Solution

Comments

CHill60 6-May-15 7:54am

I think you can use mySet.Items(textbox6.Text) = data1.Text - you'll have to try it as I no longer have a copy of VB6

Gaus Shaikh 6-May-15 8:11am

Thanks.
But it is not working. textbox6.text is considering as column name and textbox6 value is not taken

Gaus Shaikh 6-May-15 8:14am

Getting error - Method or data member not found

CHill60 6-May-15 8:23am

On the .Items? You might need to define which row first - again sorry, VB6 is so outdated I can't try this for you.
You could get the ordinal of the column using the technique on tek-tips[^] and use that to access the item

Gaus Shaikh 6-May-15 10:32am

Thanks Sir. I got the solution

CHill60 6-May-15 10:33am

Cool. What was the solution?

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Last 24hrs

This month

Richard Deeming	40
Pete O'Hanlon	40
Hasham Ahmad	35
M-Badger	20
Ravi Bhavnani	20

Pete O'Hanlon	1,375
OriginalGriff	1,017
Richard MacCutchan	325
Dave Kreskowiak	280
Richard Deeming	275