Sapphire Encrypt Utility |
Version |
Product Details
 |
Data security is important when you are dealing with the Internet and mobile applications. Having confidential information stored on your Pocket PC means you need to ensure that it is kept save if the device gets stolen or if you are transferring it over the internet. Consider the situation if a company’s client list getting into the hands of a competitor!
The Sapphire Encrypt utility allows you to encrypt and decrypt both plain text and files. You can simply encrypt the data by using a specified key and decrypt it on another device or server, or visa-versa.
Read deVBuzz.com Article
Click here to view a third party article on how to use the Sapphire Encrypt Utility |
Product Features
The Sapphire Encrypt Utility makes data encryption easy by providing the following functionality:
- Encrypt a plain text string using a specified key
- Decrypt a plain text string specifying the key
- Encrypt a file using a specified key
- Decrypt a file using a specified key
You can download the latest demo version to see a fully working demo which you can reuse within your application as you see fit. This can be found on the download pages. The demo versions are fully functional and simply contain a popup message from time to time. These are ideal if you are selling your application to the client where you can be confident the application will work in practice and not just theory.
Sample Code
Implementation couldn’t be easier, simply declare the DLL function as a function within your application and call it as though you wrote it yourself. Here’s a sample demo on how to encrypt and decrypt a simple text string within VB.NET.
Encrypting Text
Dim sEncrypted As Integer
Dim sNew As String
' Fill sNew to force the string variable to a sufficient size for the returned string
sNew = Space(1000)
sEncrypted = sEncryptText(txtOriginal.Text, sNew, txtPassword.Text, _
1234567890, True)
txtEncrypted.Text = StripString(sNew)
If sEncrypted = 0 Then
MsgBox("Encrypted")
Else
MsgBox("Problem")
End If
Decrypting Text
Dim sDecrypted As Integer
Dim sNew As String
' Fill sNew to force the string variable to a sufficient size for the returned string
sNew = Space(1000)
sDecrypted = sDecryptText(txtEncrypted.Text, sNew, txtPassword.Text, _
1234567890, True)
txtDecrypted.Text = StripString(sNew)
If sDecrypted = 0 Then
MsgBox("Decrypted")
Else
MsgBox("Problem")
End If
Royalty Free Licence
When you purchase a developer’s licence, you are free to use the DLL in any number of your projects and deploy it to all the devices to your clients. There’s no need for royalties based on the scale of your project, just a one off fee. You will also get 12 months email support and discounted upgrades for future developments.
Developer's Licence cost 299 GBP.
PayPal Purchase
|
