Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(VB.NET UWP/WinRT) PBKDF2 - Derive Key from PasswordDemonstrates how to derive a symmetric encryption key from a password using PBKDF2. This example matches the results found at this URL: http://www.di-mgt.com.au/cryptoKDFs.html#examplespbkdf
' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim crypt As New Chilkat.Crypt2 Dim hexKey As String ' http://www.di-mgt.com.au/cryptoKDFs.html#examplespbkdf Dim pw As String = "password" Dim pwCharset As String = "ansi" ' Hash algorithms may be: sha1, md2, md5, etc. Dim hashAlg As String = "sha1" ' The salt should be 8 bytes: Dim saltHex As String = "78578E5A5D63CB06" Dim iterationCount As Integer = 2048 ' Derive a 192-bit key from the password. Dim outputBitLen As Integer = 192 ' The derived key is returned as a hex or base64 encoded string. ' (Note: The salt argument must be a string that also uses ' the same encoding.) Dim enc As String = "hex" hexKey = crypt.Pbkdf2(pw,pwCharset,hashAlg,saltHex,iterationCount,outputBitLen,enc) Debug.WriteLine(hexKey) ' The output should have this value: ' BFDE6BE94DF7E11DD409BCE20A0255EC327CB936FFE9364 |
© 2000-2022 Chilkat Software, Inc. All Rights Reserved.