K kim_fu Unregistered / Unconfirmed GUEST, unregistred user! 2003-06-02 #1 我做了一个 ActiveForm. 想通过调用 ActiveForm 的 Html页提供一个或几个参数 在 ActiveForm 里获得参数后做相应的动作。 如何获得参数呢？
青 青檬檬 Unregistered / Unconfirmed GUEST, unregistred user! 2003-06-02 #2 我的页面文件如下 <HTML> <OBJECT id="mobile" classid="clsid:679E80B6-E8F0-49C9-AADD-FF9E9BDB4B69" codebase="ActiveIvrProj1.cab" width=510 height=252 align=center hspace=0 vspace=0 > <param name="MobNum" value="35354"> </OBJECT> </HTML> 然后我在Type Library里增加了一个Property Mobnum 程序里出现了 procedure Set_MobNum(const Value: WideString) safecall; function Get_MobNum: WideString safecall; 我在里面添加代码 procedure TActiveIvr.Set_MobNum(const Value: WideString); begin FMobNum := value; end; function TActiveIvr.Get_MobNum: WideString; begin Result := FMobNum end; 然后申明变量 public { Public declarations } FMobNum: widestring; 我刚刚解决问题的
我的页面文件如下 <HTML> <OBJECT id="mobile" classid="clsid:679E80B6-E8F0-49C9-AADD-FF9E9BDB4B69" codebase="ActiveIvrProj1.cab" width=510 height=252 align=center hspace=0 vspace=0 > <param name="MobNum" value="35354"> </OBJECT> </HTML> 然后我在Type Library里增加了一个Property Mobnum 程序里出现了 procedure Set_MobNum(const Value: WideString) safecall; function Get_MobNum: WideString safecall; 我在里面添加代码 procedure TActiveIvr.Set_MobNum(const Value: WideString); begin FMobNum := value; end; function TActiveIvr.Get_MobNum: WideString; begin Result := FMobNum end; 然后申明变量 public { Public declarations } FMobNum: widestring; 我刚刚解决问题的
K kim_fu Unregistered / Unconfirmed GUEST, unregistred user! 2003-06-02 #3 to 青檬檬: html文件里这段 <param name="MobNum" value="35354"> 定义一个变量 MobNum并已经初始化了 ， 假如我把包含 ActiveForm 的主页改为ASP。 我想这样调用ASP 。127.0.0.0/Test.asp?Param1=123&param2=sfdsfs 。要求把 Param1 和 param2 这两个变量的值传到 ActiveForm 中，用你的方法可以吗？
to 青檬檬: html文件里这段 <param name="MobNum" value="35354"> 定义一个变量 MobNum并已经初始化了 ， 假如我把包含 ActiveForm 的主页改为ASP。 我想这样调用ASP 。127.0.0.0/Test.asp?Param1=123&param2=sfdsfs 。要求把 Param1 和 param2 这两个变量的值传到 ActiveForm 中，用你的方法可以吗？
青 青檬檬 Unregistered / Unconfirmed GUEST, unregistred user! 2003-06-02 #4 你是需要在ActiveX使用127.0.0.0/Test.asp?Param1=123&para;m2=sfdsfs 还是你的Test.asp的页面需要这两个参数 如果是后者的话 就没有必要再通过ActiveX去传两次参数了吧 前者的话 你用我的方法是可以的 只是需要把我的 value="35354"换成变量
你是需要在ActiveX使用127.0.0.0/Test.asp?Param1=123&para;m2=sfdsfs 还是你的Test.asp的页面需要这两个参数 如果是后者的话 就没有必要再通过ActiveX去传两次参数了吧 前者的话 你用我的方法是可以的 只是需要把我的 value="35354"换成变量
C csmb Unregistered / Unconfirmed GUEST, unregistred user! 2003-06-02 #5 定义接口，然后用 script 直接调用不就可以了么？ 比如在上例中： HTML> <OBJECT id="mobile" classid="clsid:679E80B6-E8F0-49C9-AADD-FF9E9BDB4B69" codebase="ActiveIvrProj1.cab" width=510 height=252 align=center hspace=0 vspace=0 > <param name="MobNum" value="35354"> </OBJECT> </HTML> 改写成： <HTML> <OBJECT id="mobile" classid="clsid:679E80B6-E8F0-49C9-AADD-FF9E9BDB4B69" codebase="ActiveIvrProj1.cab" width=510 height=252 align=center hspace=0 vspace=0 > <script language="VBS"> mobile.Set_MobNum "123456" </script> </OBJECT> </HTML> 在ASP中可以这样写： <HTML> <OBJECT id="mobile" classid="clsid:679E80B6-E8F0-49C9-AADD-FF9E9BDB4B69" codebase="ActiveIvrProj1.cab" width=510 height=252 align=center hspace=0 vspace=0 > <% dim s s="<script language='VBS'> s=s+mobile.Set_MobNum " s=s+"123456" '你要传递的参数 s=s+"</script>" response.write s %> </HTML>
定义接口，然后用 script 直接调用不就可以了么？ 比如在上例中： HTML> <OBJECT id="mobile" classid="clsid:679E80B6-E8F0-49C9-AADD-FF9E9BDB4B69" codebase="ActiveIvrProj1.cab" width=510 height=252 align=center hspace=0 vspace=0 > <param name="MobNum" value="35354"> </OBJECT> </HTML> 改写成： <HTML> <OBJECT id="mobile" classid="clsid:679E80B6-E8F0-49C9-AADD-FF9E9BDB4B69" codebase="ActiveIvrProj1.cab" width=510 height=252 align=center hspace=0 vspace=0 > <script language="VBS"> mobile.Set_MobNum "123456" </script> </OBJECT> </HTML> 在ASP中可以这样写： <HTML> <OBJECT id="mobile" classid="clsid:679E80B6-E8F0-49C9-AADD-FF9E9BDB4B69" codebase="ActiveIvrProj1.cab" width=510 height=252 align=center hspace=0 vspace=0 > <% dim s s="<script language='VBS'> s=s+mobile.Set_MobNum " s=s+"123456" '你要传递的参数 s=s+"</script>" response.write s %> </HTML>
