BCB中的程序怎么加入VBScript或JScript脚本来控制。我试过,不好用。哪个帮帮忙,可以再加分

houzh 2001-09-30 02:00:50
我想用脚本控件让自己的程序可以由BVScript 或者JScript控制。但怎么也不行
BCB下使用MSScript控件运行脚本程序
TScriptControl *sc=new TScriptControl(this);
TVariant v;
sc->Reset();
sc->AddCode(code);
sc->Run((wchar_t*)"Hello",v.pparray);//运行到这里老是错
//=========
code如下:
Sub Hello()
MsgBox "Hello"
End Sub
TScriptControl::ExecuteStatement方法执行单个VB语句没问题
...全文
117 12 打赏 收藏 举报
写回复
12 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
houzh 2001-10-26
楼上的,这算什么东西
  • 打赏
  • 举报
回复
Cbfan 2001-10-20
这个简单,请参考:

QuickForm->Lines->Append("<SCRIPT LANGUAGE=\"JavaScript\" defer>");
QuickForm->Lines->Append("var parentwin=external.menuArguments;");
QuickForm->Lines->Append("var doc=parentwin.document;");
QuickForm->Lines->Append("var sel=doc.selection;");
QuickForm->Lines->Append("var rng=sel.createRange();");
QuickForm->Lines->Append("if (doc.activeElement.type==\"text\"||doc.activeElement.type==\"textarea\"||doc.activeElement.type==\"password\")");
QuickForm->Lines->Append("rng.text=\""+ Edit1->Text +"\"");
QuickForm->Lines->Append("</SCRIPT>");
QuickForm->Lines->SaveToFile("QuickForm01.html");

┏━━━━━━ 〓☆★☆★☆〓.............................
┃CTO【首席技术官】 〓☆★☆★☆〓....................
┃ 〓☆★☆★☆〓............
┃▂▃▅▆讨论◆大印▆▅▃▂ 〓☆★☆★☆〓...
┗━━━━━━━━━━━━━━━━━━━━━


  • 打赏
  • 举报
回复
hhhappy 2001-10-20
我的总体感觉是很无奈.
  • 打赏
  • 举报
回复
houzh 2001-10-20
怎么没人知道
  • 打赏
  • 举报
回复
大大怪老张 2001-09-30
推一下好了
  • 打赏
  • 举报
回复
houzh 2001-09-30
拜托各位,既然来了哪怕是跟着UP一下也行。灌水也可。不要让难题无解

大家应该知道Word Excel Access等都可以通过VBScript控制。
我也想用VBScript控制自己的程序。从而使程序更有利于扩展和维护
  • 打赏
  • 举报
回复
houzh 2001-09-30
楼上的,这样怎么可能得分呢。我又不是什么编译错误
  • 打赏
  • 举报
回复
HUANG_JH 2001-09-30
WideString temp;
temp="hello";
sc->Run(temp,v.pparray);

看看

  • 打赏
  • 举报
回复
houzh 2001-09-30
在VB里面调用MSScript控件是没问题的
可以随时输入一个函数或表达式。
并马上让脚本控件执行它。如果是表达式可以算出结果
不用自己编写表达式计算函数
  • 打赏
  • 举报
回复
JWhiteHorse 2001-09-30
up
  • 打赏
  • 举报
回复
JWhiteHorse 2001-09-30
up
  • 打赏
  • 举报
回复
JWhiteHorse 2001-09-30
up
  • 打赏
  • 举报
回复
相关推荐
发帖
C++ Builder
加入

1.3w+

社区成员

C++ Builder相关内容讨论区
社区管理员
  • 基础类社区
申请成为版主
帖子事件
创建了帖子
2001-09-30 02:00
社区公告
暂无公告