NIM009213 for No Product Found

Bug-ID-Nummer	NIM009213
Eingereicht	May 21, 2007
Zuletzt geändert	June 5, 2024
Gilt für	No Product Found
Gefunden in Version	9.2
Programmsprache	VB6
Status	Will Not Be Addressed

Zusätzliche Informationen

No Public Explanation

Workaround

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