B4J Question How to automatically erase c:\Users\...\AppData\Pgmx\. prior to running app?

Diceman · Mar 11, 2021

I have text files like MyApp.Txt in my app's Files directory that need manual editing from time to time with a text editor. If I edit the text text file(s) and run the B4J app, the app is still using the cached file(s) in c:\Users\...\AppData\Pgmx\MyFile.Txt. I waste a lot of time debugging my app only to realize later it is still using the old file on C:.

Is there an easy way to get B4J to erase the files in c:\Users\...\AppData\PgmX\*.* prior to running app and always copy the files from D:\B4X_Apps\B4X_My_Apps\PgmX\Files?
I thought "Tools > Clean Project" would do it, but it doesn't.

TIA

TILogistic · Mar 11, 2021

TILogistic · Mar 11, 2021

if you want to do it using the b4j editor create a:

'#CustomBuildAction:

or

'Ctrl + click to sync files:

Dadaista · Mar 11, 2021

B4X:

Dim xui As XUI

Sub AppStart (Form1 As Form, Args() As String)

xui.SetDataFolder("yourApp")

For Each f As String In File.ListFiles(xui.DefaultFolder & "\Pgmx")
    Dim k As String = f
    File.Delete(xui.DefaultFolder & "\Pgmx", k)
Next

For Each fa As String In File.ListFiles("D:\B4X_Apps\B4X_My_Apps\PgmX")
    Dim ka As String = fa
    File.Copy("D:\B4X_Apps\B4X_My_Apps\PgmX", ka, xui.DefaultFolder & "\Pgmx", ka)
Next

'Rest of Code
'.....
'.....
End Sub

Diceman · Mar 11, 2021

Are you suggesting I write code when my program terminates to delete the old text files from c:\Users\...\AppData\PgmX\*.*? That way the files will be automatically copied from the Files directory? Currently I have a batch file to move the files from the Files directory to the c:\Users\...\AppData\PgmX\ directory which is a bit cumbersome because I have to remember to execute it when I modify the text file or the Sqlite database in the Files directory.

Diceman · Mar 11, 2021

Dadaista said:

B4X:

Dim xui As XUI

Sub AppStart (Form1 As Form, Args() As String)

xui.SetDataFolder("yourApp")

For Each f As String In File.ListFiles(xui.DefaultFolder & "\Pgmx")
    Dim k As String = f
    File.Delete(xui.DefaultFolder & "\Pgmx", k)
Next

For Each fa As String In File.ListFiles("D:\B4X_Apps\B4X_My_Apps\PgmX")
    Dim ka As String = fa
    File.Copy("D:\B4X_Apps\B4X_My_Apps\PgmX", ka, xui.DefaultFolder & "\Pgmx", ka)
Next

'Rest of Code
'.....
'.....
End Sub

I don't think I can delete the files from the AppStart directory, because if the files are missing from the c:\Users\...\AppData\Pgmx\ directory when I compile the app, B4J will automatically copy the updated text files from the Files directory to this c:\Users\...\AppData\Pgmx\ directory and I would be deleting these newly copied files. Or did I miss something?

Dadaista · Mar 11, 2021

Diceman said:
Are you suggesting I write code when my program terminates to delete the old text....

When your app start

OliverA · Mar 12, 2021

Ok, what am I misconstruing here. The Files directory is statically embedded into the jar file created when compiling your app. If you update any files in the Files directory, then you have to recompile the app in order for the app to use the files

B4J Question How to automatically erase c:\Users\...\AppData\Pgmx\. prior to running app?

Diceman

Active Member

TILogistic

Expert

TILogistic

Expert

Dadaista

Active Member

Diceman

Active Member

Diceman

Active Member

Dadaista

Active Member

OliverA

Expert

Similar Threads

B4J Question How to automatically erase c:\Users\...\AppData\Pgmx\*.* prior to running app?

Active Member

Expert

Expert

Active Member

Active Member

Active Member

Active Member

Expert

Similar Threads

Privacy & Transparency

Privacy & Transparency

B4J Question How to automatically erase c:\Users\...\AppData\Pgmx\. prior to running app?