FIX: ScriptControl 報告無效的語言為在 MFC 中的 VBScript

文章翻譯 文章翻譯
文章編號: 184977 - 檢視此文章適用的產品。
全部展開 | 全部摺疊

在此頁中

徵狀

裝載 ScriptControl 物件在 MFC 應用程式中的時, 您可能會收到下列錯誤訊息:
無法完成作業,因為指令碼引擎尚未初始化成有效的語言。
即使您先前設定語言 VBScript 來使用 SetLanguage 方法,就會發生這個問題。如果您指定 JScript 或 JavaScript 作為語言 ScriptControl 物件,不會發生這個錯誤。

發生的原因

裝載控制項 (以及不只是簡單的自動化物件) 時, ScriptControl 物件無法正確初始化本身,如果指定的語言是 VBScript。

解決方案

這裡有兩種解決方法:
  • 清除語言設定它之前:

    右之前呼叫 ScriptControl::SetLanguage("VBScript") 新增 ScriptControl::SetLanguage(NULL) 的呼叫。
  • 自動化 ScriptControl 物件:

    或者,使用 [ScriptControl 應用程式可以切換到自動化指令碼控制只是為自動化物件,而不成熟的控制項。這也有的解決 Bug 指示這個發行項,以及改善效能的好處。用戶端應用程式並不需要經過 ActiveX 的額外負荷控制項裝載的本質上是不是為 「 非-UI 指令碼控制項必要的交涉。
下面是一段的範例程式碼使用 Visual C++ 5.0 COM 支援輕鬆 CoCreateInstance [ScriptControl 並啟動它。

範例程式碼

// Import Type Info from Script OCX - point path to the
// location of the Script Control on your development computer.
#import "C:\Program Files\Microsoft Script Control\msscript.ocx"

void CScrptctrlView::OnInitialUpdate()
{
   CView::OnInitialUpdate();

   OleInitialize(NULL); // Only if you haven't done this already
                        // or called AfxOleInit.
   using namespace MSScriptControl;
   try  // Make sure exception handling is turned on.
   {
      _bstr_t bstrLanguage(L"VBScript");
      _bstr_t bstrCode(L"MsgBox \"Hello World\"");

      // Create the Script Control, initialize Language, and
      // add code for processing.
      IScriptControlPtr spScriptCtl(__uuidof(ScriptControl));
      spScriptCtl->put_Language(bstrLanguage);
      spScriptCtl->AddCode(bstrCode);
   }
   catch(_com_error e)
   {
      TRACE(_T("Error (%08x) in %s: %s\n"), e.Error(),
                           e.Source(), e.Description());
   }
}
				

狀況說明

Microsoft 已確認這是在本文開頭所列之 Microsoft 產品中的有錯誤。這個 Bug 已經在 Microsoft Internet Explorer 5 中獲得修正。

其他相關資訊

重製行為的步驟

  1. 建立新的 MFC SDI 應用程式使用預設 AppWizard 設定包括 ActiveX 控制項的支援。
  2. 透過選取 「 ScriptControl 物件 」 從註冊 ActiveX 控制項 」 資料夾下 [Project\Add Project\Components 和控制項的功能表項目,插入 [ScriptControl。接受所有預設值,請依照下列的對話方塊上。
  3. 在檢視的此 OnInitialUpdate] 方法插入下列程式碼:
    // Import Type Info from Script OCX - point path to the
    // location of the Script Control on your development computer.
    #import "C:\Program Files\Microsoft Script Control\msscript.ocx"
    
    void CScrptctrlView::OnInitialUpdate()
    {
      CView::OnInitialUpdate();
    
      OleInitialize(NULL); // Only if you haven't done this already
                           // or called AfxOleInit.
      using namespace MSScriptControl;
      try  // Make sure exception handling is turned on.
      {
         _bstr_t bstrLanguage(L"VBScript");
         _bstr_t bstrCode(L"MsgBox \"Hello World\"");
    
         // Create the Script Control, initialize Language, and
         // add code for processing.
         IScriptControlPtr spScriptCtl(__uuidof(ScriptControl));
         spScriptCtl->put_Language(bstrLanguage);
         spScriptCtl->AddCode(bstrCode);
      }
      catch(_com_error e)
      {
         TRACE(_T("Error (%08x) in %s: %s\n"), e.Error(),
                              e.Source(), e.Description());
      }
    }
    						
  4. 新增一個 # include 新指令碼控制項類別的檔名,Scriptcontrol.h,到檢視] 和 [# define ID_SCRIPT_CONTROL 您 Resource.h 中。建置並執行應用程式。

?考

如需詳細資訊請參閱下列的發行項 「 Microsoft 知識庫 」 中:
184904FILE: MSSCPCTL.EXE 指令碼控制項標頭檔 MSSCPCTL.H
如需詳細資訊請參閱下列全球資訊網網址 URL:
http://msdn2.microsoft.com/en-us/library/ms950396.aspx

屬性

文章編號: 184977 - 上次校閱: 2007年8月8日 - 版次: 2.2
這篇文章中的資訊適用於:
  • Visual Basic Scripting 版 3.0
  • Microsoft Visual C++ 5.0 Enterprise Edition
  • Microsoft Visual C++ 5.0 Professional Edition
關鍵字:?
kbmt kbbug kbfix kbie500fix KB184977 KbMtzh
機器翻譯
重要:本文是以 Microsoft 機器翻譯軟體翻譯而成,而非使用人工翻譯而成。Microsoft 同時提供使用者人工翻譯及機器翻譯兩個版本的文章,讓使用者可以依其使用語言使用知識庫中的所有文章。但是,機器翻譯的文章可能不盡完美。這些文章中也可能出現拼字、語意或文法上的錯誤,就像外國人在使用本國語言時可能發生的錯誤。Microsoft 不為內容的翻譯錯誤或客戶對該內容的使用所產生的任何錯誤或損害負責。Microsoft也同時將不斷地就機器翻譯軟體進行更新。
按一下這裡查看此文章的英文版本:184977
Microsoft及(或)其供應商不就任何在本伺服器上發表的文字資料及其相關圖表資訊的恰當性作任何承諾。所有文字資料及其相關圖表均以「現狀」供應,不負任何擔保責任。Microsoft及(或)其供應商謹此聲明,不負任何對與此資訊有關之擔保責任,包括關於適售性、適用於某一特定用途、權利或不侵權的明示或默示擔保責任。Microsoft及(或)其供應商無論如何不對因或與使用本伺服器上資訊或與資訊的實行有關而引起的契約、過失或其他侵權行為之訴訟中的特別的、間接的、衍生性的損害或任何因使用而喪失所導致的之損害、資料或利潤負任何責任。
依現狀不再更新的知識庫內容免責聲明
本文旨在說明 Microsoft 不再提供支援的產品。因此,本文係依「現狀」提供,不會再更新。

提供意見

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com