Just a note to whoever might have this problem in the future I changed the code from

Thisform.crxApplication = Createobject("CrystalRuntime.Application")
to
Thisform.crxApplication = Createobject("CrystalRuntime.Application.11")

and now it appears to work. I got it to work on all 6 machines today.

I am still getting an error on my test machine which may be because I was
playing around the registry but I am not sure.

I wish crystal had a registry cleaner to get rid of old crystal entries.
Thank everyone for your help!