Gå til innhold

Sjekke om en fil er åpen i Error handler


Anbefalte innlegg

Videoannonse
Annonse

Du trenger ikke det, VB lukker den åpne filen automatisk når en feil inntreffer.

 

Ellers, for å restarte programmet, kan du jo ganske enkelt kjøre Shell-kommandoen:

 

Shell ValidPath(App.Path) & App.EXEName & ".exe"
' Avslutt dernest programmet ditt, enten ved End eller ved å kjøre Unload på alle former

 

Legg dessuten til følgende i samme modul:

 

Public Function ValidPath(sPath As String)

   ' Legg til skråstrek såfremt det er nødvendig
   ValidPath = sPath & IIf(Right(sPath, 1) = "\", "", "\")

End Function

Lenke til kommentar
angående error handleren, lukker VB filen når feilen intreffes, eller når programme mitt avsluttes?

i Windows NT/XP/2000 tar i hvert fall seg av dette automatisk - det er derfor somme ressurser deallokeres når programmer avsluttes via Task Manager. Jeg er dessuten også av den oppfatning at VB utfører det samme når applikasjonen avsluttes riktig, dvs. uten "End"-kommandoen eller TerminateProcess som det egentlig er.

 

Om Windows ordner dette automatisk i eldre versjoner lik 95, 98 og ME, betviler jeg. Der har i hvert fall jeg mang en gang opplevd at Windows sier fullstendig takk for seg når for mange programmer den feilaktige måten.

Lenke til kommentar

Opprett en konto eller logg inn for å kommentere

Du må være et medlem for å kunne skrive en kommentar

Opprett konto

Det er enkelt å melde seg inn for å starte en ny konto!

Start en konto

Logg inn

Har du allerede en konto? Logg inn her.

Logg inn nå
  • Hvem er aktive   0 medlemmer

    • Ingen innloggede medlemmer aktive
×
×
  • Opprett ny...