Return to BSD News archive
Newsgroups: alt.fan.bill-gates,comp.os.ms-windows.nt.misc,comp.os.ms-windows.win95.misc,comp.os.os2.advocacy,comp.sys.mac.advocacy,alt.org.team-os2,alt.destroy.microsoft,comp.os.linux.advocacy,comp.unix.bsd.freebsd.misc
Path: euryale.cc.adfa.oz.au!newshost.anu.edu.au!harbinger.cc.monash.edu.au!news.rmit.EDU.AU!news.unimelb.EDU.AU!munnari.OZ.AU!spool.mu.edu!howland.reston.ans.net!newsfeed.internetmci.com!in2.uu.net!mail2news.alias.net!myriad!mylinuxbox!suck!netcom.com!petrich
From: petrich@netcom.com (Loren Petrich)
Subject: Re: Why no M$ AppleScript or Rexx imitations?
Message-ID: <petrichDs78Mx.6G0@netcom.com>
Organization: NETCOM On-line Communication Services (408 261-4700 guest)
References: <4mlpnf$d4p@sidhe.memra.com> <petrichDs5Fv9.5Cr@netcom.com> <4ohcuv$772@ari.ari.net> <4oi5m1$5un@orion.cybercom.net>
Date: Thu, 30 May 1996 03:35:21 GMT
Lines: 83
Sender: petrich@netcom10.netcom.com
Xref: euryale.cc.adfa.oz.au alt.fan.bill-gates:22740 comp.os.ms-windows.nt.misc:108088 comp.os.ms-windows.win95.misc:143320 comp.os.os2.advocacy:206089 comp.sys.mac.advocacy:110000 comp.os.linux.advocacy:50495 comp.unix.bsd.freebsd.misc:20333
In article <4oi5m1$5un@orion.cybercom.net>,
Jerry Shekhel <jerry@cybercom.net> wrote:
>I guess Cory's never seen VB in conjunction with OLE Automation. "This
>can't be scripting, there's no text screen, no Emacs, no pipes??? I'm
>soooo confused!!! Time to think of a clever way to bash Microsoft!!!"
What's Visual Basic? And what exactly is OLE Automation? VB is
not included in any variety of Windoze, as far as I know. And is VB
*anything* like the old computer language "BASIC"? The one that still
gets included with DOS?
Does VB work like AppleScript? Here's an example of an AppleScript
I just recorded with Apple's Script Editor; I set it to "Record" and
performed all the actions you see recorded below, and even some that did
not get recorded :-) Note: there are some special characters that will
come out right with a MacOS-specific font, but not necessarily others,
such as my terminal emulator's font.
tell application "Finder"
activate
select disk "Niki Harris"
open selection
select folder "Marathon Stuff" of disk "Niki Harris"
open selection
select folder " Marathon 2 Ä" of folder "Marathon Stuff" of disk
"Niki Harris"
open selection
select {file "Marathon 2" of folder " Marathon 2 Ä" of folder
"Marathon Stuff" of disk "Niki Harris", file "Map" of folder " Marathon 2
Ä" of folder "Marathon Stuff" of disk "Niki Harris", file "Shapes" of
folder " Marathon 2 Ä" of folder "Marathon Stuff" of disk "Niki Harris",
file "Sounds" of folder " Marathon 2 Ä" of folder "Marathon Stuff" of
disk "Niki Harris", file "Music" of folder " Marathon 2 Ä" of folder
"Marathon Stuff" of disk "Niki Harris", file "Images" of folder "
Marathon 2 Ä" of folder "Marathon Stuff" of disk "Niki Harris"}
open information window of selection
close information window of file "Images" of folder " Marathon 2
Ä" of folder "Marathon Stuff" of disk "Niki Harris"
close information window of file "Music" of folder " Marathon 2
Ä" of folder "Marathon Stuff" of disk "Niki Harris"
close information window of file "Sounds" of folder " Marathon 2
Ä" of folder "Marathon Stuff" of disk "Niki Harris"
close information window of file "Shapes" of folder " Marathon 2
Ä" of folder "Marathon Stuff" of disk "Niki Harris"
close information window of file "Map" of folder " Marathon 2 Ä"
of folder "Marathon Stuff" of disk "Niki Harris"
close information window of file "Marathon 2" of folder "
Marathon 2 Ä" of folder "Marathon Stuff" of disk "Niki Harris"
select disk "Audio CD 1"
open information window of selection
close information window of disk "Audio CD 1"
select file "infinity.html" of folder "Marathon Stuff" of disk
"Niki Harris"
open selection
activate
select file "M2_Preview.sit" of folder "Marathon Stuff" of disk
"Niki Harris"
open selection
set position of file "Absolutely DO NOT Read This!" of folder
"Marathon Stuff" of disk "Niki Harris" to {386, 396}
end tell
tell application "StuffIt Deluxeª"
activate
close archive 1
quit
end tell
tell application "Finder"
activate
copy file "Absolutely DO NOT Read This!" of folder "Marathon
Stuff" of disk "Niki Harris" to folder " Marathon 2 Ä" of folder
"Marathon Stuff" of disk "Niki Harris"
empty trash
select item "Absolutely DO NOT Read This!" of folder "Marathon Stuff"
of disk "Niki Harris"
set name of selection to "Absolutely DO NOT Read This!!!"
end tell
--
Loren Petrich Happiness is a fast Macintosh
petrich@netcom.com And a fast train
My home page: http://www.webcom.com/petrich/home.html
Mirrored at: ftp://ftp.netcom.com/pub/pe/petrich/home.html