Select Case Request.QueryString.Keys(intParam).ToLower()
                    Case "a"
                    Case "b"
                    Case "c"
                    Case Else
                        strfordecode = Request.QueryString(intParam)
                        strdecoded = cryptogram.localDecrypt(strfordecode)
                        Report.SetParameterValue(Request.QueryString.Keys(intParam), strdecoded)
End Select