Unable to cast ComObject to EnvironmentManager in SOE

PetrDiviš

Hi, I have a pretty uncertain error when asking for UserInfo from IServerEnvironment from EnvironmentManager class.

System.InvalidCastException: Unable to cast object of type 'System.__ComObject' to type 'ESRI.ArcGIS.esriSystem.EnvironmentManagerClass'.

EnvironmentManager environmentManager = new EnvironmentManager();
UID environmentUid = new UID { Value = "{32d4c328-e473-4615-922c-63c108f55e60}" };
var environment = (IServerEnvironment3)environmentManager.GetEnvironment(environmentUid);

It fails at the first line.

My environment is Server 10.6.1 with Portal and Windows credentials SSO from our domain.

Sometimes it works, most of the time it fails. I'm pretty desperate, I hate these uncertain COM errors.

pfoppe

Hi Petr Diviš‌

We recently ran into this as well with a SOE developed in VB .Net for v10.4.1 (and confirmed it was also working in 10.5.1).  We found a resolution detailed below

Here was the original code functioning in 10.4.1/10.5.1:

    Friend Function <SPAN class="token function">GetCurrentUser</SPAN><SPAN class="punctuation token">(</SPAN><SPAN class="punctuation token">)</SPAN> As String
        Try

            Dim myGUID As Guid <SPAN class="operator token">=</SPAN> Marshal<SPAN class="punctuation token">.</SPAN><SPAN class="token function">GenerateGuidForType</SPAN><SPAN class="punctuation token">(</SPAN><SPAN class="token function">GetType</SPAN><SPAN class="punctuation token">(</SPAN>IServerEnvironment<SPAN class="punctuation token">)</SPAN><SPAN class="punctuation token">)</SPAN>
            Dim myUID As New <SPAN class="token class-name">ESRI<SPAN class="punctuation token">.</SPAN>ArcGIS<SPAN class="punctuation token">.</SPAN>esriSystem<SPAN class="punctuation token">.</SPAN>UID</SPAN>
            myUID<SPAN class="punctuation token">.</SPAN>Value <SPAN class="operator token">=</SPAN> myGUID<SPAN class="punctuation token">.</SPAN><SPAN class="token function">ToString</SPAN><SPAN class="punctuation token">(</SPAN><SPAN class="string token">"B"</SPAN><SPAN class="punctuation token">)</SPAN>
            Dim pEnvMgr As IEnvironmentManager <SPAN class="operator token">=</SPAN> New <SPAN class="token class-name">EnvironmentManager</SPAN>
            Dim pServEnv As IServerEnvironment2 <SPAN class="operator token">=</SPAN> pEnvMgr<SPAN class="punctuation token">.</SPAN><SPAN class="token function">GetEnvironment</SPAN><SPAN class="punctuation token">(</SPAN>myUID<SPAN class="punctuation token">)</SPAN>

            Dim sUser As String <SPAN class="operator token">=</SPAN> <SPAN class="string token">""</SPAN>
            sUser <SPAN class="operator token">=</SPAN> pServEnv<SPAN class="punctuation token">.</SPAN>UserInfo<SPAN class="punctuation token">.</SPAN>Name
            Return sUser

        Catch ex As Exception
            Return <SPAN class="string token">"Current user not found."</SPAN>
        End Try
    End Function<SPAN class="line-numbers-rows"><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN></SPAN>

And was throwing the following exception for line 7: 

 Unable to cast object of type 'System.__ComObject' to type 'ESRI.ArcGIS.esriSystem.EnvironmentManagerClass'

A colleague of mine found this BUG - BUG-000102447: The EnvironmentManager singleton object in the Serve.. 

And we translated that to VB .Net: 

    Friend Function <SPAN class="token function">GetCurrentUser</SPAN><SPAN class="punctuation token">(</SPAN><SPAN class="punctuation token">)</SPAN> As String
        Try

            Dim myGUID As Guid <SPAN class="operator token">=</SPAN> Marshal<SPAN class="punctuation token">.</SPAN><SPAN class="token function">GenerateGuidForType</SPAN><SPAN class="punctuation token">(</SPAN><SPAN class="token function">GetType</SPAN><SPAN class="punctuation token">(</SPAN>IServerEnvironment<SPAN class="punctuation token">)</SPAN><SPAN class="punctuation token">)</SPAN>
            Dim myUID As New <SPAN class="token class-name">ESRI<SPAN class="punctuation token">.</SPAN>ArcGIS<SPAN class="punctuation token">.</SPAN>esriSystem<SPAN class="punctuation token">.</SPAN>UID</SPAN>
            myUID<SPAN class="punctuation token">.</SPAN>Value <SPAN class="operator token">=</SPAN> myGUID<SPAN class="punctuation token">.</SPAN><SPAN class="token function">ToString</SPAN><SPAN class="punctuation token">(</SPAN><SPAN class="string token">"B"</SPAN><SPAN class="punctuation token">)</SPAN>

            ' Issues with original <SPAN class="number token">10.5</SPAN><SPAN class="punctuation token">.</SPAN><SPAN class="number token">1</SPAN> code implementation <SPAN class="operator token">-</SPAN> https<SPAN class="punctuation token">:</SPAN><SPAN class="operator token">/</SPAN><SPAN class="operator token">/</SPAN>support<SPAN class="punctuation token">.</SPAN>esri<SPAN class="punctuation token">.</SPAN>com<SPAN class="operator token">/</SPAN>en<SPAN class="operator token">/</SPAN>technical<SPAN class="operator token">-</SPAN>article<SPAN class="operator token">/</SPAN><SPAN class="number token">000011331</SPAN>
            'Dim pEnvMgr As IEnvironmentManager <SPAN class="operator token">=</SPAN> New <SPAN class="token class-name">EnvironmentManager</SPAN><SPAN class="punctuation token">(</SPAN><SPAN class="punctuation token">)</SPAN>
            Dim t As Type <SPAN class="operator token">=</SPAN> Type<SPAN class="punctuation token">.</SPAN><SPAN class="token function">GetTypeFromProgID</SPAN><SPAN class="punctuation token">(</SPAN><SPAN class="string token">"esriSystem.EnvironmentManager"</SPAN><SPAN class="punctuation token">)</SPAN>
            Dim obj As System<SPAN class="punctuation token">.</SPAN>Object <SPAN class="operator token">=</SPAN> Activator<SPAN class="punctuation token">.</SPAN><SPAN class="token function">CreateInstance</SPAN><SPAN class="punctuation token">(</SPAN>t<SPAN class="punctuation token">)</SPAN>
            Dim pEnvMgr As IEnvironmentManager <SPAN class="operator token">=</SPAN> obj
            Dim pServEnv As IServerEnvironment2 <SPAN class="operator token">=</SPAN> pEnvMgr<SPAN class="punctuation token">.</SPAN><SPAN class="token function">GetEnvironment</SPAN><SPAN class="punctuation token">(</SPAN>myUID<SPAN class="punctuation token">)</SPAN>

            Dim sUser As String <SPAN class="operator token">=</SPAN> <SPAN class="string token">""</SPAN>
            sUser <SPAN class="operator token">=</SPAN> pServEnv<SPAN class="punctuation token">.</SPAN>UserInfo<SPAN class="punctuation token">.</SPAN>Name
            Return sUser

        Catch ex As Exception
            Return <SPAN class="string token">"Current user not found... "</SPAN> <SPAN class="operator token">&</SPAN> ex<SPAN class="punctuation token">.</SPAN><SPAN class="token function">ToString</SPAN><SPAN class="punctuation token">(</SPAN><SPAN class="punctuation token">)</SPAN><SPAN class="line-numbers-rows"><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN><SPAN>‍</SPAN></SPAN>

After a re-build, deploy, test/debug session we confirmed our logged in user information was available again in the SOE. 

*whew* ... we were quite worried we found a critical show stopper to our 10.6.1 upgrade efforts as getting the logged in user is critical for a few of our SOE's

Hope this helps.