<br><font size=2 face="sans-serif">OK I tried Dim as String </font>
<br>
<br><font size=2 face="sans-serif">it still displays the date in the sub form as a complete reverse. ie:</font>
<br>
<br><font size=2 face="sans-serif">17/10/02 is entered... passed as 10/17/02 to strSQL (verified by msgbox) </font>
<br>
<br><font size=2 face="sans-serif">the value saved to the subform is 02/10/17</font>
<br>
<br><font size=2 face="sans-serif">The field is formatted to ShortDate both in the Table and also on the form, but returns it in complete reverse.</font>
<br>
<br><font size=2 face="sans-serif">Connie Kamrowski<br>
<br>
Analyst/Programmer<br>
Information Technology<br>
NSW Agriculture<br>
Orange<br>
</font><font size=2 face="Courier New"><br>
Let's take "1 Feb 03"<br>
> Dim Finished As Date<br>
You have dimmed it as a Date, <br>
....<br>
> Finished = Format(Forms![worksheet]![FinalDate], "mm\/dd\/yyyy")<br>
> <br>
Format() creates a Variant containing a string "02/01/03"<br>
You now poke that into the date variable "Finished". When you do so, <br>
the system converts the string into a date and uses your regional <br>
settings so interprets it as "2 Jan 03"<br>
<br>
You would have been OK if you had dimmed Finished as String :-)<br>
<br>
> ' Create SQL string.<br>
> strSQL = "UPDATE worksheet SET finished = #" & Finished & "# WHERE <br>
> tsid = " & TSID<br>
> ' Run action query.<br>
> mydb.Execute strSQL<br>
> <br>
<br>
<br>
-- <br>
Lexacorp Ltd<br>
http://www.lexacorp.com.pg<br>
Information Technology Consultancy, Software Development,System Support.<br>
<br>
<br>
<br>
<br>
</font>
<br><font size=2 color=#800080 face="sans-serif"><br>
<br>
This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation.</font>