Hi,
nachdem ich wirklich eine Weile probiert und die Lösung nicht gefunden habe, hier das Problem.
In einem PHP Skript liefert
Mein VB Code:
Klaro, Encoding Problem. Ich hab hin und her wandeln versucht aber komme nicht auf die Lösung.
Diese Online Encoder liefert das gleiche ergebnis wie in PHP onlinemd5.com/
Vielen Dank für eine Schubs in die Richtige Richtung..
John
nachdem ich wirklich eine Weile probiert und die Lösung nicht gefunden habe, hier das Problem.
In einem PHP Skript liefert
Mein VB Code:
VB.NET-Quellcode
- Friend Function MD5Str(ByVal strString As String) As String
- Dim MD5 As New MD5CryptoServiceProvider
- Dim Data As Byte()
- Dim Result As Byte()
- Dim Res As String = ""
- Dim Tmp As String = ""
- Data = Encoding.ASCII.GetBytes(strString)
- Result = MD5.ComputeHash(Data)
- For i As Integer = 0 To Result.Length - 1
- Tmp = Hex(Result(i))
- If Len(Tmp) = 1 Then Tmp = "0" & Tmp
- Res += Tmp
- Next
- Return Res
- End Function
- = D1457B72C3FB323A2671125AEF3EAB5D
Klaro, Encoding Problem. Ich hab hin und her wandeln versucht aber komme nicht auf die Lösung.
Diese Online Encoder liefert das gleiche ergebnis wie in PHP onlinemd5.com/
Vielen Dank für eine Schubs in die Richtige Richtung..
John
