vers 303: fix versione VB6 x osai 10 vers2

2018-11-23 16:23:40 +01:00
parent 30543218fc
commit 097b086ffc
5 changed files with 13 additions and 5 deletions
@@ -14,13 +14,13 @@ Public Class ComCNOSAIVB6

    Inherits ComCNOsai

-    Public Sub New(ByRef szRemoteName As String, ByRef b_debug As Boolean)
+  Public Sub New(ByVal szRemoteName As String, ByVal b_debug As Boolean)

-        MyBase.New(szRemoteName, b_debug)
+    MyBase.New(szRemoteName, b_debug)

-    End Sub
+  End Sub

-    Public Overrides Function OpenSession() As Boolean
+  Public Overrides Function OpenSession() As Boolean

        Dim nReturn As Short