Open File Input

[naidu9295]

Hi ,

I am using this code to open a text file and read the input into a variable

it is working fine with excel 2007 but not working with excel 2003

Could someone please help

Function GetText(tFile As Variant, j As Variant)
Dim oText As String
nSourceFile = FreeFile
Open tFile For Input As #nSourceFile
oText = Input$(LOF(1), 1)
Close