NIM009213 for No Product Found

Numéro d’ID de bogue	NIM009213
Envoi	May 21, 2007
Dernière modification	June 5, 2024
S’applique à	No Product Found
Version trouvée	9.2
Langue du programme	VB6
Statut	Will Not Be Addressed

Informations supplémentaires

No Public Explanation

Solution de contournement

Re-project the output feature class with the help of following code after feature data conversion.Private Sub ReProject()Dim pPropset As IPropertySetSet pPropset = New PropertySetDim pFact As IWorkspaceFactoryDim pWorkspace As IWorkspacepPropset.SetProperty "DATABASE", "F:\Temp\cities.mdb"Set pFact = New AccessWorkspaceFactorySet pWorkspace = pFact.Open(pPropset, 0)Dim pFeatureWorkspace As IFeatureWorkspaceSet pFeatureWorkspace = pWorkspaceDim pFeatureClass As IFeatureClassSet pFeatureClass = pFeatureWorkspace.OpenFeatureClass("cities")Set pGeoDataset = pFeatureClassDim pGeoDatasetEdit As IGeoDatasetSchemaEditSet pGeoDatasetEdit = pGeoDatasetIf (pGeoDatasetEdit.CanAlterSpatialReference = True) Then Dim pSpatRefFact As ISpatialReferenceFactory2 Set pSpatRefFact = New SpatialReferenceEnvironment Dim pProjCoordSys As IProjectedCoordinateSystem Set pProjCoordSys = pSpatRefFact.CreateProjectedCoordinateSystem(esriGeometry.esriSRProjCS_NAD1983UTM_12N) pGeoDatasetEdit.AlterSpatialReference pProjCoordSysEnd IfEnd Sub