[RESOLVIDO] criar pastas

Discussão em 'EMS , HCM e Totvs 11' iniciado por Will, Dezembro 3, 2009.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. Will

    Will Membro Participativo

    Eae pessoal tudo bã???
    Seguinte, quero uma dica de vocês, temos os fotns no servidor, e seguido estou alterando os mesmos. Gostaria de ver uma maneira de criar um programa que baixe os mesmos para um diretório local, para assim eu alterar os mesmos na minha máquina e depois só jogo no servidor.
    Pensei em crira um programa que crie o diretório do programa que eu desejo alterar e copie o mesmo. Só não sei como fazer para ler as folders do servidor e criar lola e nem como copiar arquivo de um destino e colar local. Alguém tem idéia da melhor maneira d fazer isso???
    vlwwww
  2. jonas

    jonas Membro Participativo

    Veja se te ajuda:

    Para criar pastas:
    Código:
    assign file-info:file-name = "\\servidor\diretorio". /* Verifica se a pasta já existe */
        if file-info:full-pathname = ? then do: /* Se não existir então criar a pasta */
            os-create-dir value('\\servidor\diretorio').
            /* Se for criar uma pasta dentro da pasta criada acima */
            os-create-dir value('\\servidor\diretorio\teste').
        end.
    
    Para mover arquivo:
    Código:
    dos silent value("move \\servidor\diretorio\teste\arquivo.txt \\servidor\diretorio\outrapasta").
    

    Para deletar arquivo:
    Código:
    dos silent value("delete \\servidor\diretorio\teste\arquivo.txt").
    

    Abs.
  3. jonas

    jonas Membro Participativo

    Faltou o comando para copiar:

    Código:
    dos silent value("copy \\servidor\diretorio\teste\arquivo.txt \\servidor\diretorio\outrapasta").
    Se você quiser copiar um bloco de arquivos, por exemplo todos os arquivos com extensão ".r":
    Código:
    dos silent value("copy \\servidor\diretorio\teste\*.r \\servidor\diretorio\outrapasta").
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página