Ley antifraude 2021 (VERIFACTU) - Programas informáticos

[CarlosR]

Empezado por jlmoli_67

Calculo del hash en .net:


Imports System.Security.Cryptography


***********

Dim cadena As String = "Hola, mundo!"

' Convertir la cadena en bytes
Dim cadenaBytes As Byte() = Encoding.UTF8.GetBytes(cadena)

' Crear el objeto SHA256
Dim sha256 As New SHA256Managed()

' Calcular el hash SHA-256
Dim hashBytes As Byte() = sha256.ComputeHash(cadenaBytes)

' Convertir el hash a una cadena hexadecimal
Dim hashString As String = BitConverter.ToString(hashBytes).Replace("-", "")

' Mostrar el hash
' Console.WriteLine("Hash SHA-256 de '" & cadena & "': " & hashString)
MsgBox("Hash SHA-256 de '" & cadena & "': " & hashString)

Si usas sql server lo tienes mas fácil :


SUBSTRING(master.dbo.fn_varbintohexstr(HASHBYTES('SHA2_256', @cXML)),3,64)
en donde hashbytes crea el hash, la función varbintohexstr lo convierte a hexadecimal y el substring es porque esa función genera algunos espacios extra que no nos sirven.