Ik ben bezig om via vb.net in te loggen op het msn netwerk.
Het gaat allemaal prima totdat ik een md5 password moet terug sturen.
Ik krijg van de server een hashcode.
Hier plak ik mijn wachtwoord aan vast en vervolgens ga ik dat met de ingebouwde encryptie van .NET encrypten.
Van de uitkomst maak ik een lowercase 32 byte hexadecimale string van, zoals msn dat wil.
Ik krijg echter altijd de error code 911 3 terug
generateHash code
voorbeeld input: 989048851.1851137130mijnwachtwoord
Op aanvraag kan ik de complete source mailen. Misschien dat het dan duidelijker is.
Het gaat allemaal prima totdat ik een md5 password moet terug sturen.
Ik krijg van de server een hashcode.
Hier plak ik mijn wachtwoord aan vast en vervolgens ga ik dat met de ingebouwde encryptie van .NET encrypten.
Van de uitkomst maak ik een lowercase 32 byte hexadecimale string van, zoals msn dat wil.
Ik krijg echter altijd de error code 911 3 terug
generateHash code
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
| Private Function GenerateHash(ByVal SourceText As String) As String
Dim e As Integer
Dim s As String = ""
Dim t As String = ""
Dim Ue As New UnicodeEncoding()
Dim ByteSourceText() As Byte = Ue.GetBytes(SourceText)
Dim Md5 As New MD5CryptoServiceProvider()
Dim ByteHash() As Byte = Md5.ComputeHash(ByteSourceText)
For Each e In ByteHash
s = Hex(e)
If (s.Length = 1) Then
t += "0"
t += s.ToLower
Else
t += s.ToLower
End If
Next
Return t.ToLower
End Function |
voorbeeld input: 989048851.1851137130mijnwachtwoord
Op aanvraag kan ik de complete source mailen. Misschien dat het dan duidelijker is.