NIM000524 for No Product Found

Numéro d’ID de bogue	NIM000524
Envoi	December 7, 2005
Dernière modification	June 5, 2024
S’applique à	No Product Found
Version trouvée	9.1
Statut	Non-Reproducible

Informations supplémentaires

No Public Explanation

Solution de contournement

Please update KB article with this code - the code in the description is to accurateSub Test() Dim pMxDoc As IMxDocument Dim pDoc As IDocument Dim pMap As IMap Dim pApp As IApplication Set pDoc = ThisDocument Set pApp = pDoc.Parent Set pMxDoc = pDoc Set pMap = pMxDoc.FocusMap Dim pLayer As IFeatureLayer Set pLayer = pMap.Layer(0) Dim pSheet As IComPropertySheet Set pSheet = New esriFramework.ComPropertySheet Dim pPset As esriSystem.ISet Set pPset = New esriSystem.Set Dim page As IPropertyPage Dim pUID As New UID Dim bChanged As Boolean pPset.Add pLayer pPset.Add pMap pPset.Add pApp pUID.Value = "{1476C782-6F57-11D2-A2C6-080009B6F22B}" pSheet.AddCategoryID pUID pSheet.Title = "Layer Properties" bChanged = pSheet.EditProperties(pPset, ThisDocument.Parent.hWnd) End Sub