Replies

The code originally posted, at the start of the original thread, works in Access 2000 … I have not tried it in Access 2002 yet but I suspect it will work in that verson also. It just will not work in Access 97.

RDH

Here is an added note to installing Office XP (2002) on a machine with Office 2000 already installed ……

I also have all 3 versions installed on my development machine.

You do not have to install Office/Access 2002(XP) in a seperate folder when Office/Access 2000 is already installed on the machine.

You simply choose to keep earlier versions and “XP” will create and install itself within subfolders in the same folder where Office 2000 resides. This scared me the first time I attemped this, but have done it many times since then with no problems.

RDH

I agree with Mark ……

Make sure you choose to install Office 2000 in a different folder (I use C:Program FilesMicrosoft Office2k).
Also make sure you choose to “keep older version” during setup.

RDH

Let me just attach it to the post and save us all the trouble of emails.

I need to add code to the app to detect if the database you want to set the “ShiftKey” property has a password. Currently it will not set the property if it is password protected. I just can’t seem to find the time to alter the app. I built this application for my personal use, but you are welcome to use it and alter it in any way you see fit.

The version I attached will open in Access 2000 or 2002 but will set the property for Access 97 also.

RDH

I easiest and simpliest way is not to add the code to the app. Instead use a remote database designed specifically for this pupose. You keep a copy of this application on your development machine and you set and unset the shift key property “at will’. The app is small enough to fit on a diskette so you can set the property by using the diskette if you are away from your machine. If you would like a copy of this .. let me know and I will email you a copy. I assume you want the Access 2000/2002 version. I have an Access 97 version and Access 2000/20002 version.

HTH
RDH

You need to extract the Year from your stored Date entry using a “Field Expression”.
You then set up a prompt in the Criteria section of this field expression to get the user to enter the Year to filter the desired records.

Here is an example of the field expression you need in your query:

TheYear: DatePart(“yyyy”,[YourDateField])
(change “YourDateField” to the name of the field that contains the Date data)

Then in the Criteria section of the QBE grid of this added expression use something like this:
[Enter 4 digit Year]

The above will prompt the user to enter the 4 digit year that you want to set as the criteria for the query.

HTH
RDH

Hmmmm ……..
I just took a look in my Access 2002 help and went right to FileCopy. It is in the VBA help files. To access it you must be in the VBA code window then cilck on help from that window. This is another one of Microsoft’s “Great Ideas” I guess …. You need help to work with the help files …. LOL

RDH

Actually you should be using “yyyy” as the “Interval” argument in the DateDiff function … not “y”.
The “y” argument returns the “Day of Year”.

Here is an expression I always use:

DateDiff(“yyyy”, DOB, Date) + (Date < DateSerial(Year(Date), Month(DOB), Day(DOB)))

HTH
RDH

Here is a sample routine that should work for you:

Public Sub BackUp()
On Error GoTo Err_Backup
Dim strMsg As String, strTitle As String
Dim strSource As String, strDest As String
Dim strError As String

strMsgComplete = “The Backup of the Database was Sucessful.”
strTitleComplete = ” Backup Complete”

BeginBackup:

As long as the backup is performed from the frontend, from an unbound form with no bound forms open, you can use the “FileCopy” statement to copy the backend to another location.

HTH
RDH

Attempting to replace the standard splash screen with a .bmp file on todays faster machines is a totally useless venture. As you have found, it appears and disappears too fast to read … and Access gives no control over this.

You need to create a custom form to be your splash screen (form). You then have this form open using the startup options or with an autoexec macro. You set the timer to open the next form and close the splash form based to the interval you set.

You also need to create (or use the one included in the attached file) a .bmp file to keep the standard splash screen from showing. The .bmp file must reside in the same folder as the database and the name of the .bmp must be the same name as the database but with the .bmp extension.

I have attached a small (zipped) sample that should should you how to do this. Place both files in a temporary folder then execute the opening of the sample database.

HTH
RDH

You are very welcome….

I was just hoping I understood the question …. LOL

RDH

I hope I understand what menu you mean ……

This line will remove the Main Menu Bar

DoCmd.ShowToolbar “Menu Bar”, acToolbarNo

Just use “acToolbarYes” argument to make it appear again.

HTH
RDH

This may not be the problem …… but check the fonts that are being used in the reports. Are these fonts installed on the effected machines? If they are not Access will substitute a font for the missing font. This could result in the problem you describe.

HTH
RDH

I hope I understand the format you want:

In the “Format” property of the control put:

example: February 07, 2002
mmmm dd, yyyy

If this is not what you want … post an example of what you want.

HTH
RDH