User Tools

Site Tools


vba:classes:log4vba

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revision Previous revision
Next revision
Previous revision
vba:classes:log4vba [09.03.2018 11:01:57]
yaslaw [info()]
vba:classes:log4vba [21.10.2019 12:10:41] (current)
yaslaw
Line 1: Line 1:
 <​const>​ <​const>​
-    version=1.5.1 +    version=1.5.6 
-    vdate= ​28.6.2017+    vdate= ​21.10.2019
     fname=log4vba.cls     fname=log4vba.cls
     ns=%NAMESPACE%     ns=%NAMESPACE%
Line 16: Line 16:
 {{%%fname%%|Download %%fname%% (V-%%version%%)}}</​WRAP>​ {{%%fname%%|Download %%fname%% (V-%%version%%)}}</​WRAP>​
  
-Mit dem Errohandling und Debug-Inrmationen ​in VBA ist es immer wieder mühsam, jedesmal alles auszuprogrammieren. Darum habe ich für mich diese Klasse geschrieben. Sie ist einfach zu implementieren und ermöglicht ein einheitliches Error-Handling über ein gesammtes Projekt.+Mit dem Errohandling und Debug-Informationen ​in VBA ist es immer wieder mühsam, jedesmal alles auszuprogrammieren. Darum habe ich für mich diese Klasse geschrieben. Sie ist einfach zu implementieren und ermöglicht ein einheitliches Error-Handling über ein gesammtes Projekt.
  
 ===== Definitionen ===== ===== Definitionen =====
Line 497: Line 497:
 ' */ ' */
 Public Function writeToConsole(ByVal iLogType As eLogType, ByVal iText As String) Public Function writeToConsole(ByVal iLogType As eLogType, ByVal iText As String)
-    If Not CurrentProject.AllForms("​FRM_SYS_CONSOLE"​).IsLoaded Then DoCmd.OpenForm ​C_CONSOLE+    If Not CurrentProject.AllForms("​FRM_SYS_CONSOLE"​).IsLoaded Then DoCmd.OpenForm ​"​FRM_SYS_CONSOLE"​
     Form_FRM_SYS_CONSOLE.log iText     Form_FRM_SYS_CONSOLE.log iText
 End Function</​code>​ End Function</​code>​
vba/classes/log4vba.1520589717.txt.gz · Last modified: 09.03.2018 11:01:57 by yaslaw