Comments by riswanzaman (Top 2 by date)

For i As Integer = mcount To mDirectoryInfo.GetFiles().Length - 1
Dim f As FileInfo = mDirectoryInfo.GetFiles()(i)
If f.Extension = ".tmp" Or f.Extension = ".rpt" Then
File.Open(f.FullName, FileMode.Open)
Dim swWriter As New StreamWriter(f.FullName)
swWriter.WriteLine("babababa")
If f.CreationTime.AddMinutes(5) < DateTime.Now Then
' System.GC.Collect();
'System.GC.WaitForPendingFinalizers();
'File.Delete(picturePath);
System.GC.Collect()
System.GC.WaitForPendingFinalizers()
File.Delete(f.FullName)
Console.WriteLine("Deleted")
End If
End If
Next