Dim sTemp As String = "ABCDh"
        Dim DATA_SIZE() As Byte = Encoding.UTF8.GetBytes(sTemp)
 
        Dim data(DATA_SIZE.Length) As Byte
        Dim result() As Byte
        Dim shaM As New SHA256Managed()
        result = shaM.ComputeHash(data)

Sch?ne Gr??e
JackInBlack

Beitrag wurde zuletzt am 23.11.08 um 23:09:12 editiert.