Catching events in VBScripts

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Sumit - 27 Sep 2003 00:06 GMT

Hi,
I have created a C# dll. I want to catch all the events fired by the
dll in my VBScript.
Here is my implementation of C# dll
[Guid("F3719701-A2D2-40c6-BF7A-FD72B827E2B6")]
    [InterfaceType(ComInterfaceType.InterfaceIsIDispatch)]
    public interface IMyEvts
    {
        [DispId(3)]void Ring();
        [DispId(4)]void Tring(string argData);
    }

    [Guid("4A58F995-8B43-47e5-9A37-154B38BF966A")]
    public interface IMyEvtsHndlr
    {
        [DispId(1)]void CallRing();
        [DispId(2)]void CallTring();
    }

    public delegate void RingEvtHandler();
    public delegate void TringEvtHandler(object argData);


    [Guid("7EE087D9-42A8-47a0-89CA-098FB433A8D0"),
    ClassInterface(ClassInterfaceType.None),
    ComSourceInterfaces(typeof(IMyEvts))]
    public class MyEvts:IMyEvtsHndlr
    {
public event RingEvtHandler Ring;
        public event TringEvtHandler Tring;

        public void CallRing()
        {
            Ring();
        }

        public void CallTring()
        {
            object str = "Hi there";
            Tring(str);
        }

    }
Could some one please help.
Thanks,
Sumit

Reply to this Message

Vadim Melnik - 28 Sep 2003 22:39 GMT

Hi,

What is exactly problem you have? I didn't try this code but at first look
it seems fine (except "Tring" delegate declaration differs from IMyEvts
one - it uses object for "argData" argument type instead of string one).

In case you don't know how to handle events on script side please see
"Scripting Events" MSDN article
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnclinic/html/s
cripting04092001.asp

..
Cheers,
Vadim.

> Hi,
> I have created a C# dll. I want to catch all the events fired by the
[quoted text clipped - 41 lines]
> Thanks,
> Sumit

Reply to this Message

Sumit - 29 Sep 2003 19:40 GMT

Hi Vadim,
I have the VBScript code working too. its just that I
cannot catch the event. I added a piece of code in the dll
public void CallRing(){
if(Tring != null)
Tring("Sumit");
else
System.Windows.Forms.MessageBox.Show ("Cannot call the
event", "My Application", MessageBoxButtons.OKCancel,
MessageBoxIcon.Asterisk);

}
Then when I call the Call ring function from VBScript I
get the messagebox. Could you tell me what am i missing?.
I called the same dll in VB and it works.
-SUmit

>-----Original Message-----

>Hi,
>
[quoted text clipped - 57 lines]
>
>.

Reply to this Message

Catching events in VBScripts

Free Magazines