人人做人人澡人人爽欧美,国产主播一区二区,久久久精品五月天,羞羞视频在线观看免费

當前位置:蘿卜系統下載站 > 技術開發教程 > 詳細頁面

在C#中調用VBScript等腳本的完成(上)

在C#中調用VBScript等腳本的完成(上)

更新時間:2022-07-29 文章作者:未知 信息來源:網絡 閱讀次數:


以前在做工作流(workflow)項目的時候,里面有一項就是在用戶制定流程定義時可以編寫腳本來控制活動的跳轉,而這些腳本定義后存在數據庫中,當流程啟動的時候,工作流引擎會控制活動執行順序,串型的兩個活動比較簡單,但有的活動到下一個活動有條件判斷,或者存在多個分支,簡單的還好,只要在數據庫表中加個字段就可以實現,復雜一點的就需要通過腳本實現了。當時經驗不夠,幾天都沒找到快速的解決辦法,想自己寫一個自定義腳本引擎沒有把握,而且時間也不夠,還是在網上找找看吧,花了一些時間,還是找到了一個自認為比較好的解決辦法,寫出來同大家分享。
  下面通過兩部分來說明實現以及應用。  一.使用MSScriptControl  到微軟的網站上下載Windows Script Control,它是一個ActiveX(R) 控件,所以在.NET中使用我Interop了一下。下載安裝完成后,新建一個C#的Windows應用程序項目,在解決方案資源管理器中選中引用節點,右鍵點擊選擇添加引用菜單,彈出添加引用對話框,單擊瀏覽找到安裝Windows Script Control的目錄,選取msscript.ocx文件確定。那么在引用節點下會增加一個MSScriptControl組件,下面是他Interop后的所有對象。  ScriptControl 對支持 ActiveX(TM) Script 的宿主 Script 引擎提供簡單接口。接下來我們對被轉化成ScriptControlClass類的ScriptControl的屬性和方法進行一些說明。  屬性  AllowUI 屬性:應用于 ScriptControl 本身或 Scirpt 引擎顯示的用戶界面元素,可讀寫。  CodeObject 屬性:返回對象,該對象用于調用指定模塊的公用成員。只讀。  Error 屬性:返回 Error 對象,其中包含所發生的最后一個錯誤的相關詳細信息。只讀。  Language 屬性:設置或返回正在使用的 Script 語言名稱。可讀寫。  Modules 屬性:為 ScriptControl 對象返回模塊集合。只讀。  Procedures 屬性:返回在指定模塊中定義的過程集合。只讀。  SitehWnd 屬性:設置或返回窗口的 hWnd,通過執行 Script 代碼,此窗口用于顯示對話框和其他用戶界面元素。可讀寫。  State 屬性:設置或返回 ScriptControl 對象的模式。可讀寫。  Timeout 屬性:設置或返回時間(毫秒),此時間后用戶可選擇中止 Script 代碼的執行或允許代碼繼續執行。可讀寫。  UseSafeSubset 屬性:設置或返回 Boolean 值,指明宿主應用程序是否有保密性要求。如果宿主應用程序需要安全控制,則 UseSafeSubset 為 True,否則為 False。可讀寫。  方法  AddCode 方法:向模塊添加指定代碼。可多次調用 AddCode 方法。  AddObject 方法:使主機對象模型對 Script 引擎可用。  Eval 方法:計算表達式并返回結果。  ExecuteStatement 方法:執行指定的語句。  Reset 方法:放棄所有已經添加到 ScriptControl 中的 Script 代碼和對象。  Run 方法:運行指定過程。  事件  Error 事件:出現運行時錯誤時,發生此事件Timeout 事件:當超出了 Timeout 屬性指定的時間且用戶在結果對話框中選定了 End 時,發生此事件。  補充幾點  AllowUI 屬性如果設置為false,則顯示對話框之類的語句不起作用,如在 VBScript 中MsgBox 語句,JavaScript中的alert等,并且如果執行的腳本超出TimeOut設置的毫秒數,也不會跳出超出時間提醒的對話框,反之則相反;重新設置 Language 屬性會清空AddCode加載的代碼;對于TimeOut屬性,發生超時時,ScriptControl 檢查對象的 AllowUI 屬性,確定是否允許顯示用戶界面元素。  如果讀者需要更詳細的了解,可以查看MSDN文檔。  為了使控件更容易使用,我用一個ScriptEngine類包裝了一下,下面是完整代碼:
  using System;  using MSScriptControl;  using System.Text;  namespace ZZ  {     /// <summary>     /// 腳本類型     /// </summary>     public enum ScriptLanguage     {         /// <summary>         /// JScript腳本語言         /// </summary>         JScript,         /// <summary>         /// VBscript腳本語言         /// </summary>         VBscript,         /// <summary>         /// JavaScript腳本語言         /// </summary>         JavaScript     }     /// <summary>/// 腳本運行錯誤代理     /// </summary>     public delegate void RunErrorHandler();     /// <summary>     /// 腳本運行超時代理     /// </summary>     public delegate void RunTimeoutHandler();     /// <summary>     /// ScriptEngine類     /// </summary>     public class ScriptEngine     {         private ScriptControl msc;          //定義腳本運行錯誤事件         public event RunErrorHandler RunError;         //定義腳本運行超時事件         public event RunTimeoutHandler RunTimeout;         /// <summary>         ///構造函數         /// </summary>         public ScriptEngine():this(ScriptLanguage.VBscript)         {         }         /// <summary>         /// 構造函數         /// </summary>         /// <param name="language">腳本類型</param>         public ScriptEngine(ScriptLanguage language)         {              this.msc = new ScriptControlClass();              this.msc.UseSafeSubset = true;this.msc.Language = language.ToString();              ((DScriptControlSource_Event)this.msc).Error += new DScriptControlSource_ErrorEventHandler(ScriptEngine_Error);              ((DScriptControlSource_Event)this.msc).Timeout += new DScriptControlSource_TimeoutEventHandler(ScriptEngine_Timeout);         }         /// <summary>         /// 運行Eval方法         /// </summary>         /// <param name="expression">表達式</param>         /// <param name="codeBody">函數體</param>         /// <returns>返回值object</returns>         public object Eval(string expression,string codeBody)         {              msc.AddCode(codeBody);              return msc.Eval(expression);         }         /// <summary>         /// 運行Eval方法         /// </summary>         /// <param name="language">腳本語言</param>         /// <param name="expression">表達式</param>         /// <param name="codeBody">函數體</param>         /// <returns>返回值object</returns>         public object Eval(ScriptLanguage language,string expression,string codeBody)         {              if(this.Language != language)                   this.Language = language;              return Eval(expression,codeBody);         }         /// <summary>         /// 運行Run方法/// </summary>         /// <param name="mainFunctionName">入口函數名稱</param>         /// <param name="parameters">參數</param>         /// <param name="codeBody">函數體</param>         /// <returns>返回值object</returns>         public object Run(string mainFunctionName,object[] parameters,string codeBody)         {              this.msc.AddCode(codeBody);              return msc.Run(mainFunctionName,ref parameters);          }         /// <summary>         /// 運行Run方法         /// </summary>         /// <param name="language">腳本語言</param>         /// <param name="mainFunctionName">入口函數名稱</param>         /// <param name="parameters">參數</param>         /// <param name="codeBody">函數體</param>         /// <returns>返回值object</returns>         public object Run(ScriptLanguage language,string mainFunctionName,object[] parameters,string codeBody)         {              if(this.Language != language)                   this.Language = language;              return Run(mainFunctionName,parameters,codeBody);         }         /// <summary>         /// 放棄所有已經添加到 ScriptControl 中的 Script 代碼和對象         /// </summary>         public void Reset()         {              this.msc.Reset();

溫馨提示:喜歡本站的話,請收藏一下本站!

本類教程下載

系統下載排行

網站地圖xml | 網站地圖html
主站蜘蛛池模板: 江安县| 博白县| 石屏县| 邵阳市| 黑山县| 革吉县| 虞城县| 望城县| 穆棱市| 三明市| 汝城县| 延吉市| 黄浦区| 宽城| 东源县| 建德市| 中卫市| 建瓯市| 黔南| 东阿县| 马关县| 辽宁省| 新平| 莱西市| 都匀市| 白银市| 东源县| 聂荣县| 太保市| 安达市| 惠东县| 东兰县| 民勤县| 改则县| 綦江县| 宝丰县| 万年县| 盐城市| 余干县| 雅安市| 尚志市|