User Field as date

Hi all,

i try to get in system form with formtype=133 a system field docdate as frm.items.item("10").specific.string

i have a user table

vData = CDate(CStr(frm.Items.Item("10").Specific.String)

Set xTable = oCompany.UserTables.Item(CStr("TABLE"))

xTable.Code = "Pippo"

xTable.Name = "Pippo"

xTable.UserFields("U_data").Value = vData

xTable.Add

but is not correctly!

Any idea for to format the string into data format???

Best regards

Serema