利用sql写入date数据时，为什么使日期变得不正确？

Question

试试如下：
strSqlOfSave = "update " & strNameOfTable & " set " _
        & strSaveFieldName & "='" & format(date,"yyyy-mm-dd")_
        & "' where ID=" & lngCurrentId

Answer 1

trymsgbox datSaveBorrowDatstrSqlOfSave = "update " & strNameOfTable & " set " _
        & strSaveFieldName & "='" & datSaveBorrowDat _
        & "' where ID=" & lngCurrentId
if in doubt, always trydatSaveBorrowDat = Year(Date) & "-" & Month(Date) & "-" & Day(Date)

Answer 2

可以在mdb中设置输入掩码来指定日期格式

Answer 3

我想你用的数据库极可能是 ACCESS。
无论什么数据库，解决方法如下：1)如果是ACCESS，传入日期的形式是：#2002/1/24#
2)部分数据库如 SQL Server 不可以用该形式，而是：'2002/1/24'

Answer 4

在sql中是这种格式yyyy-mm-dd
在有的地方是这种格式yyyy/mm/dd
下面是一个转换函数
Function LongToDate(ldate) As Date
Dim dstr, yr, mo, dy As String
dstr = CStr(ldate)
If Len(dstr) = 8 Then
yr = Mid(dstr, 1, 4)
mo = Mid(dstr, 5, 2)
dy = Mid(dstr, 7, 2)
LongToDate = CDate(mo + "/" + dy + "/" + yr)
Else
LongToDate = 0
End If
End Function

Answer 5

up
你用format(youdate,"yyyy-mm-dd"),或者设置一下你用的数据库的日期格式
最好不要改控制面板中的格式,会影响其他数据库中的数据