ScriptControl控件执行自定义VBS脚本示例分析
2018-10-12 14:09
716 查看
ScriptControl控件-msscript.ocx msscript.oca
'AllowUI:可读写,布尔值,检测是否允许运行用户的接口元素.如果为False,则诸如消息框之类的界面元素不可见.
'CodeObject: 返回宿主被调用的特定的公用成员对象.只读.
'Modules:只读.返回宿主提供给脚本的组件库模块.COM组件通常都是以对象收集的形式向用户提供可以留给用户二次开发的对象集合,每一个收集即一个Modules(模块).
'Language:设置或获取脚本引擎解释的语言,例如:VBScript.JScript.
'Name:返回模块.过程.或者对象的名字,只读属性.
'Procedures:返回模块中定义的过程,只读.
'SitehWnd:窗口句柄,如果本控件以ActiveX控件创建,则此属性为控件的容器;如果是以自动化对象创建,则为0,即桌面.此属性可读写.
'State:设置或返回控件的状态,如果为0,控件只执行语句但不转发事件,为1则为加入的本控件接受的对象转发事件.
'Timeout:设置或返回控件的相应脚本的超时值.当超时值到达时,将引发Timeout事件.也可设为-1,表示无超时设定.
'UseSafeSubset: 设置或返回宿主程序是否关心安全.宿主程序的安全级别可以从此属性设置.
'Error:错误对象,发生错误时,此属性返回一个错误对象.
'AddCode :往一个模块加入一些代码.格式为:AddCode code,可以调用多次.
'AddObject:向一个模块加入一个对象,格式:ScriptControl.AddObject(name, object[,addMembers]),name为欲加入的对象名字,Object为实际的对象,addMembers为可选指示此对象是否为全局对象,False为局部对象.只有往本对象中加入对象后才能在脚本中使用
'Eval:求值表达式.格式为object.eval_r(expression) .
'ExecuteStatement: 解释并执行脚本语句.格式: object.ExecuteStatement statement.
'Reset: 丢弃所有的对象和代码.State属性将为0.
'Run:运行一个指定的过程.格式:object.Run(procedureName,parameters()),procedureName为要运行的过程名,parameters()为参数
'仅有两个事件:error 和TimeOut.前者可以用于错误捕获,后者在脚本得不到响应时发生.
Private Sub Command1_Click()
Dim strFun As String
Dim a, b As Long
a = 2
b = 3
strFun = "function Add(a,b)" & vbCrLf & "Add=a+b" & vbCrLf & "End Function" & vbCrLf
ScriptControl1.Modules.Add "MyCode"
ScriptControl1.Modules.Item(1).AddCode strFun
MsgBox ScriptControl1.Run("Add", a, b)
End Sub
Private Sub Command2_Click()
Dim CodeStr As String
CodeStr = "msgbox 2+3" & vbCrLf
ScriptControl1.ExecuteStatement CodeStr
End Sub
Private Sub Command3_Click() //运行print 运算表达式
Dim CodeStr As String
CodeStr = Text1.Text
CodeStr = Mid(CodeStr, 6)
MsgBox ScriptControl1.Eval(CodeStr)
End Sub
您可能感兴趣的文章:
相关文章推荐
- C#利用ScriptControl动态执行JS和VBS脚本
- C# 利用 ScriptControl 动态执行JS 和VBS脚本
- tampermonkey,采用js解析自定义脚本,实现网页列表数据采集分析
- 如何修复:Windows上面的WScript的脚本(.vbs)不能执行了?
- Android系统Recovery工作原理之使用update.zip升级过程分析(九)---updater-script脚本语法简介以及执行流程
- Android系统Recovery工作原理之使用update.zip升级过程分析(九)---updater-script脚本语法简介以及执行流程
- 启用Xdebug使用WinCacheGrind分析脚本执行时间 .
- [导入]Asp.net 2.0 自定义控件开发[创建自定义右键PopupMenu控件][示例代码下载]
- Asp.net 2.0 自定义控件开发[创建自定义浮动菜单FloadMenu控件][示例代码下载]
- Asp.net 2.0 自定义控件开发[创建自定义HeaderRow的GridView控件][示例代码下载]
- asp.net自定义分页控件示例
- \t\t用C#编写ActiveX控件 自定义html控件 ActiveX 控件注册 标记Activex控件为脚本安全
- (微软脚本引擎)C#利用msscript.ocx控件执行JS脚本
- 远程执行脚本示例
- [李景山php] 深入理解PHP内核[读书笔记]--第二章:用户代码执行--PHP脚本的执行 词法分析和语法分析
- 绝对酷,如何解决asp.net中javascript脚本的问题(使用服务器控件执行客户端脚本)
- Asp.net 2.0 自定义控件开发[创建自定义浮动菜单FloadMenu控件][示例代码下载]
- iphone开发之通过代理模式实现自定义控件——代码示例图片库的处理
- 修复Windows上面的WScript的脚本(.vbs)不能执行了
- Asp.net 2.0 自定义控件开发[创建自定义浮动菜单FloadMenu控件][示例代码下载]