The API help doesn't even mention search, but the searchmethods are exposed -but I am doing something wrong withdeclarations - can anyone help? The follwing does not run becauseof the declaratino of search criteria and search options

Dim opt As PDMWorks.IPDMWSearchOptions
Dim crit As PDMWorks.PDMWSearchCriteria
Dim searchresults As PDMWorks.PDMWSearchResults
Dim r As PDMWorks.PDMWSearchResult

Dim szName As String

szName = ListBox1.SelectedItem.ToString

opt = PDMWorks.PDMWSearchOptions<----- this is not valid

crit = opt.SearchCriteria


crit.AddCriteria(PDMWorks.PDMWAndOr.pdmwAnd,PDMWorks.PDMWPropertyType.pdmwOwner, "Owner",PDMWorks.PDMWConditionType.pdmwContains, szName)

With opt
.IgnoreCase = True
.IgnoreLinks = True
.IncludeHiddenDocuments = True
.SearchConfigSpecificProperties = False
.SearchOnlyChildrenOf = ""

End With
searchresults = pdm.Search(opt)
For Each r In searchresults
MsgBox(r.Name)

NextSolidworksApi macros