![]() |
Chilkat • HOME • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi DLL • Go • Java • Node.js • Objective-C • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(VBScript) Generate RSA Key and Sign a StringSee more RSA ExamplesDemonstrates how to generate a new RSA public/private key pair and use it to generate a signature for a string. The (binary) digital signature is returned as a hexidecimalized string.
Dim fso, outFile Set fso = CreateObject("Scripting.FileSystemObject") 'Create a Unicode (utf-16) output text file. Set outFile = fso.CreateTextFile("output.txt", True, True) ' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Rsa") set rsa = CreateObject("Chilkat.Rsa") ' Generate a 2048-bit RSA key. success = rsa.GenerateKey(2048) ' Return the signature in hex. rsa.EncodingMode = "hex" strData = "This is the string to be signed." ' Sign the SHA256 hash of the string. hexSig = rsa.SignStringENC(strData,"sha256") outFile.WriteLine(hexSig) outFile.WriteLine(rsa.LastErrorText) ' Now verify the signature: success = rsa.VerifyStringENC(strData,"sha256",hexSig) If (success = 1) Then outFile.WriteLine("Signature verified!") Else outFile.WriteLine(rsa.LastErrorText) End If ' Try it with an invalid signature: success = rsa.VerifyStringENC(strData,"sha256","not a valid sig") If (success = 1) Then outFile.WriteLine("Signature verified!") Else outFile.WriteLine(rsa.LastErrorText) End If ' Try it with invalid data: success = rsa.VerifyStringENC("Not the original data","sha256",hexSig) If (success = 1) Then outFile.WriteLine("Signature verified!") Else outFile.WriteLine(rsa.LastErrorText) End If ' Try it with the wrong hash algorithm: success = rsa.VerifyStringENC(strData,"sha-1",hexSig) If (success = 1) Then outFile.WriteLine("Signature verified!") Else outFile.WriteLine(rsa.LastErrorText) End If outFile.Close |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.