NIM009213 for No Product Found

Número de ID do Erro	NIM009213
Enviado	May 21, 2007
Última Modificação	June 5, 2024
Aplica-se à	No Product Found
Versão encontrada	9.2
Idioma do programa	VB6
Status	Will Not Be Addressed

Informações Adicionais

No Public Explanation

Solução Provisória

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