ClearErrors()

Object: EHL7.QSXML

FileName: EHL7.dll

METHOD

Name: ClearErrors()

Parameters: None

Returns: N/A

Description: Clears the error state of the object.  See also IsError/LastError

Example:

Dim myXMLObj As New EHL7.QSXML

Dim strXML As String

strXML = "<BADXML>>><\BADXML>"

With myXMLObj

Call .OpenFromString(strXML)

If .IsError Then

       MsgBox .LastError

      .ClearErrors

      strXML = "<GOODXML></GOODXML>"

      Call .OpenFromString(strXML)

        If .IsError Then

               MsgBox .LastError

              .ClearErrors

        Else

             MsgBox "Got it right the second time"

        End If

End If

End With

Set myXMLObj = Nothing