Advertisement
Advertisement
| 06.10.2008 at 02:14PM PDT, ID: 23473925 |
|
[x]
Attachment Details
|
||
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: |
Dim SubID As String Dim WE As Date Dim SQL As String SubID = [Forms]![frm_Expenses]![SubID] WE = [Forms]![frm_Expenses]![cboWeekEnding] SQL = "UPDATE dbo_tbl_Weekly_Expenses_Temp SET [Week Ending] = #" & WE & "# WHERE Submission_ID = " & SubID DoCmd.RunSQL (SQL) |