fix Filesystem.Test

This commit is contained in:
Jonathan Jenne 2020-04-06 15:17:38 +02:00
parent 77b6658988
commit 729f4c73ee

View File

@ -1,5 +1,6 @@
Imports System.Text Imports System.Text
Imports Microsoft.VisualStudio.TestTools.UnitTesting Imports Microsoft.VisualStudio.TestTools.UnitTesting
Imports DigitalData.Modules.Logging
<TestClass()> Public Class FileTest <TestClass()> Public Class FileTest
@ -8,7 +9,7 @@ Imports Microsoft.VisualStudio.TestTools.UnitTesting
End Sub End Sub
<TestMethod()> Public Sub TestMethod1() <TestMethod()> Public Sub TestMethod1()
Dim oLogConfig = New DigitalData.Modules.Logging.LogConfig(DigitalData.Modules.Logging.LogConfig.PathType.CurrentDirectory) Dim oLogConfig = New DigitalData.Modules.Logging.LogConfig(LogConfig.PathType.Temp)
Dim oFilesystem As New DigitalData.Modules.Filesystem.File(oLogConfig) Dim oFilesystem As New DigitalData.Modules.Filesystem.File(oLogConfig)
Dim oPath = "E:\Test~2345676778697678678967867.txt" Dim oPath = "E:\Test~2345676778697678678967867.txt"