Disk or network error

[jvdpeet]

Ik krijg fout "Disk or network error" in de volgende Sub. Deze Sub wordt aangeroepen in Form_Load en de fout meldt zich bij terugkeer in Form_Load. Ik heb geen idee wat de oorzaak van deze fout kan zijn en op internet wordt ik ook niet veel wijzer omtrent deze fout. Variabele df bevat waarde 1.
Heeft iemand een idee wat deze fout kan veroorzaken? 
Het codefragment is:

Code: [Selecteer]

Public Sub WriteLOG(LogText)
' Create or add to existing logfile, filename is current date
Dim df%
df = FreeFile
Open LOGDIR & Format(Date, "yyyymmdd") & "LOG.TXT" For Append As #df
Print #df, Now & Chr(32) & LogText
'WriteLOG ("---< " & App.Title & " started >---" & ernum & " " & Foutbron)      ' Write main start to logfile
Close #df
End Sub

 
m.vr.gr.,

Jan