Wayne,
the only 2 problems I ran into were simple syntax ones, which were easily fixed, except for one line:
rst!SampleDate = CDate(SampleDate, "yymmddhhmm")
I keep getting the "Expected )" error at the comma. It does not want the date format thrown in there like that, but I've not been able...