rsOld.Open SELECT * order by id rsOld.MoveLast maxID = rsOld!id rsOld.MoveFirst for newRec = 1 to maxID lbl.Caption = Updating newRec of maxID <-- so i know it isnt frozen rsNew.AddNew If newRec <> rsOld.id Cancel rsNew.AddNew to loose # <-i'm not sure the code for this? If there's no code, i can just put an arbitery field in some field, then delete those records Else rsNew.Field1 = rsOld.Field1 rsNew.Field2 = rsOld.Field2 ... ... rsNew.Update rs.Old.MoveNext End If Next
|Running Access application from Task Scheduler||6||27|
|Linking a DMV to a database id/sql text in SQL server 2008||8||45|
|Dropdown Not In List - not working correctly||11||35|
|How to base a filter depending on fields contents?||15||45|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
11 Experts available now in Live!