--- joko/ToolBox/Windows/VpnDial/src/Module_Main.bas	2005/10/08 00:22:10	1.6
+++ joko/ToolBox/Windows/VpnDial/src/Module_Main.bas	2005/10/08 01:01:45	1.7
@@ -202,6 +202,10 @@
             'MsgBox cmd
             On Error Resume Next
             Shell cmd, vbHide
+            'Shell cmd, vbNormalFocus
+            'If Err.Number <> 0 Then
+            '    MsgBox "Error while calling cmd: " & cmd & vbCrLf & "Error-Number: " & Err.Number
+            'End If
             On Error GoTo 0
         End If