使用Vb.NET更新命令在MS Access中更新日期

Question

您好我想使用Vb.NET更新命令更新MS Access中的日期。我使用日期選擇器工具和數據類型的日期是日期/時間。我用的調試，一切即將完美的變數，但是當我檢查更新用日期和月份仍然是正確的，我選擇，但年改爲1894年.... 代碼是：

Dim dt As String 
dt = Format(Dtp1.Value, "dd-MM-yyyy") 
Cmd.Parameters.Clear() 
Cmd.CommandText = "update tran set expdate=" & dt & " where trno=" & TxtMTrNo.Text.Trim 
Cmd.ExecuteNonQuery() 
LoadProducts() 

TxtMTrNo.Text = "" 
TxtMProduct.Text = "" 
TxtPQty.Text = "" 
TxtSQty.Text = "" 

MsgBox("Edited successfull") 

Answer 1

你需要把日期用單引號：

Cmd.CommandText = "update tran set expdate='" & dt & "' where trno=" & TxtMTrNo.Text.Trim 

否則它認爲日期是一個數學表達式。

Answer 2

不要使用字符串連接...這是容易出錯（日期格式的局部性問題）並且容易受到SQL注入問題的影響。使用參數代替，像這樣：

Cmd.CommandText = "update tran set expdate=@pDate where ..... 
Cmd.Parameters.AddWithValue("@pDate ", ...... 
Cmd.ExecuteNonQuery()