[Resolvido]Excluir ou Mover arquivo externo pelo nome e data

Pessoal no meu sistema quando o usuário termina um pedido é gerado um relatório e esse fica salvo em PDF em uma pasta específica, caso o usuário precise dele no futuro.

Ele salva o arquivo com os primeiros 20 caracteres do nome do cliente e a data do pedido, pra facilitar a identificação.

Até aqui tudo bem.

A questão é:

No sistema eu tenho um form de exclusão de pedidos. Nesse form existe um botão que exclui o pedido que o usuário quiser.

O que eu quero é que ao clicar em Excluir no form o sistema também exclua o arquivo PDF do pedido selecionado que está salvo na pasta.

É possível fazer isso?

Olá Ciro,

Sim, pode fazer e para isso use o "Kill" no botão excluir

Exemplo:

Código:

Kill "C:\PastaTeste\ArquivoTeste.pdf"

Abraço

ahteixeira o Kill faz isso mas tem um problema:

Como fazer o Kill apagar o arquivo que o usuário escolher?

No exemplo que você deu eu tenho que dizer ao Kill o nome do arquivo.

Eu preciso que o próprio Kill pegue o nome do arquivo no Form (usando os dados de Nome do Cliente e data de pedido, que estão no form) para excluir o mesmo na pasta.

Exemplo:
Tenho um pedido com o pdf salvo com o nome:

Coisa 02/11/2015.pdf

Eu preciso que ao clicar no botão Excluir no form o Kill pegue o nome e data do pedido (Coisa 02/11/2015) no form para excluir somente o arquivo Coisa 02/11/2015.pdf que está na pasta.

Isso é possível com o Kill ou algum outro método que eu desconheço?

Olá, antes de eliminar o registo você tem a informação, ou seja:
-nome do cliente (COISA)
-data do registo (02/11/2015)
-Também deve saber qual a pasta em que está o arquivo (C:\Teste)

Então, antes de eliminar será qualquer coisa assim:

Código:


kill "C:\Teste\" & Left(CampoComNomeCliente,20) &" " & CampoDataRegisto &".pdf


O "left" é para ir buscar apenas os primeiros 20 caractres.
Se tiver dificuldade, poste base de dados com o form em questão.
Abraço

ahteixeira deu certo. Tive que mudar levemente o código por causa da formatação do campo Data:

Kill "C:\BD\Faturas\" & Left(CodigoPedido, 6) & " " & Left(Me!NomeCliente, 20) & " " & Format(Me.DataPedido, "dd-mm-yyyy") & ".pdf"

Muito obrigado.

Eu não quero abrir outro tópico pra isso então vou perguntar por aqui mesmo (depois eu edito o titulo do tópico com essa dúvida adicional, se alguém tiver a mesma dúvida vai encontrar o tópico):

Como seria o código se eu quisesse mover ou copiar um arquivo de uma pasta para outra ao clicar num botão do form usando os dados do form para mover ou copiar o arquivo (da mesma forma como foi feito com o Kill)?

Por exemplo:
Na pasta Faturas eu tenho faturas salvas. No form eu tenho uma lista dessas faturas salvas em PDF NomedaFatura.pdf e quero mover (ou copiar) uma fatura específica da pasta Faturas para a pasta Arquivados ao clicar no botão.

Como fazer isso?

Olá Ciro, obrigado pelo retorno.
Relativamente à questão, acho que pode ficar neste tópico, pois copiar ou mover está relacionado.

Exemplo:

Código:

'ahteixeira 2015 - maximoaccess
'mover ficheiro - MOVE
'se caminho é o mesmo também renomeia - RENAME
Dim strOrigem, strDestino As String

strOrigem = "C:\PastaTeste\Faturas\NomedaFatura.pdf"
strDestino = "C:\PastaTeste\Arquivados\NomedaFatura.pdf"

Name strOrigem As strDestino

Teste colocando o código num botão e ajustando o caminho e nome dos ficheiros com a extensão.

Abraço

ahteixeira os arquivos são movidos perfeitamente. Ao clicar no botão do form ele move a fatura para a pasta Arquivados:

Dim strOrigem, strDestino As String

strOrigem = "C:\BD\Faturas\" & Left(Me!NomeCliente, 20) & ".pdf"
strDestino = "C:\BD\Faturas\Arquivados\" & Left(Me!NomeCliente, 20) & ".pdf"

Name strOrigem As strDestino

Valeu mesmo. Tópico Resolvido!

Olá, obrigado pelo retorno.
Os utilizadores do fórum agradecem.

Nota, para dar o tópico como resolvido, veja como fazer:
https://www.maximoaccess.com/t860-resolucao-de-topicos
Desta vez eu coloco.
Abraço