Spanish Crear un .txt con el arbol de direcciones

[Xelenon]

Buenas, soy un poco nuevo en esto y queria consultar, como puedo hacer para crear un .txt que contenga el arbol de direcciones de lo que se encuentra en la carpeta y subcarpetas (incluyendo archivos)

Es decir, el arbol seria:

Carpeta Raiz
-proyecto.jar
-SubCarpeta Nivel1
---SubCarpeta Nivel2
-----Archivo1.txt
---SubCarpeta Nivel2
-----SubCarpeta Nivel3
--------Archivo2.txt

Y asi con tantas otras carpetas que necesito, no importa que no salga la Carpeta Raiz, eso no me interesa, lo que si necesito es todo el resto de archivos y carpetas. La cuestion seria como llevo esto a una Lista en un .txt para luego leerlo con el mismo programa y generar otras acciones?

Lo que hice fue generar un boton que cuando hago click haga esto:

#Region Project Attributes 
    #MainFormWidth: 600
    #MainFormHeight: 600 
#End Region

Sub Process_Globals
    Private fx As JFX
    Private MainForm As Form
    Private Button1 As Button
End Sub

Sub AppStart (Boton As Form, Args() As String)
    MainForm = Boton
    MainForm.RootPane.LoadLayout("layout") 'Load the layout file.
    MainForm.Show
End Sub

'Return true to allow the default exceptions handler to handle the uncaught exception.
Sub Application_Error (Error As Exception, StackTrace As String) As Boolean
    Return True
End Sub

Sub Button1_Action
    File.WriteList(File.DirApp, "tree.txt", File.ListFiles)
End Sub

Pero me da Missing parameter, que es lo que esta mal en el uso de File?


Gracias!.