你可以用vbscript 来处理
<script language=vbscript>
sub setparam
dim obj
set obj=document.usercontrol
obj.usercontrol="1213"
end sub
</script>
你将这个函数放到按钮事件里,如<input type=button value=setparam onclick=setparam>
就可以了!你也可以放在表单里,这样就可以动态的改变属性了!
<script language=vbscript>
sub setparam
dim obj
set obj=document.usercontrol
obj.usercontrol="1213"
end sub
</script>
你将这个函数放到按钮事件里,如<input type=button value=setparam onclick=setparam>
就可以了!你也可以放在表单里,这样就可以动态的改变属性了!
解决方案 »
- 关于用VB
- 在WORD中如何用VBA判断一行是空行
- 请教大家个问题,在线等
- 数据库连接问题.如果通过IP地址连接另一台电脑上的Access数据库,必须要把存放Access数据库的文件夹完全共享吗?
- 高分求:如何在TREEVIEW中定位一个特定的结点?
- 请问各位,如何选定mshflexgrid中的一行呀?
- vb窗体两个之间传参数的问题
- 水晶报表中添加dataset .xsd数据集问题
- 我用的是VB6,请教如何用ADO删除DATAGRID控件的当前行数据?
- ^?^ 一个工程组包括两个工程(A和B),我想从一个工程的某个窗体中调用另外一个工程的窗体,如何实现?
- 如何在分辨率改变的情况下使窗体及上面的控件跟着一起改变???
- 我的FORM为什么这个用户不能用?控件问题?(内详)
'vb中
Private Sub UserControl_Initialize()
m_urlparm = m_def_urlparm
End SubPrivate Sub UserControl_InitProperties()
m_urlparm = m_def_urlparm
End SubPrivate Sub UserControl_WriteProperties(PropBag As PropertyBag)
Call PropBag.WriteProperty("urlparm", m_urlparm, m_def_urlparm)
End SubPrivate Sub UserControl_ReadProperties(PropBag As PropertyBag)
m_urlparm = PropBag.ReadProperty("urlparm", m_def_urlparm)
End SubPublic Property Get urlparm() As Variant
urlparm = m_urlparm
End PropertyPublic Property Let urlparm(ByVal vNewValue As Variant)
m_urlparm = vNewValue
PropertyChanged "urlparm"
End Property'页面中
<SCRIPT LANGUAGE="VBScript">
dim obj
set obj=document.usercontrol
obj.urlparm="?id=333"
</SCRIPT>
ID= "usercontrol"
CLASSID="clsid:5F500AB1-F32C-11D6-8BF8-00A0242EE67A"
ALIGN = center
HSPACE = 0
VSPACE = 0
>
</OBJECT>
<param name="usercontrol" value="1213">
这样用!也可以
<SCRIPT LANGUAGE="VBScript">
dim obj
set obj=document.usercontrol
obj.urlparm="?id=333"
</SCRIPT>
另外你的控件注册在本机了?为什么没有codebase呢?
按照你的方法写了,还是不行
我现在的写法是
<object classid="clsid:5F500AB1-F32C-11D6-8BF8-00A0242EE67A" id="uploadimage1" width="453" height="409">
<param name="_ExtentX" value="11986">
<param name="_ExtentY" value="10821">
<param name="urlparm" value="?id=333">
</object>
但只有调节ie的安全级别,启用没有安全标记的activex和没有数字签名的activex才能传递参数,否则ie提示activex不安全,不会传递param参数怎么能给控件加上安全标记呢,因为我的控件是在企业内部网上使用,好象不用数字签名,但没有安全标记是不行的
我看帮助说要用lpk_tool.exe生成.lpk文件就能加安全标记了,我生成了,但还是不能用,是我的生成方法错了?应该怎么用啊?
我不是要设置数字签名,我知道要花钱,我只是要设置activex控件的初始化安全标记和脚本安全标记,我在vb的打包程序中选定了这两项,又开启了浏览器的下载未签名的activex控件功能,按理应该不会报安全错误了啊?另外更正一点,我上面说的lpk_tool.exe程序的用途是activex的使用许可,我理解错了!