Get VB6 code to work in Win 64Bit

I use some code created by Fredrik Qvarfort, found from planet source code at <[login to view URL]>. This code works perfect in Windows 32 bit, but in 64 bit the code generate some errors. I therefor searching for somebody that could modify this VB6 code so it work perfectly in both 32 and 64 bit Windows OS.