LiveCode Forums.

TEDennis wrote:It says "Execute VB Script" -- "Automate programs that are VB-Scipt compatible".

That makes TWO references that make it appear that Revolution can "execute VB Script'.

But, I see no reference to anything like that in any of the 2.7 documentation, or anywhere else.

What does "Execute VB Script" REALLY mean ?

function stsDoVBS pVBScript
  put "C:\VBS_temp.vbs" into tVBSPath
  put pVBScript into url ("file:" & tVBSPath)
  set the hideConsoleWindows to true
  get shell("cscript.exe //nologo" && tVBSPath)
  put it into tResult
  if there is a file tVBSPath then
    send "delete file" && quote & tVBSPath & quote to me in 1 second
  end if
  if tResult <> "" then return tResult
end stsDoVBS

TEDennis wrote:Yeah, that's what I thought it meant.

Being able to "execute VB Script" is a very misleading claim, IMO.

TEDennis wrote:Has anybody done any research into, or had any success invoking, Microsoft Office apps as a Process ? Any ideas on how to implement something like that? I know it can be done with a DLL, but I'm trying to remain "native" if possible so other environments can be "plugged in" without having to write another DLL.

kray wrote: ↑

Thu Apr 27, 2006 5:40 am

TEDennis wrote:It says "Execute VB Script" -- "Automate programs that are VB-Scipt compatible".

That makes TWO references that make it appear that Revolution can "execute VB Script'.

But, I see no reference to anything like that in any of the 2.7 documentation, or anywhere else.

What does "Execute VB Script" REALLY mean ?

It means that you can create VBS files from inside Rev by writing VBScript code to a .vbs file, and then run it with shell(). Here's my compact handler to do all of that (simply pass it the VBScript code and it will do it all for you):

Code: Select all

function stsDoVBS pVBScript
  put "C:\VBS_temp.vbs" into tVBSPath
  put pVBScript into url ("file:" & tVBSPath)
  set the hideConsoleWindows to true
  get shell("cscript.exe //nologo" && tVBSPath)
  put it into tResult
  if there is a file tVBSPath then
    send "delete file" && quote & tVBSPath & quote to me in 1 second
  end if
  if tResult <> "" then return tResult
end stsDoVBS

Have fun!

bogs wrote: ↑

Fri Feb 26, 2021 10:51 pm

You may want to look in the dictionary, a *lot* has changed since a decade and a half ago hee hee

In particular, do as alternateLanguage may have some appeal for you these days...unless, of course, you use 'nix, which means you can't use this

tetsuo29 wrote: ↑

Mon Mar 01, 2021 7:13 pm

So.. I'm guessing you missed the part of my post where I mention that the code I'm generating was running way too slowing using "do as vbscript"?

bogs wrote: ↑

Fri Feb 26, 2021 10:51 pm

You may want to look in the dictionary, a *lot* has changed since a decade and a half ago hee hee

In particular, do as alternateLanguage may have some appeal for you these days...unless, of course, you use 'nix, which means you can't use this

FourthWorld wrote: ↑

Mon Mar 01, 2021 7:40 pm

The alternateLanguage option was added much later, originally to accommodate Apple's AppleScript, which (like so much from Apple in those days) didn't use common conventions like stdIn/stdOut.