See also
Method: GotoNext (eKind as SPYAuthenticElementKind) as AuthenticRange
Sets the range to the beginning of the next element of type eKind. The method returns the modified range object.
2001 |
The authentic range object, or its related view object is no longer valid. |
|
2003 |
Target lies after end of document. |
|
2005 |
Invalid element kind specified. Invalid address for the return parameter was specified. |
' --------------------------------------------
' VBScript
' Scan through the whole document word-by-word
' --------------------------------------------
Dim objAuthenticView
Set objAuthenticView = objPlugin.AuthenticView
Dim objRange
Set objRange = objAuthenticView.DocumentBegin
Dim bEndOfDocument
bEndOfDocument = False
On Error Resume Next
While Not bEndOfDocument
objRange.GotoNext(spyAuthenticWord).Select
If ((Err.number - vbObjecterror) = 2003) Then
bEndOfDocument = True
Err.Clear
ElseIf (Err.number <> 0) Then
Err.Raise ' forward error
End If
Wend