Hi i want to convert this code to xojo can help me
Imports System.Security.Cryptography
Imports System.Text
Namespace KayakoIntegration
Class Program
Private Shared Sub Main()
Dim apiKey = "apiKey"
Dim secretKey = "secretkey"
' Generate a new globally unique identifier for the salt
Dim salt = System.Guid.NewGuid().ToString()
' Initialize the keyed hash object using the secret key as the key
Dim hashObject As New HMACSHA256(Encoding.UTF8.GetBytes(secretKey))
' Computes the signature by hashing the salt with the secret key as the key
Dim signature = hashObject.ComputeHash(Encoding.UTF8.GetBytes(salt))
' Base 64 Encode
Dim encodedSignature = Convert.ToBase64String(signature)
' URLEncode
encodedSignature = System.Web.HttpUtility.UrlEncode(encodedSignature)
Console.WriteLine("Voila! A signature: " & encodedSignature)
Console.ReadKey()
End Sub
End Class
End Namespace