
Help on Passing parameter to an ActiveX control in IE
I put the following code (UserControl1) in an Active X control which has
only one TextBox
then I tried to pass a String from html to the activex control using (HTML1)
and i open it using IE....nothing is shown
However if I remove the <PARAM> tag, the textbox can display its default
correctly..
what is the problem
please help!!
thx
baron
---------------------HTML1-----------------------
<HTML>
<HEAD>
<TITLE>Project1.CAB</TITLE>
</HEAD>
<BODY>
<!-- 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,
http://www.*-*-*.com/
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="LPKfilename.LPK">
</OBJECT>
-->
<OBJECT ID="UserControl1"
CLASSID="CLSID:3BAC0685-D4C9-4BEC-BBC2-0F744A0A64E9"
CODEBASE="Project1.CAB#version=1,0,0,0">
<PARAM NAME="myName" VALUE="HEllo">
</OBJECT>
</BODY>
</HTML>
---------------------------------------------------------------------UserCon
trol1---------------------
Public Property Get myName() As String
myName = Text1.Text
End Property
Public Property Let myName(ByVal New_myName As String)
Text1.Text() = New_myName
PropertyChanged "myName"
End Property
'Load property values from storage
Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
Text1.Text = PropBag.ReadProperty("myName", "Text1")
End Sub
'Write property values to storage
Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
Call PropBag.WriteProperty("myName", Text1.Text, "Text1")
End Sub