Como utilizar o objecto de erro de controlo de script

Traduções de Artigos Traduções de Artigos
Artigo: 184742 - Ver produtos para os quais este artigo se aplica.
Expandir tudo | Reduzir tudo

Nesta página

Sumário

Este artigo descreve o script de controlar as propriedades do objecto erro e fornece exemplos de código ilustra a utilização.

Mais Informação

O controlo de script de objecto de erro fornece informações completas para a aplicação anfitrião relativamente a erros de script. São suportadas as seguintes propriedades:
   Property         Description
   -----------------------------------------------------------------
   Number           Error number.
   Description      Error message.
   Line             The line number the error occurred on (1 based).
   Column           The column number the error occurred on (0 based).
   Text*            The text of the line that caused the error.
   Source**         What component caused the error.
   HelpFile***      Help file name provided by the error source.
   HelpContext***   Help context provided by the error source.
				

* A propriedade de texto está em branco para erros de tempo de execução, mas contém dados para erros de compilação.

** A propriedade de origem para VBScript é o erro de compilação do Microsoft VBScript ou o Microsoft VBScript run-time error. Se é utilizada a linguagem de script diferente, a origem pode ser diferente.

*** As propriedades FicheiroDeAjuda e HelpContext estão em branco, excepto para erros de utilizador elevado.

Importante: Microsoft fornece exemplos de programação ilustração só, sem garantia expressa ou implícita, incluindo, sem limitação, garantias implícitas de comercialização e/ou adequação a um fim específico. Este artigo pressupõe que está familiarizado com a linguagem de programação apresentada e as ferramentas utilizadas para criar e depurar procedimentos.

Exemplo passo a passo

  1. No Visual Basic, crie um novo projecto (Form1 é criado por predefinição).
  2. Clique em ' componentes ' no menu Project e, em seguida, seleccione a caixa de verificação "Controlo de scripts da Microsoft 1.0".
  3. Adicione o controlo de script (ScriptControl1), uma caixa de texto (Texto1) e um botão de comando (Command1) ao Form1. Defina a propriedade MultiLine da caixa de texto como TRUE. Para facilitar a utilização, altere o tamanho de Texto1 isso acomoda 5 linhas com 60 caracteres.
  4. Adicione o seguinte código ao Form1:
          Private Sub Command1_Click()
            On Error Resume Next
            With ScriptControl1
              .Language = "VBScript"
              .AllowUI = True
              .AddCode Text1.Text
              .Run "Test"
            End With
            If Err Then
              MsgBox Err & " " & Error
              ListErrors ScriptControl1
            End If
          End Sub
    
          Private Sub ListErrors(S As ScriptControl)
            With S.Error
              Debug.Print "Number:", .Number
              Debug.Print "Source:", .Source
              Debug.Print "Desc:", .Description
              Debug.Print "Line: " & .Line, "Column: " & .Column
              Debug.Print "Text:", .Text
              Debug.Print "Help File:", .HelpFile
              Debug.Print "Help Context:", .HelpContext
              Debug.Print
            End With
          End Sub
    
    						
  5. Execute o Form1 e abrir a janela Depurar.
  6. Escreva o seguinte script na caixa de texto:
          Sub Test
            MsgBox == "Hello World"
            Err.Raise 555, "Test", "Custom Error", "test.hlp", 5
          End Sub
    
    						
  7. Clique no botão de comando. Como resultado, o erro seguinte aparece na janela Debug (saída real pode variar dependendo da versão do controlo estiver a utilizar o script):
          Number:       1002
          Source:       Microsoft VBScript compilation error
          Desc:         Syntax error
          Line: 2       Column: 16
          Text:         MsgBox == "Hello World"
          Help File:
    
          Help Context:  0
    
    						
  8. Remover o == a partir da linha MsgBox e clique novamente no botão de comando.
  9. O MsgBox aparece e, em seguida, o erro "erro personalizado 555". A janela de depuração apresenta o seguinte:
          Number:       555
          Source:       Test
          Desc:         Custom Error
          Line: 3       Column: 8
          Text:
          Help File:    test.hlp
          Help Context: 5
    
    						
    Nota: O número da coluna pode variar dependendo se pode cortar e colar o código ou escrever manualmente sem espaços à esquerda.

Referências

Script tópico de ajuda do controlo: objecto de erro

Para obter informações sobre como obter o controlo de script, consulte o seguinte artigo na base de dados de conhecimento da Microsoft:
184739: INFO: onde obter o controlo de script

(c) Microsoft Corporation 1998, todos os direitos reservados. Contribuições de Malcolm Stewart, Microsoft Corporation

Propriedades

Artigo: 184742 - Última revisão: 13 de julho de 2004 - Revisão: 3.1
A informação contida neste artigo aplica-se a:
  • Microsoft Visual Basic 5.0 Learning Edition
  • Microsoft Visual Basic 6.0 Learning Edition
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft Visual Basic 5.0 Enterprise Edition
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
  • Microsoft Visual Basic 4.0 Standard Edition
  • Microsoft Visual Basic 4.0 Professional Edition
  • Microsoft Visual Basic 4.0 32-Bit Enterprise Edition
  • Microsoft Visual Basic for Applications 5.0
Palavras-chave: 
kbmt kbgrpdsvb kbhowto kbscript kbvbp KB184742 KbMtpt
Tradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine translation ou MT), não tendo sido portanto revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática? erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 184742

Submeter comentários

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com