[Resolvido] Deletar arquivos em ASP

[Eduardo Dallmann 0]

Queria saber como deletar um arquivo com parte do nome dele.

 

Exemplo: foto_2_*

 

 

Set FSO = Server.CreateObject("Scripting.FileSystemObject")

FSO.DeleteFile "fotos_temp/foto_" & Request.QueryString("cod") & "_*"

 

Obrigado!

[Ted k' 126]

parte do nome??? não entendi... você não tem o nome do arquivo completo? exemplo: arquivo_nome.txt, você só tem arquivo_nome, é isso?

[augustoclaro 2]

ele quer deletar todos os arquivos com X começo.

 

Faça um loop em todos os arquivos com o fso e verifique se as x primeiras letras forem iguais a X, deleta.

 

Espero ter ajudado.

[Eduardo Dallmann 0]

augustoclaro, com um código de exemplo vai ser mais claro, hehe.

 

 

 

Ted k', eu tenho os arquivos numa pasta, ele começam com foto_2_ depois desse underline os numeros são aleatorios e o sistema tem q deletar todos q começem com esse nome, não tenho o arquivo com o nome completo.

 

espero ter sido claro agora, obrigado.

 

Eu fiz com um Loop, mas ele demora para ir de 0 à 99999.

 

Não tem como usar um caracter coringa, tipo um * ?

 

Por favor admin não feche esse post, pois o código ainda não está perfeito. Obrigado.

 

Set FSO = Server.CreateObject("Scripting.FileSystemObject")

i=0
total=99999
do until i = total

If FSO.FileExists(Server.MapPath("fotos_temp/foto_" & Request.QueryString("cod") & "_" & i & ".jpg")) Then

FSO.DeleteFile Server.MapPath("fotos_temp/foto_" & Request.QueryString("cod") & "_" & i & ".jpg")
FSO.DeleteFile Server.MapPath("fotos_temp/thumbs/foto_" & Request.QueryString("cod") & "_" & i & ".jpg")
end if

i = i + 1
loop

[xanburzum 169]

você pode usar um código, tipo Explorer, existem vários exemplos no fórum, fica mais gerenciado...

[Eduardo Dallmann 0]

eu já tinha procurado no fórum, mas não achei nada conclusivo.

 

poderia postar o código, ou talvez o link de um post?

 

Obrigado!

[xanburzum 169]

link

[Eduardo Dallmann 0]

mesmo assim, ainda não vi como deletar arquivos sem saber o nome completo do arquivo!

[augustoclaro 2]

usa o fso, faça um loop em todos os arquivos de uma pasta, e verifica se, por exemplo, as 47 primeiras letras são igual a foto_2_, se for, deleta.

 

Meu tutorial de FSO: http://forum.imasters.com.br/index.php?/topic/331459-tutorial-usando-o-objeto-fso-file-system-object/

[Eduardo Dallmann 0]

Consegui, oohhhh

 

FSO.DeleteFile Request.ServerVariables("APPL_PHYSICAL_PATH") & "fotos_temp/foto_" & Request.QueryString("cod") & "_*.jpg"

Mas ainda tem um problema, um if com caracter coringa não funciona ainda! Ele sempre diz que não existe....

 

If FSO.FileExists(Request.ServerVariables("APPL_PHYSICAL_PATH") & "fotos_temp/foto_" & Request.QueryString("cod") & "_*.jpg") Then

[augustoclaro 2]

não vai usar caracter oringa, faça um >>>LOOP<<< em todos os arquivos, se os primeirs caracteres corresponderem aos que você quer deletar, aí deleta, senão não acontece nada. você vai ter que usar um for aí.

[Eduardo Dallmann 0]

Mas eu fiz com >>>loop<<< lá no começo do post, eu com eu disse, fica muito lento fazer um >>>loop<<< de 0 à 99999...

 

ps: o delete funcionou com Coringa sim

[augustoclaro 2]

ah entendi. funcionou? então tópico resolvido?

[Eduardo Dallmann 0]

acabei resolvendo na gambiara

 

primeiro eu crio um arquivo lá

 

fso.CreateTextFile Request.ServerVariables("APPL_PHYSICAL_PATH") & "fotos_temp/foto_" & Request.QueryString("cod") & "_0.jpg"

assim ele não da erro quando deletar, pq um arquivo pelo menos existe, hehe

 

FSO.DeleteFile Request.ServerVariables("APPL_PHYSICAL_PATH") & "fotos_temp/foto_" & Request.QueryString("cod") & "_*.jpg"

Viva a POG!

[augustoclaro 2]

Viva a POG! \0/

[xanburzum 169]

OK, resolvido.... (santo POG)