Click the links below to explore the different sections of our site. If you have any questions about our products or services, don't hesitate to contact us.
Following are a number of links to pages that might interest you as a visitor of this web site.
copyright © 2005-07 by Mark Schonewille & Economy-x-Talk

Economy-x-Talk - Sample Scripts

Activate Application

This script uses Visual Basic to bring an application to front. It does so by saving a VB script to the hard disk and running this scipt. Afterwards, the VB script is deleted. This is a windows-only script. For Mac, use AppleScript.





on VBS_AppActivate pTitleOrID
  put format("set WshShell = WScript.CreateObject(\"WScript.Shell\")") into tVBS
  if isNumber(pTitleOrID) then
    put tVBS & cr & "WshShell.AppActivate" && pTitleOrID into tVBS
  else
    put tVBS & cr & "WshShell.AppActivate" && quote & pTitleOrID & \
      quote into tVBS
  end if
  put "C:\vbs_temp.vbs" into tVBSPath
  put tVBS 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 "Error: " & tResult
end VBS_AppActivate





Keep this extensive resource of tutorials and samples on-line! Support RunRev.info!
Yes, this script is useful. I make a donation and choose freely how much I want to donate on-line (PayPal). Click here if you want to make a donation in dollars.This script has not (completely) solved my problem and I want Economy-x-Talk to take care of it. Let me contact you.
Copyright©2002-2008 by Mark Schonewille, Nijmegen, the Netherlands. This web site is in no way affiliated with Runtime Revolution Ltd., but we do recommend the Revolution development platform.