From d94e5d755574859c5abdb00e46d9fae9bc1fa462 Mon Sep 17 00:00:00 2001 From: Matthew Palermo Date: Fri, 27 Jan 2017 19:25:20 +1000 Subject: [PATCH] Improve crash dialog Add error information and make sure the user knows that the problem is not normal and should be reported to the issue tracker. --- modImportExport.bas | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/modImportExport.bas b/modImportExport.bas index ecc6a10..4308581 100644 --- a/modImportExport.bas +++ b/modImportExport.bas @@ -404,8 +404,14 @@ Private Function HandleCrash(ByVal ErrNumber As Long, ByVal ErrDesc As String, B Dim UserAction As Integer UserAction = MsgBox( _ - Prompt:="An unexpected problem occured, would you like to debug?", _ - Buttons:=vbYesNo, _ + Prompt:= _ + "An unexpected problem occured. Please report this to " & _ + "https://github.com/spences10/VBA-IDE-Code-Export/issues" & vbNewLine & vbNewLine & _ + "Error Number: " & ErrNumber & vbNewLine & _ + "Error Description: " & ErrDesc & vbNewLine & _ + "Error Source: " & ErrSource & vbNewLine & vbNewLine & _ + "Would you like to debug?", _ + Buttons:=vbYesNo + vbDefaultButton2, _ Title:="Unexpected problem") HandleCrash = UserAction = vbYes