This isn't a question but I thought I'd start a thread where links to exceptionally useful (and widely applicable) vb6 code could be placed.
My choice is by someone called John Korejwa and is located on planet sourcecode at
http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=50065&lngWId=1
Basically what it does is to overcome a serious deficiency in vb6 without resorting to 3rd party components
In vb6 pictures can only be stored as bitmaps. If your application involves capturing and storing images (such as document scans) this can require vastly greater hard disk space than if th images coulsd be stored as jpgs.
That's what this source code provides via a single class that incorporates jpeg compression code.
This limitation is the cause of innumerable questions on vb forums but this is the only code I've ever found that solves the problem just using code inside your vb6 program.