多线程运行js脚本返回空

yya

在易语言里运行js脚本，一般情况 下正常返回，但是放到多线程里js脚本始终返回空，这是怎么回事呢？
我的代码：

  

常量名称	常量值	公 开	备 注
js	<文本长度: 33>

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
js	对象

js.创建 (“ScriptControl”, )
js.写属性 (“Language”, “javascript”)
js.方法 (“AddCode”, #js )
调试输出 (js.通用方法 (“run”, “a”, “AA”).取文本 ())

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> <br /> .常量 js, "<文本长度: 33>"<br /> .版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1<br /> .局部变量 js, 对象<br /> <br /> js.创建 (“ScriptControl”, )<br /> js.写属性 (“Language”, “javascript”)<br /> js.方法 (“AddCode”, #js)<br /> 调试输出 (js.通用方法 (“run”, “a”, “AA”).取文本 ())

非多线程的

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

子程序1 ()
返回 (0)  ' 可以根据您的需要返回任意数值

.版本 2<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> <br /> 子程序1 ()<br /> 返回 (0)  ' 可以根据您的需要返回任意数值

多线程的

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

计次循环首 (2, )
启动线程 (&子程序1, , )
延时 (1000)
计次循环尾 ()
返回 (0)  ' 可以根据您的需要返回任意数值

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> <br /> .计次循环首 (2, )<br />     启动线程 (&子程序1, , )<br />     延时 (1000)<br /> .计次循环尾 ()<br /> 返回 (0)  ' 可以根据您的需要返回任意数值

附上代码：
多线程js脚本.rar (1.15 KB, 下载次数: 12)

2015-1-7 10:43 上传

点击文件名下载附件

caoljie

  

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
js	对象

CoInitialize (0)
js.创建 (“ScriptControl”, )
js.写属性 (“Language”, “javascript”)
js.方法 (“AddCode”, #js )
调试输出 (js.通用方法 (“run”, “a”, “AA”).取文本 ())
js.清除 ()
CoUninitialize ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1<br /> .局部变量 js, 对象<br /> <br /> CoInitialize (0)<br /> js.创建 (“ScriptControl”, )<br /> js.写属性 (“Language”, “javascript”)<br /> js.方法 (“AddCode”, #js)<br /> 调试输出 (js.通用方法 (“run”, “a”, “AA”).取文本 ())<br /> js.清除 ()<br /> CoUninitialize ()

多线程js脚本.zip (1.25 KB, 下载次数: 72)

2015-1-7 10:56 上传

点击文件名下载附件



补充内容 (2015-1-7 10:57):
多线程对象创建初始化要加上   CoInitialize (0)    尾部要加    CoUninitialize ()  两个DLL命令