VBS 中調用dll

若想在VBS 中使用C++ 開發的dll ， 需要將dll 做成COM 組件。以下是簡單的COM開發以及在VBS中的使用示例。

一、VS2005 ATL Com 開發

1. 打開VS2005，新建項目，File --> New -->Project ,選擇Visual C++ -->ATL ,名字輸入“COMPROJ” -->確定。

    

2. 勾選”Support COM+1.0” 和”Support component registar” ，其他 默認，“finish”。
3. 切換到類視圖，右擊COMPROJ---> 添加類。

             

 

 

       4. 選擇“ATL”--->“ATL Simple Object”(ATL簡單對象)-->“添加”。

            

 

     5. ATL 簡單對象向導，輸入類名稱“FirstClass”，點擊“完成”。

          

 

      6. 切換到類視圖，在剛添加的IFirstClass右擊，添加方法。（注:這里是在IFirstClass 上添加不是CFirstClass）。

           

 

      7. 添加方法向導，”方法名”中輸入”AddData”  ， 添加兩個輸入參數，勾選“in”,選擇參數類型“LONG”,參數名“para1”,點擊“添加”，同樣方法添加第二個輸入參數。

           

 

           

 

       添加輸出參數： 在返回類型中選擇“LONG *”，輸入參數名“result”，勾選“retval”--->”添加”。點擊“完成”。

         

 

      

     8. 切換到解決方法管理器，展開源文件，雙擊“COMPROJ.idl”打開文件，可以看見剛剛定義的方法：

         

 

    9. 雙擊FirstClass.cpp，編輯函數的實現代碼，       *result = para1+para2;

        

 

  10.編譯運行會生成dll ，並會自動注冊到系統中。

二、在VBS中的使用。

Dim obj 
Dim cc

   Set obj = createobject("COMPROJ.FirstClass")
   cc=obj.AddData(100,2)
   msgbox cc    

注：  Set obj = createobject("COMPROJ.FirstClass")  的格式為“工程名.類名”

 

 

參考：https://blog.csdn.net/wangwenjing90/article/details/8771934