1,453
社区成员
发帖
与我相关
我的任务
分享
dim dt as date
dt=format(Combo1.Text &"-"& Combo2.Text & "-" & Combo3.Text,"yyyy-mm-dd")
'access:
Set Rs = cnn.Execute("insert into rights(f1,f2) values(" & id & ",#" & dt & "#")
'SQL server
Set Rs = cnn.Execute("insert into rights(f1,f2) values(" & id & ",'" & dt & "'")