NIM010578 for No Product Found

Bug-ID-Nummer	NIM010578
Eingereicht	July 25, 2007
Zuletzt geändert	June 5, 2024
Gilt für	No Product Found
Gefunden in Version	9.2
Programmsprache	VBA
Status	Will Not Be Addressed

Zusätzliche Informationen

We apologize that we were unable to address this issue within the current product support cycle. If the issue continues to affect your work in a supported release, please contact Technical Support.

Workaround

Use IDataStatistics and IStatisticsResults as an alternate way of getting the maximum value from a field:Private Sub TestPostFixClause() Dim pMxDoc As IMxDocument Dim pFL As IFeatureLayer Dim pCur As IFeatureCursor Set pMxDoc = ThisDocument Set pFL = pMxDoc.ActiveView.FocusMap.Layer(0) Set pCur = pFL.Search(Nothing, False) Dim pData As esriGeoDatabase.IDataStatistics Set pData = New esriGeoDatabase.DataStatistics pData.Field = "TestID" Set pData.Cursor = pCur Dim pStatResults As esriSystem.IStatisticsResults Set pStatResults = pData.Statistics Dim MaxObjectID As String MaxObjectID = pStatResults.Maximum MsgBox MaxObjectIDEnd Sub