vbscript - 使用错误处理程序的 VBScript 应用程序错误日志

Question

我需要将所有有关发生错误的信息输出到 msgbox 和日志文本文件。我当前的代码只输出一条消息，告诉用户发生了错误。我需要在 msgbox 中简短地显示错误信息，并在日志文件中进行更详细的解释。

我想补充一下，我正在为这个脚本使用 TestPartner，它使用 VBScript 作为它的语言，所以这些概念类似于 VB6 中的概念。

这是我目前的代码：

Private Sub CmdPOstart_Click()

errorcount = 0

On Error GoTo ErrorHandler

'Do stuff...

ErrorHandler:
    errorcount = errorcount + 1 'Add 1 to the error count
    'Output the error information to a msgbox
    MsgBox ("An Error Occurred! " & errorcount & " Errors ")
Exit Sub

End Sub

提前致谢。