#Recompile the ascent manual
#Recompile the ascent full
#Recompile the ascent software

Your mileage with The Ascent will vary depending on how much of its side content you choose to engage with, and also how regularly you are taking advantage of the fast travel system to skip past dungeons. If !File( ForceExt(m.Read more 'The Ascent' Developers on Comparisons to 'Cyberpunk 2077' Wait window 'Please select your Cus_main to be recompiled.' TIMEOUT 2 Wait window 'Please locate your Cus_main.prg file.' TIMEOUT 2Ĭopy File (lcPrg) To (JustPath(lcPrg) + Ĭopy File (lcFxp) To (JustPath(lcPrg) + * The fxp is always in the same directory with the same name

* Get the user to tell us where the Prg is The funny thing the file gets renamed and moved to my windows desktop? At anyrate it works :) The only other thing I did was renaming the the cus_main.fxp to cus_mainold.fxp 'After' my back-up is made reason for, in order for the compile to recompile the existing cus_main.prg file the 'cus_main.fxp' file must me deleted or renamed. OK this runs smooth (see below) - thanks again Chris. Messagebox('Backup Completed.',0+64,'CompileMe.') Wait windows 'Copying Cus_Main.FXP.'timeout 1 Wait windows 'Copying Cus_main.PRG.' timeout 1 Wait window 'Copying file Please wait.' nowait Wait window 'Preparing to backup files.' nowait

#Recompile the ascent full

Messagebox('Disc Full ! please select an empty disc and try again',0+64,'Message from CompileMe') Res=messagebox('Drive A: not ready, please verify media and try again',4+64,'Message from CompileMe') Some key points in why I am doing this - I am copying both cus_main.prg & cus_main.fxp files which are compiled in vfp 5.0 for backup just in case something went wrong with cus_main compiled under vfp 8.0 at least the original files will remain on disket.Īnswer=messagebox('You want to run CompileMe Backup.',4+32,'CompileMe.') compile in vfp 5.0) file, if the CUS_MAIN.FXP already exists it will not do nothing. Also the way this code compiles I will need to know how I can 'overwrite' the existing cus_main.fxp(ref.

#Recompile the ascent software

Ascent software installed on network drive, etc.). OK this code works fine however, I need to know would be the best way to prompt the user to either select two files (cus_main.prg & cus_main.fxp)or to prompt user where the third-party software (Ascent) is located, because these two files reside in the Ascent root directory BACKUP and to prompt user is very important in this case since these files will not always be in the same directory (i.e. If !File( ForceExt(m.lcFile,'fxp') ) & Compile onceĭo (lcFile) RE: File in Use error DSummZZZ (Programmer) 7 Jul 04 16:35 NAnswer = MESSAGEBOX(cMessageText, nDialogType, cMessageTitle) prg & fxp residesĬMessageText = 'Would you like to search for your directory?' GETDIR() & User is prompt to select dir where. There is no other users accessing this file at this time (ref.

#Recompile the ascent manual

The purpose for the Getdir() is so that the Copy File command will know where to backup the cus_main.prg & fxp files prior to my earlier compile procedure since users do not manual back them up first. I'm attempting to create a program that would do a directory prompt (which I get) for the user to select their cus_main.prg file and it would automatically back up the prg & fxp files prior to recompiling.