APAGAR ARQUIVOS TEMPORARIOS POR DATA DE CORTE?

VILMARBR 23/02/2012 15:25:21
#395404
APAGAR ARQUIVOS TEMPORARIOS POR DATA DE CORTE?
Como fazer isto ?
Preciso apagar todos arquivos, menos os gerados na última meia hora...
Grato.
VILMARBR 23/02/2012 16:14:03
#395410
achei algo..

http://social.msdn.microsoft.com/forums/en-US/netfxbcl/thread/c5a2bc06-c448-4331-b4ed-a768f4c26016


private static string logPath = [Ô]/DailyLogs/[Ô];

private static string logFile = [Ô]GTSLog_[Ô] + DateTime.Now.ToString([Ô]dd_MM_yyyy[Ô]) + [Ô].txt[Ô];



private static void CleanLogFiles()

{

if (DoesLogDirectoryExists())

{

string[] fileNames;

fileNames = Directory.GetFiles(logPath);

foreach (string s in fileNames)

{

DateTime creationDate = File.GetCreationTime(logPath + s);

if (creationDate < DateTime.Now.AddDays(-28))

{

try

{

File.Delete(s);

}

catch (Exception ex)

{

//Do nothing with exception

}

}

}

}

}



TESTANDO......
VILMARBR 23/02/2012 16:45:03
#395415
Outro esquema melhor....

Private Sub LimparArquivos()

Dim Root As New DirectoryInfo(Page.Request.PhysicalApplicationPath & ConfigurationManager.AppSettings([Ô]CaminhoFisicoArquivosTemporarios[Ô]))



Dim Files As FileInfo() = Root.GetFiles([Ô]*.*[Ô])

Dim Filename As FileInfo



For Each Filename In Files

Try

If Filename.CreationTime.AddMinutes(ConfigurationManager.AppSettings([Ô]TempoExcArquivo[Ô])) < Date.Now Then

Filename.Delete()

End If

Catch erro As Exception

[ô][ô]Ignora erros pois o arquivo pode estar sendo utilizado e a rotina não pode onerar a execução;

Finally

Files = Nothing

Filename = Nothing

End Try

Next

End Sub

--

Web.config
jogar estas chaves:

<add key=[Ô]CaminhoFisicoArquivosTemporarios[Ô] value=[Ô]ArquivosTemporariosSuaAplicacao\[Ô]/>
<add key=[Ô]TempoExecucaoArquivo[Ô] value=[Ô]10[Ô]/><!-- Tempo, em minutos, para a limpeza dos arquivos temporários necessários -->
Tópico encerrado , respostas não são mais permitidas
Voltar