Hallo

Welkom, Gast. Alsjeblieft inloggen of registreren.

Recent

222 gasten, 0 leden

Welkom, Gast. Alsjeblieft inloggen of registreren.

28 maart 2024, 19:33:49

Login met gebruikersnaam, wachtwoord en sessielengte

Nieuws

Welkom op het vernieuwde NL Computer Forum!

Auteur Topic: Deze naam is geen geldige bestandsnaam  (gelezen 21897 keer)

0 leden en 1 gast bekijken dit topic.

Offline jackson0 †
  • Forumfan
  • ***
  • Berichten: 246
  • Geslacht: Man
Deze naam is geen geldige bestandsnaam
« Gepost op: 6 oktober 2014, 20:45:00 »
In onderstaande Sub krijg ik de fout: "Deze naam is geen geldige bestandsnaam''. Deze verschijnt na Close #df.
Ik zie er niets verkeerd aan.  
 Public Sub WriteLOG(LogText)
' Create or add to existing logfile, filename is current date
On Error GoTo FoutWriteLOG
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

Exit Sub

FoutWriteLOG:
    Foutbron = "WriteLOG"
    ernum = Err.Number
    If ernum & " " & Err.Description & " " & Foutbron <> VorigeFout Then
        Call WriteLOG("---< " & App.Title & " geeft >---" & ernum & " " & Err.Description & " " & Foutbron)
        VorigeFout = ernum & " " & Err.Description & " " & Foutbron
        Resume Next
    End If

End Sub

Offline Peter

  • Sysop
  • *****
  • Berichten: 5.683
  • Geslacht: Man
Re: Deze naam is geen geldige bestandsnaam
« Reactie #1 Gepost op: 6 oktober 2014, 21:23:07 »
Hoi,

Een nogal vreemde en ongewenste constructie. Vertel maar eens in je eigen woorden wat er gebeurt als er een fout optreedt in deze subroutine.

Offline jvdpeet †
  • Senior lid
  • ****
  • Berichten: 365
  • Geslacht: Man
Re: Deze naam is geen geldige bestandsnaam
« Reactie #2 Gepost op: 7 oktober 2014, 17:56:37 »
Hoi Peter,
Deze logging werkt normaliter zonder problemen. Alleen bij het opstarten van het programma waarin deze logging is opgenomen krijg ik deze melding. Als ik met F8 de regel bepaal waar de fout zich meldt, gebeurt dat op Close #df.

Offline Peter

  • Sysop
  • *****
  • Berichten: 5.683
  • Geslacht: Man
Re: Deze naam is geen geldige bestandsnaam
« Reactie #3 Gepost op: 7 oktober 2014, 18:49:54 »
Hoi,

Je geeft geen antwoord op mijn vraag om je code te omschrijven.

Voeg de volgende regel toe direct achter "df = FreeFile":
MsgBox "df=" & df & vbCrLf & _
       "LOGDIR=" & LOGDIR & vbCrLf & _
       "LogText=" & LogText & vbCrLf & _
       "VorigeFout=" & VorigeFout & "."
Start het programma en wacht tot de MsgBox verschijnt.

Maak een screenshot van de melding, hoe je dat doet lees je HIER.
Upload dit bestand naar http://www.imgdumper.nl.
Je krijgt dan een aantal unieke links. Post de eerste link in je volgend bericht.

Offline jvdpeet †
  • Senior lid
  • ****
  • Berichten: 365
  • Geslacht: Man
Re: Deze naam is geen geldige bestandsnaam
« Reactie #4 Gepost op: 8 oktober 2014, 18:54:23 »
Hoi Peter,
Deze MsgBox geeft Syntax error. Volgens mij mankeert er niets aan de syntaxis.

Offline Peter

  • Sysop
  • *****
  • Berichten: 5.683
  • Geslacht: Man
Re: Deze naam is geen geldige bestandsnaam
« Reactie #5 Gepost op: 8 oktober 2014, 19:08:46 »
Vreemd, post daarvan een screenshot.

Offline jackson0 †
  • Forumfan
  • ***
  • Berichten: 246
  • Geslacht: Man
Re: Deze naam is geen geldige bestandsnaam
« Reactie #6 Gepost op: 9 oktober 2014, 11:05:11 »
Sorry Peter, er was een & weggevallen. Aangehecht het resultaat van de screenshot.

Offline Peter

  • Sysop
  • *****
  • Berichten: 5.683
  • Geslacht: Man
Re: Deze naam is geen geldige bestandsnaam
« Reactie #7 Gepost op: 9 oktober 2014, 11:18:14 »
Kan gebeuren. Ik zie geen bijlage/screenshot.