Not wishing to be impolite, I hesitate to suggest that you should take another look at the manual, and perhaps choose a function more suited to the task of determining, wheter or not a file is present on disk.

There is no better function than adir() to check if a file exists or not. File() is not reliable, because it will search the complete path even though you specify another path. So file('c:\temp\myfile.txt') will return true even if c:\temp\myfile.txt does not exist, as long as myfile.txt if found in any directory in your path.


>Mohammed,
>
>I'm sorry - I was a bit hasty in my first answer.
>
>You should still look at your if...endif's, but also:
>
>Exactly what do you expect ADIR() to do for you in this context?
>
>Not wishing to be impolite, I hesitate to suggest that you should take another look at the manual, and perhaps choose a function more suited to the task of determining, wheter or not a file is present on disk.
>
>>hi all,
>>
>>i try to keep the Cursor at text1 if the file found,
>>but it complate all the code.
>>
>>

>>if adir(dummy,lcFile)>0
>>        MESSAGEBOX(" file exists")
>>        THISFORM.TEXT1.SetFocus()
>>       * RETURN
>>    else
>>        COPY  TO (gcDelimName) XL5
>>    ENDIF
>> endif
>>.
>>.
>>.
>>.
>>.
>>

>>
>>thanks for help.