VBScript convert string to integer

I have a function that reads a text file containing two lines, it reads the second line and tries to convert the string to a Long integer. My problem is that it's not converting the string, the code for the function is as follows:

Function getLastUsed (txtFilePath)
    'Read timestamp created by full backup script
    Const ForReading = 1
    'Error Handling
    On Error Resume Next
    Err.Clear
    Set objFile = Fso.OpenTextFile(txtFilePath, ForReading)
    'Read if file was successfully opened, else return 0
    If Err.Number = 0 Then
        'Value will be on the second line, so readLine twice
        Dim valString
        valString = objFile.Readline
        valString = objFile.Readline
        objFile.Close
        'If not empty continue, else return 0
        If Not IsEmpty(valString) Then
            'Return value is IsNumeric, else return 0
            If IsNumeric(valString) Then
                Dim valInt
                valInt = CLng(valString)'<--Won't convert, variable valInt is empty after this line
                getLastUsed = valInt
            Else
                getLastUsed = 0
            End If
        Else
            getLastUsed = 0
        End If
    Else
        getLastUsed = 0
    End If
End Function

I'm using Visual Studio to step through and debug, looking at the 'valInt' variable, it is empty after I call CLng or CInt. However, if I hardcode a value, like valInt = CLng("18") it works fine. I'm not sure what I'm missing, any help is appreciated.

UPDATE

Ok so I tried running the script again, this time replacing the value in the text file, which was 20110511123500 to something shorter 2011 and it worked. So it seems like it was a precision issue. That leads to a second question, what's the largest number VBScript can handle as far as conversion is concerned? The numeric value indicated is the amount of disk space on a 开发者_开发技巧hard drive, so I need to be able to read large numbers. Thanks for the hint Pepto.

UPDATE 2

Using double did the trick, thanks G Mastros.

---

Maximum Numeric Value Sizes Listed Below:

Int16: -32768 to 32767

Int32: -2147483648 to 2147483647

Int64: -9223372036854775808 to 9223372036854775807

Double: -1.79769313486232E+308 to 1.79769313486232E+308

Long: -9223372036854775808 to 9223372036854775807

Short: -32768 to 32767

There is also in the System.Numerics namespace a new datatype introduced in .NET 4.0 called the BigInteger (System.Numerics.BigInteger) which can store incredibly large numbers.

More info can be found here

CDbl did the trick because the conversion required the right data type based on the numbers total size.

---

Going a little backwards here, but there's no need to make any conversion at all. All variables in VBScript of are type Variant. The language doesn't support true conversions. That's why comparisons can be made between values of different types. You can simply check the value with IsNumeric() and then continue on.

You should also combine your nested If statements. Since there's no Else statement in the outside branch, they can be combined:

If Not IsEmpty(valString) And IsNumeric(valString) Then ...