嘗試用VBA更新ms Access中的表格，但失敗了，使用了多個選項，但表格沒有得到更新
。Dim bod As Date
Dim assets As String
Dim emname As String
Dim ecode As String
Dim Astatus As String
Astatus = "SOLD"
msaved = True
DoCmd.SetWarningsFalse
bod = Me.datetime.Caption
price1k = Me.cmbox1_1AID.Value
emname = Me.empname.Value
ecod = Nz(Me.code.Value, 0)
//嘗試使用這個，但沒有得到更新沒有錯誤。
DoCmd. RunSQL "UPDATE [Asset E7450 List] SET Code = '" & ecod & "',[Date & Time] ='" & bod & "'，Status ='" & Astatus & "',[Sold To] ='" & empname & "', where Asset-ID ='" & price1k & " '"
// 嘗試了使用這個沒有更新沒有錯誤。
當前Db。 執行 "UPDATE [Asset E7450 List] SET Code = '" & ecod & "', [Date & Time] ='" & bod & "' ,Status ='" & Astatus & "',[Sold To] ='" & empname & "', where Asset-ID ='" & price1k & " '"
// 嘗試了這個方法，沒有資料更新，沒有錯誤。
Dim strSQL As String
strSQL = "UPDATE [Asset E7450 List] SET Code = '" & ecod & "',[Date & Time] ='" & bod & "' ,Status ='" & Astatus & "',[Sold To] ='" & empname & "', where Asset-ID ='" & price1k & " '"
DoCmd.RunSQL strSQL
MsgBox " Booking Request Accepted" , vbInformation
uj5u.com熱心網友回復：
如果[Date & Time]是一個日期/時間型別的欄位，使用#分隔符而不是'。如果欄位是一個數字型別，不要使用任何分隔符。
移除WHERE子句前面的逗號。
在資產-ID欄位名周圍需要使用[ ]，因為有連字符。
建議在命名規則中不要使用空格或標點/特殊字符。
轉載請註明出處，本文鏈接：https://www.uj5u.com/caozuo/314461.html
標籤：