Test

2022-11-07 16:26:51 +01:00
parent 4ec29d0288
commit cae73e2932
1 changed files with 4 additions and 4 deletions
--- a/VERAGAddIn/ThisAddIn.vb
+++ b/VERAGAddIn/ThisAddIn.vb
@@ -186,12 +186,12 @@ Public Class ThisAddIn
            MsgBox("ACHTUNG: Server nicht erreichbar!" & vbCrLf & "VERAG ADD In wird beendet")
        End If

-        'For Each COMAddIn As COMAddIn In Me.Application.COMAddIns
+        For Each COMAddIn As COMAddIn In Me.Application.COMAddIns

-        '    If (COMAddIn.ProgId.Contains("< ADDIN_PROG_ID >")) Then
+            '    If (COMAddIn.ProgId.Contains("< ADDIN_PROG_ID >")) Then

-        '        COMAddIn.Connect = False
-        '        Exit
+            '        COMAddIn.Connect = False
+            '        Exit
        Next