Criar Pasta com nome do txtCodigo

[m@r<3|o]

Pessoal, preciso implementar Pastas , com o mesmo nome do codigo a qual esta na tela de um cadastro de clientes

Alguem teria um exemplo ? na execucao do formulario cadastrando .....

txtcodigo = 00003 txtnome = Anaalice e qdo clicar no botao gravar

criar uma pasta c:\arquivos programas\ sistemas\ clientes\00003

Abraços
Marcelo

[lardecristo]

Código:

Teste = "c:\arquivos programas\sistemas\clientes\0001"
MKDIR (Teste)


Resolve?

Abraços,

[m@r<3|o]

Resolve , Obrigado Luis

Código:

LOCAL lcFile
lcFile =  PADL(this.parent.txtclie_cod.value,5,"5")
lcCaminho = 'C:\Arquivos de programas\Sistema\FICHAS'

IF .NOT. DIRECTORY (lcCaminho + lcFile)
   MKDIR(lcCaminho + lcFile)
ENDIF