NIM006824 for No Product Found

Numéro d’ID de bogue	NIM006824
Envoi	February 13, 2007
Dernière modification	June 5, 2024
S’applique à	No Product Found
Version trouvée	9.2
Langue du programme	VBA
Statut	Non-Reproducible

Informations supplémentaires

No Public Explanation

Solution de contournement

Using a spatial filter to perform the intersect works successfullySample workaround code provided to client:----------------------------------------------------------------------------Sub SpatialSelection()Dim pMxApp As IMxApplicationDim pMxDoc As IMxDocumentDim pMap As IMapDim pTargetLayer As IFeatureLayerDim pSelectingLayer As IFeatureLayerDim pFeatureClass As IFeatureClassDim pEnvelope As IEnvelopeDim pFeatureSelection As IFeatureSelectionDim pSpatialFilter As ISpatialFilterSet pMxApp = ApplicationSet pMxDoc = Application.DocumentSet pMap = pMxDoc.FocusMapSet pTargetLayer = pMap.Layer(0) 'Centerline_ExportSet pSelectingLayer = pMap.Layer(1) 'FireBoxArea_ExportSet pFeatureClass = pTargetLayer.FeatureClassSet pEnvelope = pSelectingLayer.AreaOfInterestSet pFeatureSelection = pTargetLayerSet pSpatialFilter = New SpatialFilterWith pSpatialFilterSet .Geometry = pEnvelope.GeometryField = pFeatureClass.ShapeFieldName.SpatialRel = esriSpatialRelIntersects.WhereClause = "SEGMENTID = '0151913' OR SEGMENTID = '0158895'"End WithpFeatureSelection.SelectFeatures pSpatialFilter, esriSelectionResultNew, FalsepMxDoc.ActiveView.PartialRefresh esriViewGeoSelection, Nothing, NothingEnd Sub