ISEncryptObject.CryptKey

Description

The key for the source text encrypting.

Syntax

object.CryptKey

Part	Attribute	Type	Description
`object`	Required	ISEncryptObject	The `object` always implements the ISEncryptObject interface

Return Value

string

Example

Display the source text and the result of its encrypting and decrypting.

Dim aEncryptObject
Dim aSourceText
Dim aEncryptedText, aDecryptedText   

Set aEncryptObject = Profile.CreateEncryptObject

aSourceText = "Patient has a disease" 

aEncryptObject.CryptKey = "12345"
aEncryptedText = aEncryptObject.LineEncrypt(aSourceText) 
aDecryptedText = aEncryptObject.LineDecrypt(aEncryptedText)

Profile.MsgBox("Source Text: " & aSourceText & vbNewLine &_ 
  "Encrypted Text: " & aEncryptedText & vbNewLine &_ 
  "Decrypted Text: " & aDecryptedText)

Note:

Version information

Added in v7.8.0