NIM004549 for No Product Found

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

Informações Adicionais

No Public Explanation

Solução Provisória

To implement IGeoDataset, put the code below into clsLogoLayer.cls:Implements IGeoDatasetPrivate Property Get IGeoDataset_Extent() As esriGeometry.IEnvelope If Not ILayer_Valid Then Set m_pExtent = Nothing ElseIf m_pExtent Is Nothing Then Dim pEnv As esriGeometry.IEnvelope Set pEnv = New esriGeometry.Envelope With pEnv Set .SpatialReference = IGeoDataset_SpatialReference .XMin = ILayer_AreaOfInterest.XMin .YMin = ILayer_AreaOfInterest.YMin .XMax = ILayer_AreaOfInterest.XMax .YMax = ILayer_AreaOfInterest.YMax End With Set m_pExtent = pEnv End If If m_pExtent Is Nothing Then Exit Property Set IGeoDataset_Extent = m_pExtentEnd PropertyPrivate Property Get IGeoDataset_SpatialReference() As esriGeometry.ISpatialReference If m_pDataSpatialRef Is Nothing Then Dim pSRefFact As ISpatialReferenceFactory2 Set pSRefFact = New SpatialReferenceEnvironment Set m_pDataSpatialRef = pSRefFact.CreateProjectedCoordinateSystem(esriSRProjCS_World_Robinson) End If Set IGeoDataset_SpatialReference = m_pDataSpatialRefEnd PropertyMake the .dll and create a new logo layer, and create a new WMS service. It can be connected this time.