Ola, gostaria saber se alguem pode me ajudar.

 

Tenho uma pasta e dentro tem varios arquivos, esses arquivos são de bkp, e como são feito varios bkps a pasta vai acumulando varios arquivos

 

eu gostaria de saber como posso apagar os arquivos mais antigos, tipo eu queria deixar na pasta somente os 10 arquivos mais recentes

 

e apagar o restante

 

desde ja agradeço

ja tentou..

cmdcommand_crick

rs = "nome da pasta"

delete =  dados and data_cadastro ' nome da tabela seguida nome da tabela

rs.close

 

como você está nomeando estas pasta, está usando um numero sequecial, é pela data e hora, como está fazendo

 

Abra seu banco:

Set dB = OpenDataBase("BANCO")

Crie uma String com a Select, e outa string que voce joga a Data.

 

Dim sSQL As String

Dim dDTA As String

 

 

 

sSQL = "DELETE FROM TABELA WHERE CAMPODATA<=#" & dDTA & "#"

 

Se quiser pode colocar mais condições para apagar.

 sSQL = sSQL & " AND CAMPO='" & "SUACONDICAO" & "'"

 

Depois basta executar

dB.Execute sSQL

 

 

vlu//

 

Pessoal só pra esclarecer a duvida do colega

 

 

Não Banco de dados.

 

Então, a pasta é uma só.. sempre com o mesmo nome... os arquivos são nomeados por data invertida.. por exemplo:  090210.zip

Não tem a hora no nome do arquivo, é feito um backup por dia, mais tem dias que o backup tbm não é feito, então eu não posso verificar quais os arquivos q estão la a mais de 10 dias e apaga-los, pode ser que fique sem fazer backup a mais de 10 dias, ai o sistema apagaria todos os backups

 

realmente Treze, oq eu preciso é apagar arquivos que estão dentro de uma pasta

 

Agradeço a atenção e fico no aguardo de uma ajuda