Wrox Programmer Forums

Need to download code?

View our list of code downloads.

Go Back   Wrox Programmer Forums > Microsoft Office > Access and Access VBA > Access
Password Reminder
| FAQ | Members List | Search | Today's Posts | Mark Forums Read
Access Discussion of Microsoft Access database design and programming. See also the forums for Access ASP and Access VBA.
Welcome to the p2p.wrox.com Forums.

You are currently viewing the Access section of the Wrox Programmer to Programmer discussions. This is a community of software programmers and website developers including Wrox book authors and readers. New member registration was closed in 2019. New posts were shut off and the site was archived into this static format as of October 1, 2020. If you require technical support for a Wrox book please contact http://hub.wiley.com
DRM-free e-books 300x50
Thread Tools Search this Thread Display Modes
  #1 (permalink)  
Old January 2nd, 2007, 03:34 AM
Authorized User
Join Date: Nov 2005
Location: Lusaka, Lusaka, Zambia.
Posts: 27
Thanks: 0
Thanked 0 Times in 0 Posts
Default Append Query

I have an append query in my payroll system I Have created in Access. I have 18 records in my payroll and every month it must append 18 records. The problem is after the second month when I wanted to append 18 records for the third month, it is instead appending 36 records. Meaning all the records for the first and second month. What criteria should I use in under the Date field. This is what I have in the append from expr1:date() in the append to field I have DATE,then criteria Date(). What should I do in the date criteria so that the query only appends the last 18 records every time. Please Help

Reply With Quote
  #2 (permalink)  
Old January 3rd, 2007, 01:33 PM
Friend of Wrox
Points: 9,611, Level: 42
Points: 9,611, Level: 42 Points: 9,611, Level: 42 Points: 9,611, Level: 42
Activity: 0%
Activity: 0% Activity: 0% Activity: 0%
Join Date: Mar 2004
Location: Washington, DC, USA.
Posts: 3,069
Thanks: 0
Thanked 10 Times in 10 Posts

It sounds to me like you want to be able to append only those records from a specific month.

To do that, create a field in your query called "AppendMonth" and put this expression on the Field line:

AppendMonth:(DatePart("m", [DateField]))

This will show you a single number that is the month the record is for.

Then pass this parameter to the append query button. Either use a combo box on the form, and type in 1, 2, 3, 4, 5, etc. and have the user select the month number. In the criteria line for the AppendMonth field in your query, put this:


Or do this to pass it from the combo box:

Dim iMonth As Integer
Dim sLink As String

iMonth = Me.cboAppendCombo

sLink = "[AppendMonth] = " & iMonth

DoCmd.OpenQuery "qryAppendMonthQueryName",,, sLink

Put sLink in the WHERE clause section of the line. I can't remember where that is.

Did that help?

Reply With Quote

Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Trackbacks are Off
Pingbacks are On
Refbacks are Off

Similar Threads
Thread Thread Starter Forum Replies Last Post
Append Query Cybersurfer Access 1 February 13th, 2006 01:02 PM
Append Query Quandry SerranoG Access 5 November 15th, 2005 06:36 PM
append query? bph Access 2 November 23rd, 2004 12:44 PM
append query stoneman Access 2 November 12th, 2003 09:17 PM
Append query problem vladimir Access VBA 4 July 23rd, 2003 07:58 PM

All times are GMT -4. The time now is 11:02 AM.

Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
© 2013 John Wiley & Sons, Inc.