|
本人使用WIN98+ACCESS2000 +MS SQL 创建一个ADP数据库。其中在一个非绑定窗体中输入数据,然后按保存按钮将数据存入 YuangongID 表中。
问题是明明在非绑定窗体中入厂日期输入02-11-29,可是打开 yuangonID 表中查看相应字段中的入厂日期(类型为Datetime)却是 29-2-11,不知何解。请指教。
以下为保存按钮代码:
Private Sub save_Click()
dim ruchangdate AS date
ruchangdate = Me![入厂日期]
DoCmd.RunSQL " update yuangongID set" & _
" 民族='" & Me![民族] & "',籍贯='" & Me!籍贯 & "',姓名='" & Me!姓名 & "',性别='" & Me![性别] & "', 身份证编号= '" & Me![身份证编号] & "', 入厂日期= '" & Format(ruchangdate, "yy-mm-dd") & "' " & _
" WHERE 工号='" & Me![工号] & "'"
End Sub
|
|