471,050 Members | 1,153 Online
Bytes | Software Development & Data Engineering Community
Post +

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 471,050 software developers and data experts.

Adding selected records to a New Table...


I have an order form which has a field 'ProductID'.
This form has a button on each record to open a new form linked by
This new form is a continuous form and obviously, only displays the
records associated with that ProductID.

Basically this is part of a Product Packing Pick System. From my
products table, each product has a set default amount of items which
need to be packed. What I am trying to do is:

When a customer places an order, our users can bring up the packing
list associated to the ordered product and either select/de-select
certain items, depebding on the customers requirements.

On this pop-up form linked by ProductID, there may be six (6) items
listed. On this continuous form the user may select/de-select any line
item by pressing a button on each record. The button simply changes
another field on each record from YES to NO.

I then have a button at the bottom of the form which runs an APPEND
Query to only add the records displayed as YES to my new table. This
new table will hold the selected packing items for future reference
until the order has been shipped etc.

My code works, except it appends all the records (six) six times,
rather than starting on the first record, adding it to the new table,
move to the next and so on. It adds all six, then repeats itself for
however many records there are ?

My code under the button is:


Dim rst As DAO.Recordset
Dim n As Integer

Set rst = Forms!ProductPackSelectorF.RecordsetClone
n = rst.RecordCount
Do Until rst.EOF

If Me.Text32.text = "Y" Then

Dim stDocName As String

stDocName = "PackingSelectorREC"
DoCmd.OpenQuery stDocName, acNormal, acEdit ('Append Query)

End If



The fields on the new table have exactly the same name, so all I want
is a button on the form to add only the selected records marked 'YES'.
Each product ordered by the customer is marked with a JOB NUMBER. This
also needs to be recorded with each record.

The idea being that in future I can search for a Job Number and pull
up the Recordered Packing Items.

Appreciate your help on this. Maybe there is a better way to add
records one by one rather than using an Append Query in a loop.
Nov 13 '05 #1
2 2450
da***@scene-double.co.uk (David) wrote:
My code works, except it appends all the records (six) six times,
rather than starting on the first record, adding it to the new table,
move to the next and so on. It adds all six, then repeats itself for
however many records there are ?

Hi David,

Have you considered using a select query which filters for the 'Yes'
condition instead of duplicating your data?

Nov 13 '05 #2


Thanks for responding.
Let me explain further. I have a Table: Products
I also have a table: ProductPack

Products (1 to many) ProductPack.
ProductPack only contains the Packing Items for that product, linked via

In the Order Processing part of my order, when we enter an order for a
customer, we bring up a 'Job Number' for that new orderline and select
the Product. We can then hit a button which brings up a continuous form
listing all the packing items for that product. This form is based on a
query, based on the table ProductPack, with ProductID criteria set.

On the pop up form from the orders section, we can select yes/no against
each packing item.

I now need to record these selections for each Job Number not ProductID.
So, in the table ProductPack there will only be 'x' packing items for
each product.

At any one time, there may be multiple job numbers linked to the same
Product but with different Packing requirements. This is why I need to
record the selections to a new table. The packing records would be
deleted upon shipment in the system.

I have tried using an Apend query in a loop etc....i'm just confused on
how to get the selected records into the other table correctly.
*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!
Nov 13 '05 #3

This discussion thread is closed

Replies have been disabled for this discussion.

Similar topics

6 posts views Thread by Jamie Fryatt | last post: by
6 posts views Thread by 6thirty | last post: by
reply views Thread by EricLondaits | last post: by
reply views Thread by leo001 | last post: by

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.