B4J Question Select a directory

[samperizal]

Regards. How to select a directory. Thank you

 

[Daestrum]

It's a bit of an ambiguous question, can you give an example of where you want to select a directory?

 

[samperizal]

What you want is to select a source directory and a destination directory and move all files from the source to the destination.

 

[Daestrum]

If it just one level of directory then you can use something like

Dim srcDir as String = "C:/temp/someFolder"
Dim destDir as String = "C:/temp/someOtherFolder"  ' this must exist for the copy to work
Dim srcFiles as List = File.ListFiles(srcDir)
For Each f As String In srcFiles
    File.Copy(srcDir, f, destDir, f)
Next

If there are directories within the srcDir you want to copy, then you need to detect if f is a directory (File.IsDirectory(srcDir,f) and code accordingly (eg recursively read the sub directories)

 

[samperizal]

Thank you.

What I want is to be able to select the dirrerorios not to leave them fixed.
Thank you

 

[stevel05]

Use DirectoryChooser

Dim DC As DirectoryChooser
    DC.Initialize
    DC.InitialDirectory = 'Directory you want to start the chooser (Optional)
    Dim Folder As String = DC.Show(MainForm)