[VB] Hoe zien of file al open is

[ArjanC]

Hoi,

ik ben net begonnen met VB en ik wil een scriptje maken die de OST van outlook backuped.

nu wil ik dat hij een melding geeft als de file nog open is..

iemand een idee ? kon in de search niks vinden..

[Gerco]

Gewoon proberen te openen en de fout afvangen die je krijgt als 'ie nog open is.

[Pooh]

code:

On Error GoTo FileError

FileError:
    Select Case Err.Number
        Case 53
            MsgBox "File not found!"
        Case 55
            MsgBox "File already open!"

zoiets?

[ArjanC]

Dammed..

[Crazy D]

Da's de windows scripting host, VBscript dus, geen VB...

VBscript kent denk ik geen On Error Goto handler. Dit werkt wel...

code:

Err.Clear
On Error Resume Next
' doe iets...
If Err.Number <> 0 Then
    ' was dus een error
Else
    ' gelukt
End If

_{Enne error afvangen is wel basiskennis hoor...}

[D2k]

zie Crazy_D