Surviver 0 Posted January 5, 2011 Hello, I was wonderingif someone could help me to port some code form VB.NET to Autoit. I've never programmed inn VB:NET, and I really ried to understood that function, but I haven't managed yet, so I'm asking your help, please. Here is the code that I wish to port to AutoIT: Private Function generating(ByVal str1 As Object, ByVal str2 As Object) As String Dim objectValue As Object = Math.Floor(CDbl((CDbl(Conversions.ToInteger(NewLateBinding.LateGet(str2, Nothing, "Length", New Object(0 - 1) {}, Nothing, Nothing, Nothing))) / 2))) Dim arguments As Object() = New Object() { 0, RuntimeHelpers.GetObjectValue(objectValue) } Dim copyBack As Boolean() = New Boolean() { False, True } If copyBack(1) Then objectValue = RuntimeHelpers.GetObjectValue(arguments(1)) End If Dim obj3 As Object = Operators.AddObject(Operators.AddObject(NewLateBinding.LateGet(str2, Nothing, "Substring", arguments, Nothing, Nothing, copyBack), str1), Strings.Mid(Conversions.ToString(str2), Conversions.ToInteger(Operators.AddObject(objectValue, 1)), Strings.Len(RuntimeHelpers.GetObjectValue(str2)))) Return Me.MD5(Conversions.ToString(obj3)) End Function And here is the MD5 function, just in case you need it: Public Function MD5(ByVal number As String) As String Dim str2 As String Dim bytes As Byte() = New ASCIIEncoding().GetBytes(number) Dim provider As New MD5CryptoServiceProvider Dim num As Byte For Each num In provider.ComputeHash(bytes) str2 = (str2 & num.ToString("x2")) Next Return str2 End Function Please help me because I need it! Thank you. Share this post Link to post Share on other sites