J
Jeff C
The following events are tied to an OnClick Event of a command button.
DoCmd.SetWarnings False
Set oShell = CreateObject("WScript.Shell")
oShell.Run """C:\Program Files\Mobius\DocuAnalyzer\Program\Autoscrp.exe""
""s:\Analyzer\eMAR.bat""", 0, True
DoCmd.TransferText acImportFixed, "rpt11Import", "ScannedTBL", "s:\Rpt11.txt"
DoCmd.OpenQuery "qry_Clean1"
DoCmd.OpenQuery "qry_Clean2SpacesTime"
DoCmd.OpenQuery "qry_Clean3Add0"
DoCmd.OpenQuery "qry_Clean4MakeFourDigit"
DoCmd.OpenQuery "qry_Clean5Add:"
DoCmd.OpenQuery "qry_Clean6UpdateMidnight"
DoCmd.OpenQuery "qry_Clean7CombineDateTime"
DoCmd.OpenQuery "qry_Clean8AppendNewData"
DoCmd.OpenQuery "qry_Clean9DeleteTempImport"
DoCmd.DeleteObject acTable, "Rpt11_ImportErrors"
DoCmd.SetWarnings True
I want to schedule these to run at a certain time every night using the Task
scheduler and I don't know how to go about it. I think there must be an
easier way than converting allthese VB commands to WSH.
What would be the best way to do this? Thank you
DoCmd.SetWarnings False
Set oShell = CreateObject("WScript.Shell")
oShell.Run """C:\Program Files\Mobius\DocuAnalyzer\Program\Autoscrp.exe""
""s:\Analyzer\eMAR.bat""", 0, True
DoCmd.TransferText acImportFixed, "rpt11Import", "ScannedTBL", "s:\Rpt11.txt"
DoCmd.OpenQuery "qry_Clean1"
DoCmd.OpenQuery "qry_Clean2SpacesTime"
DoCmd.OpenQuery "qry_Clean3Add0"
DoCmd.OpenQuery "qry_Clean4MakeFourDigit"
DoCmd.OpenQuery "qry_Clean5Add:"
DoCmd.OpenQuery "qry_Clean6UpdateMidnight"
DoCmd.OpenQuery "qry_Clean7CombineDateTime"
DoCmd.OpenQuery "qry_Clean8AppendNewData"
DoCmd.OpenQuery "qry_Clean9DeleteTempImport"
DoCmd.DeleteObject acTable, "Rpt11_ImportErrors"
DoCmd.SetWarnings True
I want to schedule these to run at a certain time every night using the Task
scheduler and I don't know how to go about it. I think there must be an
easier way than converting allthese VB commands to WSH.
What would be the best way to do this? Thank you