Privé SubtmrA_Tick (ByVal afzender als Voorwerp, ByVal e als System.EventArgs) behandelt tmrA.Tick
Schemerige FileToDelete als Koord
Schemerige filetodelete1 als Koord
Verduister geschrapt Van Boole = Vals
Verduister fi1 als Nieuwe System.IO.FileInfo (FileToDelete)
Verduister fi2 als Nieuwe System.IO.FileInfo (filetodelete1)
FileToDelete = „C:\Documents and Settings\“ + Environment.UserName +“ \ de Lokale Temperaturen \ routerequest1.html van Montages \ "
filetodelete1 = „C:\Users\“ + Environment.UserName +“ \ appdata\ lokale \ temperaturen \ routerequest1.html "
Terwijl geschrapt niet
Probeer
Als fi1.Exists toen
fi1.Delete ()
Eind als
Als fi2.Exists toen
fi2.Delete ()
Eind als
geschrapt = Waar
Vangst ex als IO.IOException
geschrapt = Vals
Het eind probeert
Beëindig terwijl
Beëindig Sub