dim s = System.Web.Security.FormsAuthentication.HashPasswordForStoringInConfigFile("12345", "MD5").ToUpper()msgbox(s)