I Still cannot get this to work can anyone please tell me where the problem is and what i am doing wrong . a file number is entered
in a text box automaticaly the file exits but i am gettig a error 75 Please help am new to VB
Private Sub Open_File()
Dim intFreeFile As Integer
Dim strFileName as String
strFileName = txtFileName.Text
strFileName = Dir("d:\Home.txt")

intFreeFile = FreeFile

Open strFileName For Input As #intFreeFile
Do

Line Input #intFreeFile, strMember
Line Input #intFreeFile, strname
Line Input #intFreeFile, strlastname
Line Input #intFreeFile, straddress
Line Input #intFreeFile, strphone

Loop Until EOF(intFreeFile)
Close #intFreeFile

End Sub
i Know that i could set up a control array and it would be easier but i want to get this way to work first The runtime error is 75
i Know it is something really stupid that i have overlooked or forgot to do