2014-06-23 46 views
0

遇到问题,无法在线找到更具体的解决方案。VBScript ScriptControl对变量的评估

我有这样

pictureFolderFullPath = "C:\Work" 

'Create Script Control Obj 
Dim sc As ScriptControl 
Set sc = CreateObject("ScriptControl") 
sc.Language = "VBScript" 

Dim content As String 
content = sc.Eval("pictureFolderFullPath & "\3.jpg"") 

然后表达,含量变代替具有图片的全路径仅“\ 3.JPG”,

+1

您必须将picturefolderpath添加到脚本的命名空间。 'sc.AddObject“frmSDI”,frmSDI,True' – phd443322

+0

好吧。我尝试添加行sc.AddObject(“pictureFolderFullPath”,pictureFolderFullPath,True),但它表示预期= – user3759627

+0

您添加模块,而不是变量。 – phd443322

回答

1

使运行时可用的功能到脚本引擎。

语法

ScriptControl.AddObject(name, object[, addMembers]) 

AddObject方法具有以下几个部分:

部分描述

name Required. Name by which the added object is to be known in ScriptControl code. 
object Required. Name of the object exposed at run time. 
addMembers Optional. Boolean value. True if members of object are globally accessible; False if they are not. 

备注

使用AddObject方法使运行时功能对脚本引擎可用。 AddObject方法使ScriptControl用户能够向脚本代码提供一组名称/对象。脚本引擎可以以任何方式公开名称。在VBScript和JScript中,每个名称都显示为全局可访问的名称。