Netwerk niet beschikbaar -> log schrijven

[SteveFH]

Aloha ^^

Ik heb een stukje code geschreven (onderdeel van een project van mij) die ervoor moet zorgen dat, wanneer er geen netwerk beschikbaar is, er een log geschreven moet worden. De code is als volgt:

        If My.Computer.Network.IsAvailable = False Then

            ' Count the number of network logs

            My.Settings.NetworkLog = My.Settings.NetworkLog + 1

            MsgBox("Netwerk niet beschikbaar.")

            ' This will write a log when there is no network available
            ' The log will be stored in the 'NetworkLogs' directory

            Dim WriteLog As System.IO.StreamWriter
            Dim FileName As String = "NetworkLogs\" + My.Settings.NetworkLog + ".txt"

            WriteLog = New System.IO.StreamWriter(FileName)
            WriteLog.Write("Er was vanaf '" + TimeOfDay + "' op '" + Today + "' geen netwerk verbinding beschikbaar.")
            WriteLog.Close()

                If fmLogs.lbLogs.Items.Item("Netwerk log: #" + My.Settings.NetworkLog) = True Then

                    ' Do nothing

                Else

                    fmLogs.lbLogs.Items.Add("Netwerk log: #" + My.Settings.NetworkLog)

                End If

        Else

            MsgBox("Netwerk beschikbaar.")

        End If

De 'My.Settings.NetworkLog' is als type 'String' en het stukje 'My.Settings.NetworkLog = My.Settings.NetworkLog + 1' wordt later gebruikt als naam van de log (dus log1, 2, 3, etc.).

Als ik het programma debug krijg ik de fout 'De conversie van tekenreeks NetworkLogs\ naar type Double is ongeldig.' bij de code 'Dim FileName As String = "NetworkLogs\" + My.Settings.NetworkLog + ".txt"'.

Wie kan mij vertellen wat er mis is met dit stukje code (hou er dan wel rekening mee dat ik nog maar een beginner ben ) en wat er verbeterd moet worden?

- Steve

 

[bastiaansmit94]

volgens mij moet je bij "NetworkLogs\" de complete locatie invoeren dus bijvoorbeeld "C:\windows\NetworkLogs\" of als je netwerk hebt bijv. "\\DOMEIN OF PC\NetworkLogs\"

weet niet of ik het goed heb ben er zelf ook niet super goed in maar probeer het eens!