AuthenticRange.PerformAction
Siehe auch
Methode: PerformAction (eAction als SPYAuthenticActions, strElementName als String) als Boolean
Beschreibung
PerformAction und die dazugehörigen Methoden verleihen Zugriff auf die Eingabehilfenfunktionen von Authentic. Mit Hilfe dieser Funktion können Sie Dokumentinhalt schnell und auf konsistente Weise ändern, ohne wissen zu müssen, wo genau die Änderung vorgenommen wird. Der Anfang des Bereichsobjekts dient dazu, die nächste gültige Position zu finden, an der die angegebene Aktion durchgeführt werden kann. Wenn es keine solche Position gibt, gibt die Methode den Wert false zurück. Andernfalls wird das Dokument geändert und der Bereich zeigt auf den Anfang der Änderung.
HINWEIS: Um Elementnamen zu finden, die als der zweite Parameter übergeben werden können, verwenden Sie CanPerformActionWith.
Fehler
2001 | Das Authentic Range-Objekt oder das dazugehörige View-Objekt ist nicht mehr gültig. | |
2005 | Für den zurückgegebenen Parameter wurde eine ungültige Adresse angegeben. | |
2007 | Es wurde eine ungültige Aktion definiert. |
Beispiele
' --------------------------------------------
' VBScript
' Insert the innermost element
' --------------------------------------------
Dim objRange
Set objRange = objPlugin.AuthenticView.Selection
' we determine the elements that can be inserted at the current position
Dim arrElements()
objRange.CanPerformActionWith spyAuthenticInsertBefore, arrElements
' we insert the first (innermost) element
If UBound(arrElements) >= 0 Then
objRange.PerformAction spyAuthenticInsertBefore, arrElements(0)
' objRange now points to the beginning of the inserted element
' we set a default value and position at its end
objRange.Text = "Hello"
objRange.ExpandTo(spyAuthenticTag).CollapsToEnd().Select
Else
MsgBox "Can't insert any elements at current position"
End If