Friday, April 17, 2009

Mercury Encrypter Object

Set enc=CreateObject("Mercury.Encrypter")

Msgbox enc.EnCrypt ("Automation")

Set enc=Nothing

No comments: