Reporting is one of the most important and least talked about aspects of a world-class threat intelligence program. Here’s how to do it right.
Private Sub UpdateTotals() Dim v As Integer, CurTtlAmtIn As Currency, CurTtlAmtOut As Currency, CurTtlNetAmt As Currency, CurTtlAmtVal As Currency CurTtlAmtIn = curCtlTtlAmtIn CurTtlAmtOut = curCtlTtlAmtOut CurTtlNetAmt = curCtlTtlNetAmt CurTtlAmtVal = curCtlTtlAmtVal v = Val(Forms![frm_DataReporting]![WVLVLControlTotals].Form![txtNewShiftPrtgLVLCtlID]) CurrentDb.Execute "UPDATE ShiftReportingLVLCtl (TtlAmtIn, TtlAmtOut, TtlNetAmt, TtlAmtVal) SET (" & CurTtlAmtIn & "," & CurTtlAmtOut & "," & CurTtlNetAmt & "," & CurTtlAmtVal & ")" & " WHERE ShiftReportingLVLCtlID=" & v, dbFailOnError End Sub
|Recommendations for good database design of MS Access Database||6||20|
|Open Form - Filter Field - Update Another Field in Table||2||13|
|Runtime error 3075 in MS Access VBA after moving Tables to SQL Server||7||14|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
11 Experts available now in Live!