Ошибка несоответствия типов CDate
Я пытаюсь преобразовать текстовое поле в дату, используя CDate () в наборе записей, но получаю ошибку несоответствия типов. Формат ввода текста: ММДДГГГГ. CDate не распознает этот формат? Нужна ли мне отдельная функция? Есть идеи?
<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>