求高手帮忙：如何追踪目前spacial analyst设置?

我用的是ArcGIS 9和vb6，不知道如何在我的程序里跟踪当时的spacial analyst设置，比如CELL Size, extent. 在ESRI网站发现的HYDROLOGY　程序在arcGIS8中没有问题，在9里不行，谢谢高手指点

这是我提到的ESRI的code

Public Function GetSpatialAnalystSettings(ByRef pApp As IApplication) As IRasterAnalysisEnvironment
' Get current Spatial Analyst's Settings like output workspace, extent..
On Error GoTo ERH
''' Dim pExtension As IExtension
''' Set pExtension = pApp.FindExtensionByName("Spatial Analyst")
''' Dim pSASetting As ISpatialAnalyst
''' Set pSASetting = pExtension
''' Set GetSpatialAnalystSettings = pSASetting.AnalysisEnvironment
''' Set pExtension = Nothing
''' Set pSASetting = Nothing

Dim pEnv As IRasterAnalysisEnvironment
Set pEnv = New RasterAnalysis
Set GetSpatialAnalystSettings = pEnv

Exit Function
ERH:
MsgBox "Failed in getting Spatial settings. " ; Err.Description
End Function

你先转换下代码，具体可参照帮助里83和9的代码转换说明