VB.NET TSUSEREXLib.dll在windows 10下不起作用

Question

我使用DLL "Interop.TSUSEREXLib.dll“来确定AD帐户的终端服务配置文件路径。到目前为止，作为我的客户端的Win7没有出现任何问题。同样的代码在Windows10上不起作用。

下面是一个简短的代码示例：

Imports TSUSEREXLib

Dim oTsUser As IADsTSUserEx = Nothing
oTsUser = TryCast(New DirectoryEntry(ADsPath).NativeObject, IADsTSUserEx)

If oTsUser Is Nothing Then
   MessageBox.Show("Die Terminalservices-Attribute konnten nicht ermittelt werden!")
   Return Nothing
End If

Dim sReturnValue As String = Nothing

sReturnValue = oTsUser.TerminalServicesProfilePath

使用Win10时，将始终显示上述MessageBox。

有人知道用Windows10作为客户端来确定ActiveDirectory用户的TS属性的方法吗？

我使用Win10 x64和VS2015 Express。谢谢!