CDate Type Mismatch Error

Ich versuche, ein Textfeld mithilfe von CDate () in einem Recordset in ein Datum zu konvertieren, erhalte jedoch weiterhin einen Typenkonfliktfehler. Das Eingabetextformat ist MMDDYYYY. Erkennt CDate dieses Format nicht? Benötige ich eine separate Funktion? Irgendwelche Ideen?

<code>Text Date  -> Converted Date
---------     --------------
04122012   -> 04/12/2012


Dim db As DAO.Database
Dim rst As DAO.Recordset

Set db = CurrentDb
Set rst = db.OpenRecordset("tbl_dates", Type:=dbOpenDynaset)

Do Until rst.EOF
rst.Edit
rst![Converted Date]=CDate(rst![Text Date])
rst.Update
rst.MoveNext

Loop

Set rst = Nothing
Set db = Nothing
</code>

Antworten auf die Frage(2)

Ihre Antwort auf die Frage