Hi, i need to implement the IObjectSafety interface for a vb.net COM .dll which is being used for an MCE app. I've created this in a module file (Config.vb):

Public Interface IObjectSafety
    Sub GetInterfaceSafetyOptions(ByRef riid As Guid, ByRef supportedOptions As Integer, ByRef enabledOptions As Integer)

    Sub SetInterfaceSafetyOptions(ByRef riid As Guid, ByVal optionSetMask As Integer, ByVal enabledOptions As Integer)
End Interface

Public Enum ObjectSafetyFlags As Integer
   INTERFACESAFE_FOR_UNTRUSTED_CALLER = 1
   INTERFACESAFE_FOR_UNTRUSTED_DATA = 2
   INTERFACE_USES_DISPEX = 4
   INTERFACE_USES_SECURITY_MANAGER = 8
   SafeForScripting = INTERFACESAFE_FOR_UNTRUSTED_CALLER Or INTERFACESAFE_FOR_UNTRUSTED_DATA
End Enum

and for each class i implement it using:

Public Class Item
      Implements IObjectSafety

and the following is within each class:

Public Sub GetInterfaceSafetyOptions(ByRef riid As System.Guid, ByRef supportedOptions As Integer, ByRef enabledOptions As Integer) Implements Config.IObjectSafety.GetInterfaceSafetyOptions
    supportedOptions = ObjectSafetyFlags.SafeForScripting
    enabledOptions = ObjectSafetyFlags.SafeForScripting
End Sub

Public Sub SetInterfaceSafetyOptions(ByRef riid As System.Guid, ByVal optionSetMask As Integer, ByVal enabledOptions As Integer) Implements Config.IObjectSafety.SetInterfaceSafetyOptions

End Sub

but when the .dll is invoke within the HTML page on the MCE machine, IE still says it's unsafe so im assuming it's not implemented properly. So has anyone else successfully done this in vb.net and if so could you let me know how?

Thanks in advance.

Dan.

Searching for the same subject I found this http://support.microsoft.com/default.aspx?scid=kb;en-us;Q182598

give it a try...

 

Cris

 

Hello,

I have implemented this. Here is a template for everyone.

Dean

 

---

_________________________________________________________

Take 10 minutes out to do nothing! -  www.10footgames.net

• *NEW* - mceLights V1.0
• *NEW* - mcePeaks V2.0

 

Don't forget to sign your code!

---

_________________________________________________________

Take 10 minutes out to do nothing! -  www.10footgames.net

• *NEW* - mceLights V1.0
• *NEW* - mcePeaks V2.0

 

Dean, thanks for the template, have got my project working correctly now, very much appreciated!

Thanks, Dan.

<QUOTE>Is this the c# equivalent?

http://blogs.msdn.com/infopath/archive/2005/04/15/408728.aspx

 

THX

 

Woops used the wrong post button.  Belongs to this thread

http://www.thegreenbutton.com/community/shwmessage.aspx?ForumID=30&MessageID=137195</QUOTE>

TThomas, This is the same thing.

Hoof

 

---

_________________________________________________________

Take 10 minutes out to do nothing! -  www.10footgames.net

• *NEW* - mceLights V1.0
• *NEW* - mcePeaks V2.0

 

I am looking for the template in VB.NET

Thanks in advance.

Where can I download the template?

I can not see the template. Is it still available?

Here is an easier approach.

1- Create a module file and call it objsafe

2- Copy and paste the following code to the module

Imports System.Runtime.InteropServices

<ComImport()> _

<Guid("CB5BDC81-93C1-11CF-8F20-00805F2CD064")> _

<InterfaceType(ComInterfaceType.InterfaceIsIUnknown)> _

Public Interface IObjectSafety

Function GetInterfaceSafetyOptions(ByRef iid As Guid, ByRef pdwSupportedOptions As Integer, ByRef pdwEnabledOptions As Integer) As Integer

Function SetInterfaceSafetyOptions(ByRef iid As Guid, ByVal dwOptionSetMask As Integer, ByVal dwEnabledOptions As Integer) As Integer

End Interface

 

3- Now make your class inherits the interface as follows:

Public Class MyClass

Implements IObjectSafety

 

and also add the folloiwng definitions inside your class:

' Constants for implementation of the IObjectSafety interface.

Private Const INTERFACESAFE_FOR_UNTRUSTED_CALLER As Integer = &H1

Private Const INTERFACESAFE_FOR_UNTRUSTED_DATA As Integer = &H2

 

4- Implement the two interface methods as follows:

Public Function GetInterfaceSafetyOptions(ByRef iid As Guid, ByRef pdwSupportedOptions As Integer, ByRef pdwEnabledOptions As Integer) As Integer Implements IObjectSafety.GetInterfaceSafetyOptions

pdwSupportedOptions = INTERFACESAFE_FOR_UNTRUSTED_CALLER Or INTERFACESAFE_FOR_UNTRUSTED_DATA

pdwEnabledOptions = INTERFACESAFE_FOR_UNTRUSTED_CALLER Or INTERFACESAFE_FOR_UNTRUSTED_DATA

Return 0

End Function

 

Public Function SetInterfaceSafetyOptions(ByRef iid As Guid, ByVal dwOptionSetMask As Integer, ByVal dwEnabledOptions As Integer) As Integer Implements IObjectSafety.SetInterfaceSafetyOptions

Return 0

End Function

 

Now you class become safety for scripting and initializing ready.

Feras

when i run the above code, i still get the ActiveX unsafe warning.  Has anyone been able to get IobjectSafety successfully working in .NET?  either VB or C# solutions are fine.

Check the dates before you post. This is way old and will not work.

Dean,

The template no longer appears as part of this post. Could you please repost it

Thanks

Scott