Sample Visual Basic
Code to encrypt file:
Where Cryptocx1 is an instance of a Cryptocx Control.
Dim theResult as String
Cryptocx1.SourceFile =
txtSourceFile.Text
Cryptocx1.DestinationFile = txtDestinationFile.Text
Cryptocx1.Password = txtPassword.Text
theResult = Cryptocx1.AESFileEncrypt
'' Check to
see what has happened (if the decryption went ok without errors)
''
If theResult = "TRUE" Then
'' Ok, the encryption went well with no
errors
Else
MsgBox theResult
End If |