tst

Code:
Imports System
Imports System.IO
Imports System.Environment

Public Class Log
    'Logger til fil. Default blir logging lagt til i "toppen" av filen
    Private sFileName As String
    Private sFileContent As String
    Private lMaxNumLines As Long
    Private sLogData As String
    Private bUseTimestamp As Boolean = True
    Private bAddToTopOfLogFile As Boolean = True
    Public Sub New()
        sFileName = GetFolderPath(SpecialFolder.ApplicationData) & "\" & My.Application.Info.AssemblyName & ".log"
    End Sub
[VBCODE]
Imports System
Imports System.IO
Imports System.Environment

Public Class Log
'Logger til fil. Default blir logging lagt til i "toppen" av filen
Private sFileName As String
Private sFileContent As String
Private lMaxNumLines As Long
Private sLogData As String
Private bUseTimestamp As Boolean = True
Private bAddToTopOfLogFile As Boolean = True
Public Sub New()
sFileName = GetFolderPath(SpecialFolder.ApplicationData) & "\" & My.Application.Info.AssemblyName & ".log"
End Sub[/VBCODE]