Well, without actually looking at your code, I couldn't tell you what you're doing wrong, but I can pretty much assure you that there's almost always more than one way to perform a particular task and the first effort isn't necessarily the best. A couple of things, though:
-Whenever you change any of your code, make sure to Compile it. Post back if you need instructions.
-If you ever make Object References, make sure that you destroy the Object once you've finished using it by:
and when finishedCode:Dim My_Object as Some_Object Set My_Object=New Some_Object
Creating and Destroying objects might be a bit more advanced than your current level, though. Additionally, the Performance Analyzer (Tools->Analyze->Performance) can give you some high-level insight on ways to improve your db.Code:Set My_Object=Nothing