Syntax problem

[cheyanne]

I want to make a field blank after an entry has been erroneously made and


a MsgBox has advised the user that the entry they have made is incorrect.

Foe example I have a date field (formatted to short date) which requires the user
to input a date greater than today. I have got the MsgBox to work but keep getting
error messages with the code below the MsgBox line. Ideally I want the user to be returned to
that date field which should be blank allowing them to enter a correct value.

   If txtNextAppointment < Date Then
      MsgBox "Entre una fecha más que hoy", vbOKOnly (This is Spanish for "Enter a date greater than today")
      Me.Undo
   End If

.

The above code returns today´s date, and puts it in the txtNextAppointment field, albeit it was never placed in that field by the user.

I have tried other pieces of code e.g. Me.txtNextAppointment.SetFocus
Me.txtNextAppointment.Value = ""
Me.txtNextAppointment.Cancel

I am sure it will be a simple line of code, but I cannot find the correct syntax.

Any help will be much appreciated.

Regards

Cheyanne

[Bob Fitz]

Try this in the controls Before Update event:

   If Me.ActiveControl < Date Then
      MsgBox "Entre una fecha más que hoy", vbOKOnly (This is Spanish for "Enter a date greater than today")
      Cancel = True
   End If

[cheyanne]

Hi Bob

Thanks for your assistance. I entered the code as suggested but it still shows the date that was entered incorrectly.

Ideally I would have liked the field to have focus but be blank.

How can I send my posts in .mdb format?

Regards

Cheyanne

[Bob Fitz]

Try this:

   If Me.ActiveControl < Date Then
      MsgBox "Entre una fecha más que hoy", vbOKOnly (This is Spanish for "Enter a date greater than today")
      Cancel = True
      Me.ActiveControl.Undo
   End If

I think this will leave the control showing whatever was showing before the attempted update.

[cheyanne]

Hi

You were correct in that it shows whatever was originally stored in that field.

Many thanks - will mark as solved

Cheyanne

[Bob Fitz]

How can I send my posts in .mdb format?

This may help: http://office.microsoft.com/en-us/ac...#_Toc258329152

Save a copy of an .accdb file in the .mdb file format

• On the File tab, click Save & Publish.
• Under Save Database As, do one of the following:
  
  • To save a copy of the database in a format that can be opened by using Access 2002 or later, click Access 2002 - 2003 Database (*.mdb).
  • To save a copy of the database in a format that can be opened by using Access 2000 or later, click Access 2000 Database (*.mdb).
  
  
• Click Save As.
  
  If the database contains any features that prevent you from saving it as an .mdb file, Access displays a message and prevents you from continuing. The next section outlines factors that can prevent saving as an .mdb file. You must address those factors before you can continue with this procedure.
• In the Save As dialog box, in the File name box, type a name for the database file, and then click Save.

Access closes the original database and opens a new copy of the database in the format that you specified. Any changes that you make to the database affect only the new copy. To make changes to the original database, you must reopen the original database.

[cheyanne]

Hi

Thanks for your detailed reply

I did as you suggested but Access advises I cannot change to 2000/2003 format.


I can appreciate that it would have difficulty converting my database into a 2000/2003 format as a lot has changed in 12 years.

Howver I am amazed that there is no facility to convert the database into a 2007 format which is much later, assuming of course
that the Access 2007 had .mdb format in its armoury.

Regards

Cheyanne

[Bob Fitz]

I did as you suggested but Access advises I cannot change to 2000/2003 format.

Howver I am amazed that there is no facility to convert the database into a 2007 format which is much later, assuming of course
that the Access 2007 had .mdb format in its armoury.

A2007 and A2010 both use the .accdb file extention. All earlier versions use the .mdb file extention. Both A2007 and A2010 can convert a file to one which uses the .mdb extention if you have not used one or more of the new features in your DB that were not in A2003.