Шифрование и запись данных в базу данных.
	RetVal=oAuth.WriteDB(ucase(Request.
ServerVariables(«Auth_User»)),0,1,Request.Form(«Challe
nge»)