将now()从vb6插入到mysql中

时间:2013-10-06 21:26:18

标签: mysql database datetime vb6

抱歉我的英文。

当我从vb6将now()插入mysql(它是一个日期时间类型)时,只显示零(00:00:00这样)。如何让它们正常显示?

当我将日期时间类型更改为正常显示的文本时,但我无法使用它。

这是我插入的方式

oSql = "INSERT INTO rendeles(ID_Vevo,Datum,VCime,ID_Alkalmazott) VALUES (" & _
cmbVasarlo.ItemData(cmbVasarlo.ListIndex) & ", '" & Now() & "', '" & _ 
oRs1!Cim & "', " & logged_user_id & ")"

Set oRs = oConn.Execute(oSql)

2 个答案:

答案 0 :(得分:0)

你需要这样的东西(我在VB6上真的生锈了)

Dim sqlDate As String
sqlDate = Format$(Now, "yyyy-mm-dd hh:mm:ss")

...
cmbVasarlo.ItemData(cmbVasarlo.ListIndex) & ", '" & sqlDate  & "', '" & _ 
oRs1!Cim & "', " & logged_user_id & ")"

答案 1 :(得分:0)

将VB6的NOW()函数格式化为MYSQL的使用格式

Format$(Now(), "yyyy-mm-dd hh:mm:ss")

OR

只需使用MYSQL的Now()函数代替VB6的

oSql = "INSERT INTO rendeles(ID_Vevo,Datum,VCime,ID_Alkalmazott) VALUES (" & _
cmbVasarlo.ItemData(cmbVasarlo.ListIndex) & ", now(), '" & _ 
oRs1!Cim & "', " & logged_user_id & ")"