Alle anzeigen

Alle ausblenden

Wenn Sie eine Formularvorlage entwerfen, für deren Formulare zur Verarbeitung der zurückgegebenen Daten eine Netzwerkverbindung bestehen muss, und wenn Sie Erfahrungen mit dem Schreiben von Skripts haben, können Sie ein Skript schreiben, dass den Netzwerkverbindungsstatus von auf der Formularvorlage basierenden Formularen erkennt. Mithilfe dieses Skripts kann Microsoft Office InfoPath überprüfen, ob ein neues Formular mit dem Netzwerk verbunden ist und ob das Formular eine Verbindung mit einer externen Datenquelle herstellen kann, bevor das Formular eine Abfrage an die externe Datenquelle sendet. Zu diesem Artikel gehören JScript- und VBScript-Beispiele, mit denen bestimmt wird, ob auf der Formularvorlage basierende Formulare mit dem Netzwerk verbunden sind und ob diese Formulare eine Verbindung mit einer externen Datenquelle herstellen können.

• Übersicht

• JScript-Beispiel

• VBScript-Beispiel

• Verwenden des Skriptbeispiels in einer Formularvorlage

Übersicht

Sie können den Netzwerkverbindungsstatus eines auf Ihrer Formularvorlage basierenden Formulars bestimmen, indem Sie die MachineOnlineState-Eigenschaft des Application-Objekts verwenden. Dann können Sie die IsDestinationReachable-Methode desselben Application-Objekts verwenden, um zu ermitteln, ob das Formular die externe Datenquelle finden kann. Die MachineOnlineState-Eigenschaft enthält einen Wert, der für den Verbindungsstatus des Formulars steht. Diese Eigenschaft kann die folgenden Werte aufweisen:

Nachdem Sie festgestellt haben, dass der Computer des Benutzers mit einem Netzwerk verbunden ist, können Sie mit der IsDestinationReachable-Methode ermitteln, ob das Formular mit der externen Datenquelle kommunizieren kann. Die Methode verwendet die Uniform Resource Locator (URL) (Uniform Resource Locator [URL]: Eine Adresse, die ein Protokoll, z. B. HTTP oder FTP, sowie den Speicherort eines Objekts, eines Dokuments, einer Seite im World Wide Web oder eines sonstigen Zieles im Internet oder in einem Intranet angibt. Beispiel: "http://www.microsoft.com/".) oder den Uniform Resource Name (URN) (Uniform Resource Name (URN): Eine Methode zum eindeutigen Identifizieren von Ressourcen, auf die im Internet mithilfe des Namens ohne Berücksichtigung des Speicherortes zugegriffen werden kann.) der externen Datenquelle als Parameter und gibt folgende boolesche Werte zurück:

True  Das Formular hat die externe Datenquelle im Netzwerk gefunden.

False  Das Formular hat die externe Datenquelle nicht gefunden. Die externe Datenquelle ist möglicherweise offline oder im Netzwerk, aber nicht verfügbar.

Mit den Skriptbeispielen in diesem Artikel wird nur bestimmt, ob das Formular mit dem Netzwerk verbunden ist. In diesem Artikel werden die Skriptbeispiele verwendet, wenn der Benutzer das Formular zum ersten Mal öffnet. Sie können dieses Skript jedoch auch immer dann verwenden, wenn Sie die Netzwerkverbindung vor dem Ausführen einer Aktion überprüfen möchten. Sie können dieses Skript z. B. verwenden, wenn ein Benutzer auf eine bestimmte Schaltfläche im Formular klickt, um zu ermitteln, ob eine Netzwerkverbindung mit der externen Datenquelle besteht. Unabhängig davon, wann Sie dieses Skript verwenden, können Sie auch ein Skript hinzufügen, das basierend auf dem Vorhandensein einer Verbindung des Formulars mit dem Netzwerk eine Aktion ausführt. Wenn der Computer z. B. offline ist oder keine Verbindung mit dem Netzwerk herstellen kann, können Sie in InfoPath die Anzeige einer Warnmeldung für den Benutzer konfigurieren, die darauf hinweist, dass die externe Datenquelle nicht verfügbar ist. Sie können die Warnmeldung so anpassen, dass die Benutzer erfahren, wie sie vorgehen sollen, wenn die externe Datenquelle nicht verfügbar ist. Sie können sie z. B. bitten, das Formular später auszufüllen oder sich an den Support zu wenden.

 Seitenanfang

JScript-Beispiel

var machineState = Application.MachineOnlineState;
var displayMessage = machineState;

switch(machineState)
{
  case 0:
  {
    displayMessage = "The computer is not connected to a network.";
    break;
  }
		
  case 1:
  {
    if (!Application.IsDestinationReachable("http://example"))
    {
      displayMessage = "The computer is connected to a network, but the "
                       + "external data source is not available. Contact "
                       + "the data source administrator for more information.";
    }
    else
    {
      displayMessage = "The computer is connected to a network.";
    }
    break;
  }
		
  case 2:
  {
					displayMessage = "The computer is connected to a network, but "
                     + "Internet Explorer is in offline mode. Some "
                     + "data connections may not work until you "
                     + "set Internet Explorer to online mode. To "
                     + "switch to online mode, on the File menu in "
                     + "Internet Explorer, click Work Offline.";
    break;
  }

  default:
  {
    displayMessage = "An unknown error occurred: Error: " + machineState;
  }
}

XDocument.UI.Alert(displayMessage);

 Seitenanfang

VBScript-Beispiel

Dim machineState, displayMessage, returnValue

machineState = Application.MachineOnlineState
displayMessage = machineState
returnValue = False
	
Select Case machineState
  Case 0 
    displayMessage = "The computer is not connected to a network."
	
  Case 1
    returnValue = Application.IsDestinationReachable("http://example")
			  
    If returnValue = False Then
      displayMessage = "The computer is connected to a network, but the "
      displayMessage = displayMessage + "external data source is not available. Contact "
      displayMessage = displayMessage + "the data source administrator for more information."

    Else
      displayMessage = "The computer is connected to a network."

    End If
			
  Case 2
    displayMessage = "The computer is connected to a network, but "
	    displayMessage = displayMessage + "Internet Explorer is in offline mode. Some "
	    displayMessage = displayMessage + "data connections may not work until you "
	    displayMessage = displayMessage + "set Internet Explorer to online mode. To "
	    displayMessage = displayMessage + "switch to online mode, on the File menu in "
	    displayMessage = displayMessage + "Internet Explorer, click Work Offline."
		
  Case Else
    displayMessage = "An unknown error occurred: Error: " + machineState + "."
		
End Select
	
XDocument.UI.Alert(displayMessage)

 Seitenanfang

Verwenden des Skriptbeispiels in einer Formularvorlage

Wenn Sie ein Skriptbeispiel testen möchten, bevor Sie es in der Formularvorlage verwenden, können Sie mithilfe des folgenden Verfahrens eine leere Formularvorlage erstellen und dann eines der Skriptbeispiele dieses Artikels in das OnLoad-Ereignis kopieren. Das Skript im OnLoad-Ereignis wird immer dann ausgeführt, wenn ein neues auf der Formularvorlage basierendes Formular erstellt wird. Sie können dann eine Vorschau des Formulars anzeigen, um das Skriptbeispiel zu testen, wenn der Computer mit dem Netzwerk verbunden ist, wenn die Verbindung mit dem Netzwerk getrennt ist oder wenn eine Verbindung mit dem Netzwerk besteht, für Internet Explorer aber der Offlinemodus festgelegt wurde.

1. Kopieren Sie eines der weiter oben in diesem Thema aufgeführten Skriptbeispiele, und fügen Sie es dann in einen Text-Editor wie Microsoft Editor ein.

    Hinweis   Durch das Kopieren des Skriptbeispiels in einen Text-Editor, bevor Sie es der Formularvorlage hinzufügen, wird verhindert, dass HTML- (HTML: Die standardmäßig für Dokumente im World Wide Web verwendete Programmiersprache. In HTML wird mithilfe von Tags angegeben, wie Elemente einer Seite (Text oder Grafiken) in Webbrowsern angezeigt werden sollen und wie auf Benutzereingaben reagiert werden soll.)Formatierungszeichen (Hypertext Markup Language) im Skript angezeigt werden.

2. Klicken Sie in InfoPath im Menü Datei auf Eine Formularvorlage entwerfen.
3. Klicken Sie unter Neu entwerfen im Dialogfeld eine Eine Formularvorlage entwerfen auf Formularvorlage, auf Leer und dann auf OK.
4. Standardmäßig werden neue Formularvorlagen so konfiguriert, dass JScript als Skriptsprache verwendet wird. Ändern Sie die Skriptsprache der Formularvorlage, damit VBScript als Skriptsprache verwendet wird.

   So wird's gemacht

   1. Klicken Sie im Menü Extras auf Formularoptionen.
   2. Klicken Sie in der Liste Kategorie auf Programmierung.
   3. Klicken Sie in der Liste Codesprache der Formularvorlage unter Programmiersprache auf VBScript, und klicken Sie dann auf OK.
5. Zeigen Sie im Menü Extras auf Programmierung, und klicken Sie dann auf On Load-Ereignis. Der Microsoft Skript-Editor wird gestartet, und der Cursor befindet sich auf dem OnLoad-Ereignis.
6. Ersetzen Sie im OnLoad-Ereignis im Microsoft Skript-Editor den Text // Write your code here (JScript) oder ' Write your code here (VBScript) durch das Skriptbeispiel, das Sie in den Text-Editor kopiert haben.
7. Ändern Sie das Skriptbeispiel entsprechend Ihrer Umgebung. Sie können z. B. die Meldungen und http://example auf die URL oder den URN der externen Datenquelle ändern.
8. Klicken Sie im Microsoft Skript-Editor im Menü Datei auf Speichern.
9. Um Ihre Änderungen zu testen, klicken Sie auf der Symbolleiste Standard auf Vorschau, oder drücken Sie STRG+UMSCHALT+B.

 Seitenanfang