MsgBox(ConvertHashProp("5F
Private Function ConvertHashProp(ByVal value As String) As String
Dim strArr() As String = Split(value, "-")
For i As Int16 = 0 To strArr.GetUpperBound(0) - 1
If strArr(i).Length = 1 Then
strArr(i) = "0" & strArr(i)
End If
Next
Return Join(strArr, "-")
End Function
Main Topics
Browse All Topics





by: jetforcePosted on 2004-09-10 at 02:35:15ID: 12024882
the problem is is the value is less than 15 (hex F) then there is no prefix of 0 -E3-3A-FC- 4-A1-FB-D5 "
3-E3-3A-FC -04-A1-FB- D5"
V V
"5F-A2-85-E1-BE-BE-A-66-23
If I compare this to the same Hash i did with VB.NET (Using standard .Net Crypto Provider):
"5F-A2-85-E1-BE-BE-0A-66-2
There is two ways to do this
1) find all the single figures and prefix them with a 0 and then do the compare
or split the string into an array by using the split variable as '-'
2) then compare the values individually by converting them to an integer
Jetforce