Do you know the main threat actor types? Most attackers fall into one of four categories, each with their own favored tactics, techniques, and procedures.
Option Compare Database Function Send_Daily_Stat() On Error GoTo Err_Send_Click Dim MyDB As Database, RS As Recordset Set MyDB = DBEngine.Workspaces(0).Databases(0) Dim docname As String, ctl As Control, strTo As String Dim path As String, subject As String, body As String Dim attach As String, blnSuccessful As Boolean Application.Echo False 'Get all the email addresses for the daily stat report Set RS = MyDB.OpenRecordset("qry_daily_stats_email") 'Report to run and make a snapshot of the report and put it on the server path = "c:\temp\" docname = "BBI DAILY REGIONAL" subject = "Daily Stat Report" body = "Daily Report is Attached" attach = path + docname + ".rtf" 'DoCmd.OpenReport docname, A_PREVIEW DoCmd.OutputTo acOutputReport, docname, acFormatRTF, _ attach, False 'This loops through all of the email addresses and sends the report to everyone Do Until RS.EOF strTo = RS!Email 'Old format for sending reports with warnings 'DoCmd.SendObject A_REPORT, docname, A_FORMATTXT, strTo, , , "Daily Stat Report", , False 'New way of sending reports without warnings blnSuccessful = FnSafeSendEmail(strTo, subject, body, attach, "", "") RS.MoveNext Loop 'Clean up process RS.Close DoCmd.Close A_REPORT, docname Set RS = Nothing Set MyDB = Nothing exit_send_click: Application.Echo True Exit Function Err_Send_Click: Resume exit_send_click End Function
|Using VBA to run .SQL file in Access 2016||8||31|
|Running Sum Help||31||19|
|Getting #Type! error in expression builder||5||19|
|Ensuring all processes are complete before continuing||6||8|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
12 Experts available now in Live!