File name currently limnited to 8.3 format error when running a VB program - need he

[kalyanijala]

Hi There,
I have a problem running a VB program.
This programs actually reads a DAT file and gives the best CPU time taken to run the program.
for example I'm reading files like TN3004, TN3104 , TN3204 ...so forth
but when i try to run this prog it gives an error File name currently limnited to 8.3 format ..**please try again**
<-<-3;1H Enter name of Read

this is the part of the code where i'm having issues

Private Sub cmdRun_Click()
Dim strfile As String
strfile = ""

read the file into a string

Dim listStr, currStr As String
Dim Counter As integer

pos = 1
pos = Instr(pos, strFile, "DATAFILE=")
tempStr = "TN"

For Counter = 0 to 7
listStr = " "
ListStr = tempstr & "3" & counter & "0" 'file names start with TN3004 etc
listStr = listStr & "4"
currStr = Mid(strFile, pos + 9,5)
txtCurrentFile.Text = currstr


Next counter


wud kindly appreciate if somone could help me on this