OpenIndex OLE Automation Routine

OpenIndex( indexPath )

indexPath the path name of the index to open.

Returns True if the index was opened successfully, otherwise False.

Example:

‘ wilbur and bIndexLoaded are global
‘ if an index is already open, then close it

If bIndexLoaded Then

wilbur.quit
bIndexLoaded = False

End If

Set wilbur = CreateObject("Wilbur.FileIndex")
bIndexLoaded = True
If Not wilbur.OpenIndex(Text1.Text) Then

MsgBox ("Could not load index")

End If

This example opens an index that has had its name entered in the Text1 field. If an index was already open, it is closed first..