ctmpfile returns the full path to the 'Service.cfg' file.
>What does ctmpfile return?
>
>This works for me:
>
>clear
>cConPath = sys(2003)+'\'
>ctmpfile = ALLTRIM(cConPath + "Service.cfg")
>?ctmpfile
>lnfileHandle=FOPEN(ctmpfile)
>?lnfilehandle
>lnEnd=FSEEK(lnFileHandle,0,2)
>? lnend
>IF lnfileHandle > 0
> =FCLOSE(lnfileHandle)
>ENDIF
>
>
>>Hi, all
>> I am working in VFP8.
>> I have some code that is suppose to open a plain ascii file in read-only buffered mode (default mode) and find out if the file has something in it.
>>
>>ctmpfile = ALLTRIM(cConPath + "Service.cfg")
>>STORE FOPEN(ALLTRIM(ctmpfile)) TO lnFileHandle
>>STORE FSEEK(lnFileHandle,0,2) TO lnEnd
>>STORE FSEEK(lnFileHandle,0) TO lnTop
>>STORE FSEEK(lnFileHandle,0,1) TO lnCurrent
>>
>>
>>lnFileHandle comes back as 0 (zero) not -1 or 1. If I set code before this to be sure that the file is there, it comes back true. But the lnFileHandle still is set to 0.
>>Can anyone help me fix this problem??
>>
>>Thanks,
>>Beth