Sample Visual Basic
Code to 3DES encrypt a string.
Where Cryptocx1 is an instance of a Cryptocx Control.
''
'' 3DES Encrypt a String
''
Dim Cryptocx As New EasyByte_Software.Cryptocxv7
Cryptocx.LicenseKey = "DEMO"
Cryptocx.DESKey1 = Des3Key1.Text
Cryptocx.DESKey2 = Des3Key2.Text
Cryptocx.DESKey3 = Des3Key3.Text
Cryptocx.InputText = txt3DESPlain.Text
txt3DESEncrypted.Text = Cryptocx.TripleDESStringEncrypt
'' Free up Memory Resources
''
Set Cryptocx = Nothing
|