Вопрос : Проверите если архив в пользе и резюме

Hi guys

Got программа сидит и проверяет для существования архива, если счесно ему, то уничтожает работы it.

That большие но ive имело первую жалобу что ошибка была брошена когда prog побежало на своем отметчике времени, и app который создает архив все еще использовал его, дающ архив в пользе error.

I пытайтесь разработать попытку/задвижку для того чтобы получить, что мое prog проверить если архив находится в пользе, то, скип если он или delete, то если он не. но я наклоняю работу оно вне.

Any suggestions class= " ясное " >
> " codeSnippet " class=
class= " lineNumbers "
class= 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
class= tmrA_Tick " id= " codeSnippet852772 
Private Sub (прислужник ByVal как предмет, ByVal e как System.EventArgs) регулирует tmrA.Tick
            Тусклое FileToDelete как шнур
            Тусклое filetodelete1 как шнур


            FileToDelete = «C:\Documents and Settings\» + Environment.UserName +» \ местные установки \ Temp \ routerequest1.html "
            filetodelete1 = «C:\Users\» + Environment.UserName +» \ appdata \ local \ temp \ routerequest1.html "
            Попытка

                Тусклый FS как IO.FileStream = IO.File.Open (filetodelete1, IO.FileMode.Open, IO.FileAccess.Read, IO.FileShare.None)

                FS.Close ()
                FS.Dispose ()
              
            Если System.IO.File.Exists (FileToDelete) = True после этого

                System.IO.File.Delete (FileToDelete)


            Закончитесь если
            Если System.IO.File.Exists (filetodelete1) = True после этого

                System.IO.File.Delete (filetodelete1)

             

            Закончитесь если

            Уловите ex как IO.IOException



            
            Закончите попытку
class=

Ответ : Проверите если архив в пользе и резюме

Приватное Sub tmrA_Tick (прислужник ByVal как предмет, ByVal e как System.EventArgs) регулирует tmrA.Tick
      Тусклое FileToDelete как шнур
      Тусклое filetodelete1 как шнур
      Затемните уничтожено как булевско = ложно
      Затемните fi1 как новое System.IO.FileInfo (FileToDelete)
      Затемните fi2 как новое System.IO.FileInfo (filetodelete1)

      FileToDelete = «C:\Documents and Settings\» + Environment.UserName +» \ местные установки \ Temp \ routerequest1.html "
      filetodelete1 = «C:\Users\» + Environment.UserName +» \ appdata \ local \ temp \ routerequest1.html "

      Пока уничтожено
            Попытка
                  Если fi1.Exists после этого
                        fi1.Delete ()
                  Закончитесь если

                  Если fi2.Exists после этого
                        fi2.Delete ()
                  Закончитесь если

                  уничтожено = True
            Уловите ex как IO.IOException
                  уничтожено = ложно
            Попытка конца
      Закончитесь пока
Закончите подводную лодку
Другие решения  
  •  Как я добавляю кнопки на форме PDF для того чтобы добавить/извлекаю рядки данных?
    •
  •  Шнур ошибки в блоке задвижки?
    •
  •  сколько вариант сервера SQL на одной машине
    •
  •  Внешний вид 2007 не может архивный файл открытой сети сохраненный
    •
  •  Активно директория DNS записывает вопрос
    •
  •  Отчет о доступа 2010 экспорта к CSV с коллекторами?
    •
  •  Прокладчик OCE 9400 не начинает
    •
  •  как добавить десятичное место в формуле в отчете о кристалла seagate
    •
  •  Windows XP и Мичрософт Оутлоок и проблемы установителя Windows
    •
  •  VB6 к VS2010 - консультации тренировки?
    •
     
    programming4us programming4us