#ProgramaçãoGlobal #VBA #DOS #Office365 #Command
💻 Quer manter seu sistema limpo de arquivos antigos? Este código VBA no MS Access usa o comando MS-DOS para deletar arquivos indesejados. Imagine que você precisa apagar um relatório antigo diariamente. Este script resolve isso! 📂
Public Sub DeleteOldReport()
Dim FilePath As String
FilePath = "C:\Relatorios\report_old.txt"
If Dir(FilePath) <> "" Then
Shell "cmd /c del """ & FilePath & """"
MsgBox "Arquivo deletado com sucesso! 🗑️"
Else
MsgBox "Arquivo não encontrado... 🤷"
End If
End Sub
📣 Use este código para automatizar a limpeza de arquivos antigos!
Clique aqui para ver outros artigos MS Access
Clique nas capas abaixo e compre também:
Clique aqui e nos contate via What's App para avaliarmos seus projetos
Comente e compartilhe este artigo!
Nenhum comentário:
Postar um comentário