Rajan Verma has posted the following on 11-23-2012 06:31 PM:
Here is a basic Function to Encrypt and*Decrypt* any text Public Function evtEncrypt_Decrypt(strText As String, strPWD As String) As String * * Dim byteText() As Byte * * Dim bytePWD() As Byte * * Dim intPWDPos As Integer * * Dim intPWDLen As Integer * * Dim intLoop As Integer * * byteText = strText […]http://stats.wordpress.com/b.gif?hos...f=&feed=1
Encrypt and Decrypt Text
