div. Änderungen

RKSV_DE/cRKSV_DE.vb

@@ -1,4 +1,6 @@
-Imports ItgKsV
+Imports ITGRKSVCom
+Imports RKSVComComplete
+
 Public Class cRKSV_DE
 
     Private Function SurroundingSub()
@@ -7,7 +9,9 @@ Public Class cRKSV_DE
         ' COM-Objekt anlegen
 
         Dim licenseKey As String = "MEUCIQDg2GSwFrgOMHLzKBO7Sac+D3xBh9Ct+QRBXarDFPtdNgIgQyvotBil11sRfqQgdY+spD3aUve/HZS9cF7MS0D720w="
+
         Dim m_ksv As ItgKsV.KsVCom = New ItgKsV.KsVCom()
+
         Dim result As Integer = m_ksv.InitialiseLibrary("F:", "SwissbitDemo", "12345", licenseKey)
 
         If result <> &H0 Then