bb.donnay-software.com

Posted: **Tue Nov 27, 2018 7:10 am**

How to rename a file? For some reason it does not work. Surprised myself

Posted: **Tue Nov 27, 2018 7:53 am**

Show your code.

Posted: **Tue Nov 27, 2018 1:25 pm**

        CLoseAll()             // Закрытие всех баз данных с ожиданием завершения операций
        DIRCHANGE(M_PathAppl)                                   // Перейти в папку текущего приложения
        IF FILE('Rasp.dbf')
           ERASE('Rasp.dbf')
        ENDIF
        mNameRsp = 'Rasp_'+LOWER(Ar_Model[mNumModel])+'.dbf'
*       RENAME FILE (mNameRsp) TO ('Rasp.dbf')
        COPY FILE (mNameRsp) TO ('Rasp.dbf')

COPY works but not the RENAME

Posted: **Tue Nov 27, 2018 3:15 pm**

I use Frename() function.

It requires a full path name for both arguments.

Posted: **Tue Nov 27, 2018 10:00 pm**

Thank You, Roger! So it seems to work:

Code: Select all

        CLoseAll()             // Закрытие всех баз данных с ожиданием завершения операций
        DIRCHANGE(M_PathAppl)                                   // Перейти в папку текущего приложения
        mNameRspOld = M_PathAppl+'Rasp_'+LOWER(Ar_Model[mNumModel])+'.dbf'
        mNameRspNew = M_PathAppl+'Rasp.dbf'
        IF FILE(mNameRspNew)
           ERASE(mNameRspNew)
        ENDIF
        FRENAME(mNameRspOld,mNameRspNew)

[/size]

Posted: **Wed Nov 28, 2018 3:21 am**

I am using this , with 10 attempts ,if it fails for the first time :

Code: Select all

	deletefile(cestatlac+"Supis_C_Parciel.pdf")
	FRename((cestatlac+"RauknReport.pdf"),(cestatlac+"Supis_C_Parciel.pdf"))
	pokus:=1
	do while file((cestatlac+"Supis_C_Parciel.pdf"))!=.T. .and. pokus<10
		sleep(300)
		FRename((cestatlac+"RauknReport.pdf"),(cestatlac+"Supis_C_Parciel.pdf"))
		pokus++
	enddo

bb.donnay-software.com

How to rename a file?

How to rename a file?

Re: How to rename a file?

Re: How to rename a file?

Re: How to rename a file?

Re: How to rename a file?

Re: How to rename a file?