REVENSE
Posts: 46
|
Posted: 07/09/2007, 2:47 AM |
|
Hall Mario
i am using ccs 3.1 the code its difrent, my be it was fixed, but why i stiil get this error
>>>> original code from ccs
Public Shared Function ParseInt(ByVal Value As String, ByVal Format As String) As Int64
Dim chDelim As Char() = {";"C}
Try
If IsNothing(Format) Then Return Int64.Parse(Value)
If Format.Length = 0 Then Return Int64.Parse(Value)
Dim nfi As NumberFormatInfo = CType(System.Threading.Thread.CurrentThread.CurrentCulture.NumberFormat.Clone(),System.Globalization.NumberFormatInfo)
Dim Tokens As String() = Format.Split(chDelim)
If Tokens.Length > 4 Then
If Tokens(4).Length > 0 Then
nfi.NumberDecimalSeparator = Tokens(4)
nfi.PercentDecimalSeparator = Tokens(4)
End If
End If
If Tokens.Length > 5 Then
If Tokens(5).Length > 0 Then
nfi.NumberGroupSeparator = Tokens(5)
nfi.PercentGroupSeparator = Tokens(5)
End If
End If
Return Int64.Parse(Value,NumberStyles.Integer,nfi)
Catch e As Exception
Throw New Exception("Unable to parse Integer:" & e.Message)
End Try
End Function
|
|
|
|