Visual Basic 6: Combo Boxes, Adodc, Access 2010

Question

1.00/5 (1 vote)

See more:

I want to add data in a combo box from one table. I am able to do so. Then I want to save the data in that combo box to another table. I am not able to do that. How do I do it?

Posted 24-Jun-12 6:56am

saimsalman36

Add a Solution

Comments

Sandeep Mewara 24-Jun-12 15:16pm

It would help you more if you share the related code where you are stuck.

[no name] 24-Jun-12 15:50pm

What do you mean "I am not able to do that"? Of course you are able to do it. What have you tried that did not work?

Sergey Alexandrovich Kryukov 24-Jun-12 17:05pm

Good point!
--SA

ZurdoDev 25-Jun-12 9:06am

You need to write code to do it. Please get started and let us know where you get stuck.

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

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

FahdSanaullah · Answer 1 · 2012-07-24T19:10:00

Hi,

Suppose you use an ADODC control that is associated with your table(suppose its name mytable, and suppose that the name f ADODC control is myadodc). Then u might eb using such code:

VB

myadodc.Recordset.MoveFirst
Do Until myadodc.Recordset.EOF
mycombobox.AddItem (myadodc.Recordset.Fields("Desired column_name"))
myadodc.Recordset.MoveNext
Loop

Then to save data to another table from this combo box, you should do this:

VB

mycombobox.listindex = 1
do until mycombobox.listindex = mycombobox.listcount
myadodc.recordset.addnew
myadodc.recordset.fields("colum_name") = "column value"
myadodc.recodset.update
mycombobox.listindex = val(mycombobox.listindex) + 1
loop

Hope this helps!