在javascript中使用com组件的方法

时间：2021-12-16 20:52:02

转载自：  http://dhailin.blog.163.com/blog/static/230738322011128102043880/

首先创建一个COM组件，插入一个双接口Itest，在此接口上实现以下三个方法：

  1. STDMETHODIMP Ctest::test(void)    //无输入输出参数
  2. {
  3. // TODO: 在此添加实现代码
  4. MessageBox(NULL,L"test",L"test",MB_OK);
  5. return S_OK;
  6. }
  7. STDMETHODIMP Ctest::test1(BSTR a1)   //有一个字符串输入参数
  8. {
  9. // TODO: 在此添加实现代码
  10. MessageBox(NULL,a1,L"test",MB_OK);
  11. return S_OK;
  12. }
  13. STDMETHODIMP Ctest::test3(BSTR* a1)  //有一个BSTR* 输出参数
  14. {
  15. // TODO: 在此添加实现代码
  16. MessageBox(NULL,L"test3",L"test",MB_OK);
  17. *a1=::SysAllocString (L"烽火连三月家书抵万金");
  18. return S_OK;
  19. }

COM 中的上述三个方法分别演示无输入输出参数、有一个输入参数、有一个输出参数三种情况。程序编制好后，用regsvr32在系统中注册组件，然后就可以在IE中用javascript调用com 组件的方法了，分两种情况掉用，示例如下：

1、   直接调用com方法

建立一个html文本，并输入以下内容：

[html] view plaincopy
  1. <html>
  2. <head>
  3. <title> 调用com组件的方法示例 </title>
  4. <script language="javascript">
  5. document.write("<hr>")
  6. var xml=new ActiveXObject("atldll.test.1")
  7. xml.test()
  8. xml.test1("向com方法中传递参数并调用com方法")
  9. var str=xml.test3() //从com方法中返回参数
  10. document.write("str"+str)
  11. document.write(“<hr>”)
  12. </script>
  13. </head>
  14. <body>
  15. 演示IE脚本程序中调用com组件的方法
  16. </body>
  17. </html>

2、   在javascript函数中调用com方法

建立一个html文本，并输入以下内容：

[html] view plaincopy
  1. <html>
  2. <head>
  3. <title> donghailin active object </title>
  4. <script type="text/javascript">
  5. function displaymessage()
  6. {
  7. document.write("<hr>")
  8. var xml=new ActiveXObject("atldll.test.1")
  9. xml.test()
  10. xml.test1("向com组件传递字符串")
  11. var str=xml.test3()  //从com组件返回字符串
  12. document.write("str"+str)
  13. document.write(“<hr>”)
  14. }
  15. </script>
  16. </head>
  17. <body>
  18. <form>
  19. <input type="button" value="Click me!" onclick="displaymessage()" >
  20. </form>
  21. </body>
  22. </html>

注意编写的com组件供其他系统调用，因此输入输出参数字符串应是BSTR类型。

3、设置com组件的属性的方法

首先在com组件中设置属性。在接口类中赠加属性变量

BSTR m_bstr;

右键单击接口，选择“赠加”-〉“添加属性”在”添加属性向导中“输入属性类型” 中输入参数类型“BSTR” ，“属性名”输入“bstr",向导自动生成属性函数put_bstr和get_bstr,如下：

  1. STDMETHODIMP Ctest::get_bstr(BSTR* pVal)
  2. {
  3. // TODO: 在此添加实现代码
  4. *pVal=m_bstr;
  5. return S_OK;
  6. }
  7. STDMETHODIMP Ctest::put_bstr(BSTR newVal)
  8. {
  9. // TODO: 在此添加实现代码
  10. m_bstr=newVal;
  11. MessageBox(NULL,m_bstr,L"属性测试",MB_OK);
  12. return S_OK;
  13. }

下面的代码演示在IE的javascript脚本中设置和获得属性

[html] view plaincopy
  1. <html>
  2. <head>
  3. <title> donghailin active object </title>
  4. <script type="text/javascript">
  5. function displaymessage()
  6. {
  7. document.write("<hr>")
  8. var xml=new ActiveXObject("atldll.test.1")
  9. xml.bstr="满园春色锁不住一枝红杏出墙来"  //属性是bstr,C++ 中属性设置是put_bstr(...)
  10. document.write("属性返回值是："+xml.bstr)  //c++中获得属性值get_bstr(变量指针)
  11. document.write("<hr>")
  12. }
  13. </script>
  14. </head>
  15. <body>
  16. <table   align=center   width=50>
  17. <form>
  18. <input type="button" value="Click me!" onclick="displaymessage()" >
  19. </form>
  20. </table>
  21. </body>
  22. </html>

相关文章