?
Solved

XOR Encryption (Decryption) using SSRS

Posted on 2009-05-19
3
Medium Priority
?
968 Views
Last Modified: 2012-05-07
I am using XOR encryption to encrypt a value.  I want the value to show up in a SSRS report, how do I decrypt it using SSRS (Sql Server Reporting Services)?  Below is the code for encryption
Public Shared Function XOREncryption(ByVal key As String, ByVal value As String) As String
            Dim intXORValue1 As Integer
            Dim intXORValue2 As Integer
            Dim strDataOut As String = ""
 
            For lonDataPtr As Long = 0 To (value.Length - 1)
                intXORValue1 = Asc(value.Substring(lonDataPtr, 1))
                intXORValue2 = Asc(key.Substring(lonDataPtr Mod key.Length, 1))
                If (intXORValue1 = intXORValue2) Then
                    strDataOut &= Chr(intXORValue2)
                Else
                    strDataOut &= Chr(intXORValue1 Xor intXORValue2)
                End If
            Next lonDataPtr
 
            Return strDataOut
        End Function

Open in new window

0
Comment
Question by:Perfect10Sat
  • 2
3 Comments
 

Author Comment

by:Perfect10Sat
ID: 24432611
None of these answer my question, they just say how to do XOREncryption which I already have completed with the attached code..  I need to know how to do it in a SQL Reporting Service report..
0
 

Accepted Solution

by:
Perfect10Sat earned 0 total points
ID: 24433287
Figured it out, put the code above from me in the "Report Properties", Tab "Code".

Then call it like the following..

="Field decrypted is: "+code.XOREncryption("Key",Fields!DbField.Value)
0

Featured Post

Important Lessons on Recovering from Petya

In their most recent webinar, Skyport Systems explores ways to isolate and protect critical databases to keep the core of your company safe from harm.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Introduction Earlier I wrote an article about the new lookup functions (http://www.experts-exchange.com/A_3433.html) that ship with SQL Server 2008 R2.  In this article I’m going to show you another new feature of SSRS 2008 R2, this time in the vis…
Entering time in Microsoft Access can be difficult. An input mask often bothers users more than helping them and won't catch all typing errors. This article shows how to create a textbox for 24-hour time input with full validation politely catching …
This is Part 3 in a 3-part series on Experts Exchange to discuss error handling in VBA code written for Excel. Part 1 of this series discussed basic error handling code using VBA. http://www.experts-exchange.com/videos/1478/Excel-Error-Handlin…
Please read the paragraph below before following the instructions in the video — there are important caveats in the paragraph that I did not mention in the video. If your PaperPort 12 or PaperPort 14 is failing to start, or crashing, or hanging, …

864 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question