Hi.

Can someone give me the code to create a directory so that this code works,

Code:
a = App.Path & "\Basedados\" & (j + 1) & ".txt"
      Open a For Input As #(j + 1)
this gives me an eror bacause i don´t have in the directory c:\MyProgram\, the "basedados" subdir, i have to create it manualy, but i whant that the program create the subdir automatecly how can i do that ?

numibesi