Hi Gang
I have an activeX control that I have created and includes an event. Here is my declaration
Public Event MyClick()
and I call it with this peice of code
RaiseEvent MyClick
These are the only two peices of code I have added to my control.
I then have my HTML page that has the control embeded as follows.
<!-- If any of the controls on this page require licensing, you must
create a license package file. Run LPK_TOOL.EXE to create the
required LPK file. LPK_TOOL.EXE can be found on the ActiveX SDK,
If you have the Visual
Basic 6.0 CD, it can also be found in the \Tools\LPK_TOOL directory.
The following is an example of the Object tag:
-->
<OBJECT CLASSID="clsid:5220cb21-c88d-11cf-b347-00aa00a28331">
<PARAM NAME="LPKPath" VALUE="smartwrap.LPK">
</OBJECT>
<OBJECT ID="UserControl1"
CLASSID="CLSID:124E09C1-8854-4857-BBAE-BE6AA73F4B83"
CODEBASE="SmarteWrap.CAB#version=2,1,0,61">
</OBJECT>
<SCRIPT LANGUAGE="VBScript">
<!--
alert("here"
Sub UserControl11_MyClick()
alert("here2"
end sub
-->
</SCRIPT>
I dont seem to be getting the event though. The here2 message never appears even though I am clicking the button that causes the event to be raised
Any input into this one?
Ken
I have an activeX control that I have created and includes an event. Here is my declaration
Public Event MyClick()
and I call it with this peice of code
RaiseEvent MyClick
These are the only two peices of code I have added to my control.
I then have my HTML page that has the control embeded as follows.
<!-- If any of the controls on this page require licensing, you must
create a license package file. Run LPK_TOOL.EXE to create the
required LPK file. LPK_TOOL.EXE can be found on the ActiveX SDK,
If you have the Visual
Basic 6.0 CD, it can also be found in the \Tools\LPK_TOOL directory.
The following is an example of the Object tag:
-->
<OBJECT CLASSID="clsid:5220cb21-c88d-11cf-b347-00aa00a28331">
<PARAM NAME="LPKPath" VALUE="smartwrap.LPK">
</OBJECT>
<OBJECT ID="UserControl1"
CLASSID="CLSID:124E09C1-8854-4857-BBAE-BE6AA73F4B83"
CODEBASE="SmarteWrap.CAB#version=2,1,0,61">
</OBJECT>
<SCRIPT LANGUAGE="VBScript">
<!--
alert("here"
Sub UserControl11_MyClick()
alert("here2"
end sub
-->
</SCRIPT>
I dont seem to be getting the event though. The here2 message never appears even though I am clicking the button that causes the event to be raised
Any input into this one?
Ken