'First check upload to be sure that it and the report type are of the same 'type. If not, warn user and exit sub. Dim rst As Recordset, db As DAO.Database Set db = CurrentDb Set rst = db.OpenRecordset("tblAMLUploadedToday", dbOpenTable) Do Until rst.EOF Debug.Print rst rst.MoveNext Loop End Sub
|combine ShipTo and BillTo Address||3||22|
|Run Time Error 3071||26||39|
|How can I solve "The expression you entered has a function that database01 can't find"||25||37|
|Match characters in text string and then parse text string in Access Query||10||22|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
16 Experts available now in Live!