--- joko/ToolBox/Windows/HylaPrintMon_MapiContactsDumper/ModuleMain.bas	2007/09/03 18:35:03	1.4
+++ joko/ToolBox/Windows/HylaPrintMon_MapiContactsDumper/ModuleMain.bas	2007/09/05 11:44:50	1.5
@@ -5,7 +5,6 @@
 
 Public Sub Main()
     
-    ' testing
     'MsgBox Get_User_Name()
     
     ' get port name from command line
@@ -41,7 +40,9 @@
     mailerStart
     
     ' debugging
-    'MsgBox mailer.Session.CurrentUser()
+'    MsgBox _
+'        "Windows user name: " & Get_User_Name() & vbCrLf & _
+'        "Outlook user name: " & mailer.Session.CurrentUser()
     
     Dim contactsFolder As Outlook.MAPIFolder