Método Source

Retorna ou define o nome do objeto ou aplicativo que gerou originalmente o erro.

Sintaxe

object.Source

Argumentos:

Object: Obrigatório. Sempre o objeto Err.

Comentários

A propriedade Source especifica uma expressão de string que geralmente é o nome da classe ou o ID programático do objeto que causou o erro. Use Source para fornecer aos usuários informações quando seu código não conseguir tratar um erro gerado em um objeto acessado. Por exemplo, se você acessar o código que gera um erro de Divisão por erro, Err.Number definirá seu código de erro para esse erro.

Source sempre contém o nome do objeto que gerou originalmente o erro. Seu código pode tentar tratar o erro de acordo com a documentação do erro do objeto que você acessou. Se o processador de erros falhar, você pode usar as informações do objeto Err para descrever o erro ao usuário, usando Source e o outro Err para informar ao usuário qual objeto causou originalmente o erro, a descrição do erro e assim por diante.

Quando um erro com base no código é gerado, Source é o ID programático do aplicativo.

O código a seguir ilustra o uso do método Source.

Exemplo 1:

Sub RaiseUserDefinedError()
    On Error Resume Next       ' Enable error handling.
    Err.Raise 1, "SomeObject", "A custom error description."
     Output =  "Error # " & Err.Number & ": " & Err.Description & " Source: " & Err.Source
    Err.Clear                  ' Clear the error.
End Sub
'Output : Error # -1: A custom error description. Source: SomeObject