[mso] Re: Access Append Records??

  • From: "Colli, Anthony G" <Anthony.Colli@xxxxxxx>
  • To: "'mso@xxxxxxxxxxxxx'" <mso@xxxxxxxxxxxxx>
  • Date: Fri, 17 Jan 2003 11:33:53 -0500

April-

 You can do this, but there are some conditions. Create a macro and name it
autoexec, it will run when the database loads. In the macro have it RunCode
and set the function name to StartCode. Create a new module and name it
mod_Start. In this new module create a new function 

Public Function StartCode()
~some magic~
End function

Now when Access opens, the code in StartCode() will execute. In StartCode()
you can write some more code that will check for the date and if it's the
first of the month, do your append query. Of course this only works if the
database is opened on the first of the month. If it's not opened on the
first of the month your code will not append the records. So you need to
keep track of when the last append was done. You need to create a table of
the last append date. Your code can check today's date, if it's after the
first of the month, check the date in the table, if that is not the first of
the current month, then append the records and update the date table.

Pretty simple huh.

Or you could just do it manually.

-Anthony



 

-----Original Message-----
From: April Pace [mailto:4office@xxxxxxxxxxxxx]
Sent: Thursday, January 16, 2003 5:03 PM
To: Office (E-mail)
Subject: [mso] Access Append Records??


I just want to check... I have a field.... Medicare ID Number... that we
will fill in for appropriate patients... On the first of each month I need
this to be cleared out and re entered....

Can I automatically do this, or to I need to set up an Append Table query
that triggers this to be cleared out...

April


*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or
MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, send an email to 
mso-request@xxxxxxxxxxxxx?Subject=unsubscribe

Or, visit the group's homepage and use the dropdown menu.  This will also
allow you to change your email settings to digest or vacation (no mail).
//www.freelists.org/webpage/mso

To be able to use the files section for sharing files with the group, send a
request to mso-moderators@xxxxxxxxxxxxx and you will be sent an invitation
with instructions.  Once you are a member of the files group, you can go
here to upload/download files:
http://www.smartgroups.com/vault/msofiles
*************************************************************


*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or 
MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, send an email to 
mso-request@xxxxxxxxxxxxx?Subject=unsubscribe

Or, visit the group's homepage and use the dropdown menu.  This will also allow 
you to change your email settings to digest or vacation (no mail).
//www.freelists.org/webpage/mso

To be able to use the files section for sharing files with the group, send a 
request to mso-moderators@xxxxxxxxxxxxx and you will be sent an invitation with 
instructions.  Once you are a member of the files group, you can go here to 
upload/download files:
http://www.smartgroups.com/vault/msofiles
*************************************************************

Other related posts: