diff --git a/Modules.Windream/Helpers.vb b/Modules.Windream/Helpers.vb
index 4bd7c85d..82770bb1 100644
--- a/Modules.Windream/Helpers.vb
+++ b/Modules.Windream/Helpers.vb
@@ -15,50 +15,50 @@ Public Class Helpers
INDEX_TYPE_VECTOR_TIME
}
- Friend Shared Function ConvertVectorType(vType As Object, value As String)
+ Friend Shared Function ConvertVectorType(pIndexType As Integer, pValue As String)
Dim myArray
ReDim myArray(0)
- Select Case vType
+ Select Case pIndexType
Case INDEX_TYPE_HASH ' 36865
'Umwandeln in String
- myArray(0) = CStr(value)
+ myArray(0) = CStr(pValue)
Return myArray
Case INDEX_TYPE_VECTOR_STRING '4097
'Umwandeln in String
- myArray(0) = CStr(value)
+ myArray(0) = CStr(pValue)
Return myArray
Case INDEX_TYPE_VECTOR_INTEGER '4098
'Umwandeln in Integer
- myArray(0) = CInt(value.Replace(" ", ""))
+ myArray(0) = CInt(pValue.Replace(" ", ""))
Return myArray
Case INDEX_TYPE_VECTOR_FLOAT '4099
- value = value.
+ pValue = pValue.
Replace(" ", "").
Replace(".", ",")
'Umwandeln in Double
- myArray(0) = CDbl(value)
+ myArray(0) = CDbl(pValue)
Return myArray
Case INDEX_TYPE_VECTOR_BOOLEAN '4100
'Umwandeln in Boolean
- myArray(0) = CBool(value)
+ myArray(0) = CBool(pValue)
Return myArray
Case INDEX_TYPE_VECTOR_DATE '4101
'Umwandeln in Date
- myArray(0) = CDate(value)
+ myArray(0) = CDate(pValue)
Return myArray
Case INDEX_TYPE_VECTOR_INTEGER_64BIT '4107
- myArray(0) = Convert.ToInt64(value)
+ myArray(0) = Convert.ToInt64(pValue)
Return myArray
Case INDEX_TYPE_VECTOR_DATE_TIME '4103
'Umwandeln in Datum Uhrzeit
- Return value
+ Return pValue
Case 8204
'Umwandeln in Integer
- myArray(0) = CInt(value.Replace(" ", ""))
+ myArray(0) = CInt(pValue.Replace(" ", ""))
Return myArray
Case Else
'Umwandeln in String
- myArray(0) = CStr(value)
+ myArray(0) = CStr(pValue)
Return myArray
End Select
End Function
diff --git a/Modules.Windream/Windream.vb b/Modules.Windream/Windream.vb
index 574f54e7..ef123f5e 100644
--- a/Modules.Windream/Windream.vb
+++ b/Modules.Windream/Windream.vb
@@ -1,4 +1,8 @@
-Imports WINDREAMLib
+Imports System.IO
+Imports System.IO.Path
+Imports System.Text.RegularExpressions
+
+Imports WINDREAMLib
Imports WINDREAMLib.WMCOMEvent
Imports WINDREAMLib.WMEntity
Imports WINDREAMLib.WMObjectEditMode
@@ -6,10 +10,9 @@ Imports WMOBRWSLib
Imports WMOSRCHLib
Imports WMCNNCTDLLLib
Imports WMOTOOLLib
-Imports System.IO
-Imports System.IO.Path
+
Imports DigitalData.Modules.Logging
-Imports System.Text.RegularExpressions
+Imports DigitalData.Modules.Language
''' Windream
''' 0.0.0.2
@@ -165,6 +168,12 @@ Public Class Windream
Me.SessionServername = SessionServerName
Me.ClientBasePath = GetNormalizedBasePath(BasePath)
+ _logger.Debug("ClientBasePath: [{0}]", ClientBasePath)
+ _logger.Debug("ClientDriveLetter: [{0}]", ClientDriveLetter)
+ _logger.Debug("SessionServername: [{0}]", SessionServerName)
+ _logger.Debug("SessionUserName: [{0}]", SessionUserName)
+ _logger.Debug("SessionDomain: [{0}]", SessionDomain)
+
If ClientDriveLetter = String.Empty Then
UsesDriveLetter = False
End If
@@ -766,7 +775,10 @@ Public Class Windream
End Function
Public Function GetNormalizedPath(Path As String) As String
- Dim oNormalizedPath = GetCleanedPath(Path)
+ 'Dim oNormalizedPath = GetCleanedPath(Path)
+ Dim oNormalizedPath = Language.Utils.RemoveInvalidCharacters(Path)
+ _logger.Debug("Normalizing Path: [{0}]", oNormalizedPath)
+
Try
' Convert any forward slashes / and double slashes \\ into backslashes \
' See: https://stackoverflow.com/questions/3144492/how-do-i-get-nets-path-combine-to-convert-forward-slashes-to-backslashes