Verwendung von Skript Control-Fehlerobjekt

SPRACHE AUSWÄHLEN SPRACHE AUSWÄHLEN
Artikel-ID: 184742 - Produkte anzeigen, auf die sich dieser Artikel bezieht
Alles erweitern | Alles schließen

Auf dieser Seite

Zusammenfassung

Dieser Artikel beschreibt das Skript Error-Objekteigenschaften von steuern und bietet Beispielcode, Ihre Verwendung veranschaulicht.

Weitere Informationen

Skriptsteuerelement Error-Objekt enthält rich Informationen, die die Host-Anwendung zu Skriptfehlern. Die folgenden Eigenschaften werden unterstützt:
   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.
				

* Die Texteigenschaft für Laufzeitfehler leer ist, aber Daten für Kompilierungsfehler enthält.

** Die Source-Eigenschaft für VBScript ist entweder Microsoft VBScript-Kompilierungsfehler oder Microsoft VBScript-Laufzeitfehler. Wenn eine andere Skriptsprache verwendet wird, kann die Quelle unterscheiden.

*** Die Eigenschaften HelpFile und HelpContext sind leer, außer bei Benutzerfehlern ausgelöst.

Hinweis: Microsoft bietet Programmierbeispiele für Abbildung nur ohne Gewährleistung oder konkludent, einschließlich, aber nicht beschränkt auf konkludenten Garantien der Handelsüblichkeit und/oder Eignung für einen bestimmten Zweck. Die zur Verfügung gestellten Makro- und Programmierungsbeispiele sollen lediglich exemplarisch die Funktionsweise des Beispiels aufzeigen.

Vorgehensweise: Beispiel

  1. Erstellen Sie in Visual Basic ein neues Projekt (Form1 wird standardmäßig erstellt).
  2. Klicken Sie im Menü Projekt auf Komponenten, und aktivieren Sie das Kontrollkästchen "Microsoft Skript-Steuerelement 1.0".
  3. Fügen Sie das Script-Steuerelement (ScriptControl1), ein Textfeld (Text1) und eine Befehlsschaltfläche (Command1) zu Form1 hinzu. Legen Sie die MultiLine-Eigenschaft des Textfelds auf True fest. Zur einfacheren Verwendung ändern Sie die Größe des Text1, sodass es 5 Zeilen mit 60 Zeichen berücksichtigt.
  4. Fügen Sie Form1 folgenden Code hinzu:
          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. Führen Sie Form1 und öffnen Sie das Debug-Fenster.
  6. Geben Sie das folgende Skript im Textfeld:
          Sub Test
            MsgBox == "Hello World"
            Err.Raise 555, "Test", "Custom Error", "test.hlp", 5
          End Sub
    
    						
  7. Klicken Sie auf die Befehlsschaltfläche. Der folgende Fehler im Debuggen Fenster (die tatsächliche Ausgabe kann die Version des Skript-Steuerelements je verwenden) als Ergebnis wird angezeigt:
          Number:       1002
          Source:       Microsoft VBScript compilation error
          Desc:         Syntax error
          Line: 2       Column: 16
          Text:         MsgBox == "Hello World"
          Help File:
    
          Help Context:  0
    
    						
  8. Entfernen der == aus der MsgBox-Zeile und klicken Sie erneut auf die Befehlsschaltfläche.
  9. Die Meldung wird angezeigt und dann Fehler "555 benutzerdefinierte Fehler". Das Debug-Fenster zeigt die folgende:
          Number:       555
          Source:       Test
          Desc:         Custom Error
          Line: 3       Column: 8
          Text:
          Help File:    test.hlp
          Help Context: 5
    
    						
    Hinweis: die Spalte-Anzahl ist davon abhängig, ob Sie Ausschneiden und Einfügen im Code oder geben Sie in manuell, ohne die führenden Leerzeichen.

Informationsquellen

Skript Steuerelement Hilfethema: Error-Objekt

Informationen zum Beziehen des Skript-Steuerelements finden Sie unter den folgenden Artikel der Microsoft Knowledge Base:
184739: INFO: wo erhalten Sie das Script-Steuerelement

(c) 1998 Microsoft Corporation, alle Rechte vorbehalten. Beiträge von Malcolm Stewart, Microsoft Corporation

Eigenschaften

Artikel-ID: 184742 - Geändert am: Dienstag, 13. Juli 2004 - Version: 3.1
Die Informationen in diesem Artikel beziehen sich auf:
  • 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
Keywords: 
kbmt kbgrpdsvb kbhowto kbscript kbvbp KB184742 KbMtde
Maschinell übersetzter Artikel
Wichtig: Dieser Artikel wurde maschinell und nicht von einem Menschen übersetzt. Die Microsoft Knowledge Base ist sehr umfangreich und ihre Inhalte werden ständig ergänzt beziehungsweise überarbeitet. Um Ihnen dennoch alle Inhalte auf Deutsch anbieten zu können, werden viele Artikel nicht von Menschen, sondern von Übersetzungsprogrammen übersetzt, die kontinuierlich optimiert werden. Doch noch sind maschinell übersetzte Texte in der Regel nicht perfekt, insbesondere hinsichtlich Grammatik und des Einsatzes von Fremdwörtern sowie Fachbegriffen. Microsoft übernimmt keine Gewähr für die sprachliche Qualität oder die technische Richtigkeit der Übersetzungen und ist nicht für Probleme haftbar, die direkt oder indirekt durch Übersetzungsfehler oder die Verwendung der übersetzten Inhalte durch Kunden entstehen könnten.
Den englischen Originalartikel können Sie über folgenden Link abrufen: 184742
Microsoft stellt Ihnen die in der Knowledge Base angebotenen Artikel und Informationen als Service-Leistung zur Verfügung. Microsoft übernimmt keinerlei Gewährleistung dafür, dass die angebotenen Artikel und Informationen auch in Ihrer Einsatzumgebung die erwünschten Ergebnisse erzielen. Die Entscheidung darüber, ob und in welcher Form Sie die angebotenen Artikel und Informationen nutzen, liegt daher allein bei Ihnen. Mit Ausnahme der gesetzlichen Haftung für Vorsatz ist jede Haftung von Microsoft im Zusammenhang mit Ihrer Nutzung dieser Artikel oder Informationen ausgeschlossen.

Ihr Feedback an uns

 

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