Использование объекта Error управления сценариев

Переводы статьи Переводы статьи
Код статьи: 184742 - Vizualiza?i produsele pentru care se aplic? acest articol.
Развернуть все | Свернуть все

В этой статье

Аннотация

В данной статье описывается сценарий управления ошибки свойства объекта и примеры кода, демонстрирующий использование.

Дополнительная информация

Элемент управления сценария объекта Error широкие сведения основное приложение о сообщения об ошибках сценария. Поддерживаются следующие свойства:
   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.
				

* Значение свойства Text является пустым для ошибок во время выполнения, но содержит данные для ошибок компиляции.

** Свойство Source для VBScript — это ошибка компиляции Microsoft VBScript или ошибка во время выполнения Microsoft VBScript. Если используется другой язык сценариев, система может отличаться.

*** HelpFile и HelpContext свойства являются пустыми, за исключением пользователей при возникновении ошибки.

ВНИМАНИЕ: Корпорация Майкрософт предлагает примеры программного кода только для иллюстрации и гарантии или подразумеваемых, включая, но не ограничиваясь только ими, подразумеваемые гарантии товарности или пригодности для определенной цели. Примеры в данной статье рассчитаны на пользователя, имеющего достаточный уровень знаний соответствующего языка программирования, а также необходимых средств разработки и отладки..

Пошаговый пример

  1. В Visual Basic создайте новый проект (по умолчанию создается форма Form1).
  2. Нажмите кнопку «компоненты» в меню проект и затем установите флажок «Элемента управления Microsoft Script 1.0».
  3. Добавьте в форму Form1 элемент управления сценария (ScriptControl1), текстовое поле (Текст1) и кнопки (Command1). Свойство MultiLine текстового поля равно true. Для удобства использования измените размер Текст1 таким образом, чтобы он размещает 5 строк с 60 символов.
  4. Добавьте следующий код в форму 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. Запустите форму Form1 и откройте окно отладки.
  6. В текстовом поле введите следующий сценарий:
          Sub Test
            MsgBox == "Hello World"
            Err.Raise 555, "Test", "Custom Error", "test.hlp", 5
          End Sub
    
    						
  7. Нажмите добавленную кнопку.. В результате в окне отладки (фактический выход может меняться в зависимости от версии используется элемент управления сценария) появляется следующее сообщение об ошибке:
          Number:       1002
          Source:       Microsoft VBScript compilation error
          Desc:         Syntax error
          Line: 2       Column: 16
          Text:         MsgBox == "Hello World"
          Help File:
    
          Help Context:  0
    
    						
  8. Удалите из строки MsgBox == и нажмите кнопку еще раз.
  9. MsgBox появится и затем ошибка «555 Custom Error». В окне отладки отображается следующее:
          Number:       555
          Source:       Test
          Desc:         Custom Error
          Line: 3       Column: 8
          Text:
          Help File:    test.hlp
          Help Context: 5
    
    						
    Примечание: Номер столбца может изменяться в зависимости от того, следует ли вы Вырезать и вставить код или ввести его вручную без начальных пробелов.

Ссылки

Создать сценарий для элемента управления раздела справки: объект Error

За сведениями о получении управления сценария обратитесь к следующей статье Microsoft Knowledge Base:
184739: Информация: где получить сценарий элемента управления

(c) Корпорация Майкрософт 1998 года, все права защищены. Вклад Алексей Стюард, корпорация Майкрософт

Свойства

Код статьи: 184742 - Последний отзыв: 14 ноября 2010 г. - Revision: 2.0
Информация в данной статье относится к следующим продуктам.
  • Microsoft Visual Basic 5.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 4.0 Standard Edition
Ключевые слова: 
kbgrpdsvb kbhowto kbscript kbvbp kbmt KB184742 KbMtru
Переведено с помощью машинного перевода
ВНИМАНИЕ! Перевод данной статьи был выполнен не человеком, а с помощью программы машинного перевода, разработанной корпорацией Майкрософт. Корпорация Майкрософт предлагает вам статьи, переведенные как людьми, так и средствами машинного перевода, чтобы у вас была возможность ознакомиться со статьями базы знаний KB на родном языке. Однако машинный перевод не всегда идеален. Он может содержать смысловые, синтаксические и грамматические ошибки, подобно тому как иностранец делает ошибки, пытаясь говорить на вашем языке. Корпорация Майкрософт не несет ответственности за неточности, ошибки и возможный ущерб, причиненный в результате неправильного перевода или его использования. Корпорация Майкрософт также часто обновляет средства машинного перевода.
Эта статья на английском языке:184742

Отправить отзыв

 

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