Print existing pdf files to paper in VB6

I have a directory of pdf files and I want to send them all to my laser printer with one click using VB6. The idea would be to show the printer dialogue box to choose printer and settings etc and then use these settings to print all of the pdf files in the directory (just use [login to view URL] for your creation) one after the other. Must work under Windows XP and windows Vista and be written in VB6. I don't want to have to open and print them all manually hence the need for this program. Should be a very simple prog for a good coder.