This commit is contained in:
OlgunR
2025-04-28 12:07:09 +02:00
parent c402467b38
commit 5af75cc553
2 changed files with 4 additions and 3 deletions

View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.9.6.0")> <Assembly: AssemblyVersion("1.9.6.1")>
<Assembly: AssemblyFileVersion("1.9.6.0")> <Assembly: AssemblyFileVersion("1.9.6.1")>

View File

@@ -1300,11 +1300,12 @@ Public Class Windream
Dim oType As Integer = GetIndexType(IndexName) Dim oType As Integer = GetIndexType(IndexName)
Dim oConvertedValues As New List(Of String) Dim oConvertedValues As New List(Of String)
Dim oArray As Object Dim oArray As Object
_logger.Debug("SetFileIndexLoS '{0}' - Indextype: {1} - ... ", IndexName, oType) _logger.Debug("SetFileIndexLoS '{0}' - Indextype: {1} - Values.Count: {2} ... ", IndexName, oType, Values.Count)
ReDim oArray(Values.Count - 1) ReDim oArray(Values.Count - 1)
For oIndex = 0 To Values.Count - 1 For oIndex = 0 To Values.Count - 1
Dim oValue As Object = Helpers.ConvertAttrValue(oType, Values.Item(oIndex)) Dim oValue As Object = Helpers.ConvertAttrValue(oType, Values.Item(oIndex))
_logger.Debug("Converted Value: {0}", oValue.ToString)
oArray(oIndex) = oValue oArray(oIndex) = oValue
Next Next