ModMain.IDV_makros_bearbeiten Method EDKB12WS.ModMain.IDV_makros_bearbeiten Method IDV_makros_bearbeiten Method topic_00000000000003E0 EDKB12WS.ModMain.IDV_makros_bearbeiten EDKB12WS.ModMain.IDV_makros_bearbeiten ModMain.IDV_makros_bearbeiten EDKB12WS.ModMain.ModMain.IDV_makros_bearbeiten EDKB12WS.ModMain.IDV_makros_bearbeiten EDKB12WS (in EDKB12WS.exe) ModMain.IDV_makros_bearbeiten Method EDKB12WS.ModMain topic_00000000000003E0

ModMain.IDV_makros_bearbeiten Method

Assembly: EDKB12WS (in EDKB12WS.exe)

Visual Basic Public Shared Function IDV_makros_bearbeiten() As ]]>Booleana]]>]]> C# public static ]]>boola]]>]]> IDV_makros_bearbeiten() C++ public: static ]]>boola]]>]]> IDV_makros_bearbeiten() JScript public static function IDV_makros_bearbeiten() : ]]>booleana]]>]]>;

$END-IFNOTEMPTY$

Visual Basic Copy Code ]]> Public Function IDV_makros_bearbeiten() As Boolean    If Param.DebugMode Then        DivFnkt.InsertJournale("EDKB12: Start IDV_makros_bearbeiten", clsDivFnkt.Enum_InfoTyp.Information)    End If    Try        Dim idvmakros As New edokadb.clsMyDokumentDaten()        Dim makros As System.Data.DataTable        Dim i As Long        idvmakros.cpMainConnectionProvider = conn        makros = idvmakros.Select_IDVMakros(DokType.iDokumenttypnr.Value)        For i = 0 To makros.Rows.Count - 1            Try                If makros.Rows(i).Item("ist_in_dll") = True Then                    'SetForegroundWindow(...)                    Try                        objword.Activate()                    Catch                        Thread.Sleep(100)                        objword.Activate()                    End Try                    'System.Windows.Forms.Application.DoEvents()                    '                    idvdll = CreateObject("IDVMakros.Application")                    '                   Call idvdll.CallSub(objword, makros.Rows(i).Item("makro"))                    'System.Windows.Forms.Application.DoEvents()                    objword.Visible = True                    Try                        '                        objWord.Activate()                    Catch                        '                       Thread.Sleep(100)                        '                      objWord.Activate()                    End Try                Else                    'System.Windows.Forms.Application.DoEvents()                    If Param.DebugMode Then                        DivFnkt.InsertJournale("EDKB12: Start IDV_makros_bearbeiten:Makro: " & makros.Rows(i).Item("makro"), clsDivFnkt.Enum_InfoTyp.Information)                    End If                    objword.Run(makros.Rows(i).Item("makro"))                    'System.Windows.Forms.Application.DoEvents()                End If            Catch ex As Exception                If Param.DebugMode Then                    DivFnkt.InsertJournale("EDKB12: IDV_makros_bearbeiten:: Fehler beim Makro-Aufruf::" & makros.Rows(i).Item("makro") & "::" & ex.Message, clsDivFnkt.Enum_InfoTyp.Information)                End If            End Try        Next i        If Param.DebugMode Then            DivFnkt.InsertJournale("EDKB12: Ende IDV_makros_bearbeiten (True)", clsDivFnkt.Enum_InfoTyp.Information)        End If        Return True    Catch ex As Exception        DivFnkt.InsertJournale("EDKB12::Fehler:: IDV_makros_bearbeiten::" & ex.Message, clsDivFnkt.Enum_InfoTyp.Fehler)        If Param.DebugMode Then            DivFnkt.InsertJournale("EDKB12: Ende IDV_makros_bearbeiten (False)::" & ex.Message, clsDivFnkt.Enum_InfoTyp.Information)        End If        Return False    End Try End Function

Windows 8, Windows Server 2012, Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows XP SP2 x64 Edition, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2 The .NET Framework does not support all versions of every platform. For a list of the supported versions, see ]]>System Requirementsa]]>]]>.

.NET Framework Supported in: 4.5, 4, 3.5, 3.0, 2.0, 1.1, 1.0 .NET Compact Framework Supported in: 3.5, 2.0, 1.0 XNA Framework Supported in: 3.0, 2.0, 1.0

Reference ModMain Class ModMain ModMain Members