Basic AppleScript Dialog: display dialog "Your text here" with icon stop buttons {"OK"} default button {"OK"} giving up after 5
'giving up after 5' will automatically close the script after the indicated interval of time has elapsed.
|
Formatting and Editing Text Objects with Word 2008
While Microsoft has its own scripting language (Visual Basic for Applications or ‘VBA’) to do all (most) of the same things as presented here, it is rather clunky and difficult to use compared with the more natural syntax of AppleScript.
Here we will look at some of the most necessary scripting elements for Word 2008 through a single document named ‘MyText.doc’.
First creating and opening the newly created document:
tell application "Microsoft Word"
activate
set createDoc to make new document
set name of font object of text object of createDoc to "Lucida Grande"
set size of font object of text object of createDoc to "14"
save as createDoc file name "MyText.doc"
open createDoc
end tell
‘set createDoc to make new document’ creates the new document and places a file reference to the new document into the variable ‘createDoc’
Once that reference to the document is made, you can direct individual statements to the reference named createDoc or within a tell block:
tell createdoc
...
end tell

Now, let’s look at a few ways that you can edit text in the document given this initial text:
It was a stormy day as I set out on my journey to learn how to write my first AppleScript with Microsoft Word 2008.
tell createDoc
select word 4 of createDoc (or select word 4 of active document)
set bold of font object of selection to true
set content of text object of selection to "sunny"
end tell
This results in:
It was a sunny day as I set out on my journey to learn how to write my first AppleScript with Microsoft Word 2008.
The fourth word is selected, its font style set to bold, and its content changed to ‘sunny’.
Note that changing styles of the selected text requires the use of the expression ‘font object’ and to replace the content with the word ‘sunny’ you must use ‘text object’.
Then to add text to the end of the document by way of a text entry dialog:
set appendText to text returned of (display dialog "Enter text to append to the end of this document:" default answer "" buttons {"Cancel","Insert"} default button "Insert")
set appendText to (return & return & appendText)
insert text appendText at end of text object of active document

New Document with Microsoft Word 2004 | New Document with AppleWorks 6 | Enhanced – New Doc for AppleWorks 6
Learn How To Make Money Blogging – Blog Mastermind
Six-figure Yaro Starak Teaches You How To Set Up And Profit From A Successful Blog. Start Making Money From Blogs By Following This Step-by-step, Weekly Coaching Program
http://www.blogmastermind.com/coaching/
Give me your opinion on my site: hyperscripter@gmail.com or http://twitter.com/hyperscripter.
|
 
HTML Guide from Peachpit Press
 iPhoto 6
Create Multiple Folders with Terminal
If you are more of a techy kind of person and are comfortable with using Terminal, here is a script you can use to easily create multiple folders:
First, for a single folder, type in: mkdir "Folder 1"
--or whatever you want to name your folder, this creates a new directory, which, in effect is a new folder.
To place multiple items in the 'Documents' folder:
cd/Users/
Administrator/
Documents
mkdir "Folder 1" "Folder 2"
"Folder 3"
To quickly create multiple folders, create a text file with the desired folder names (as many as you want) and name it something like 'folderList.txt'. Next type this in Terminal:
cat folderList.txt |xargs mkdir
Or you could create folders with the same prefix by entering:
mkdir "Invoices " {"Corporate", "Individual", "Pro-Bono"}
Digg This!!
An AppleScript to Verify a Date Run this in the Script Editor:
set dateRecord to (current date)
set defaultDate to (date string of dateRecord)
try
set apptDate to text returned of (display dialog "Enter appointment date:" default answer defaultDate buttons {"Set"} default button {"Set"})
set datetext to apptDate as text
date apptDate --if an invalid date is entered, the next dialog is aborted and it triggers the error alert below.
display dialog datetext & " is a valid date." with icon note buttons {"OK"} default button {"OK"}
on error
set alertText to "An error has occurred!"
set messageText to quote & datetext & quote & " is an invalid date."
display alert alertText message messageText as warning buttons {"OK"} default button "OK" giving up after 15
return
end try
|
 Concept Drawing for iMac prior to Production
Fun HTML Use this to add interest to your pages, but be careful, if you overdo it, it can make your page look gaudy, if not ridiculous!
Read All About It
Here's is the code as it appears above:
<p align="center" style="padding: 5px; background-color: #FFCE9C; border: dotted 5px #FFCE9C;"><marquee width=20% behavior=scroll direction=left loop=infinite> Latest Headlines... </marquee><blink>Read All About It</blink>/p>
Check out this color HTML!!!
AppleScript for Setting System Volume Copy and paste this into the Script Editor and try it out:
set defaultVolume to "3"
set volumeLevel to text returned of ¬
(display dialog ¬
"Set the system volume to (7 is the highest):"¬
default answer defaultVolume with icon note¬
buttons {"OK"} default button "OK") as integer
set volumeValues to {0, 1, 2, 3, 4, 5, 6, 7} ¬
as list
if volumeLevel is not in volumeValues then ¬
set volumeLevel to defaultVolume
tell application "Finder"
try
set volume volumeLevel
beep 2
on error errDlog
display dialog errDlog with icon stop ¬
buttons {"Abort"} default button ¬
"Abort" giving up after 15
end try
end tell
Earn Wealth on Internet
Learn Tips and Tricks to Making Money on the Internet
www.internetwealth.com
Learn How To Make Money Blogging - Blog Mastermind
Six-figure Yaro Starak Teaches You How To Set Up And Profit From A Successful Blog. Start Making Money From Blogs By Following This Step-by-step, Weekly Coaching Program
http://www.blogmastermind.com/coaching/
Seo Elite: New Seo Software!
The Grand Daddy Of All Seo Software!
Get A Top 5 Google Ranking In Under 30 Days!
http://www.seoelite.com/
Turn Your Photos Into Cash
All You Need Is A Digital Camera, A Computer And An Internet Connection To Get Started Making Extra Income Every Month!
http://turnyourphotosintocash.com/
Infinite Income Plan - Instant Wealth Guide & CDs.
Easy Money For Affiliates, Huge 8.3% Conversions On Generic Traffic. Massive 70% Commissions Plus
HyperCard AppleScript Users:
Heres an AppleScript for backing up a selected group of HyperCard files. this was used in one of my HyperCard stacks, but could be adapted for use in OSX programs with little or no modification:
send "suiteBkp(true)" to bg btn "BackupSuite"
--Use this line to call the handler below (true displays a notification dialog when the process is complete, you must have a button named bg btn "BackupSuite"):
on suiteBkp(theBoolean)
copy line 1 of field "selectedFolder" to theHFFolderPath --You'll need a hidden field named "selectedFolder" that a script (prior to the call) will place the path to the desired folder in.
tell application "Finder"
activate
set todaysDate to (current date)
set bkpYear to (year of todaysDate)
set monthlyBkp to ("Monthly Reports_" & bkpYear) as string
if exists (folder "HyperCard Backup") then
select folder "HyperCard Backup"
delete selection
end if
if exists (folder "HyperCard Backup" of folder theHFFolderPath) then
select folder "HyperCard Backup" of folder theHFFolderPath
delete selection
end if
make new folder at folder theHFFolderPath with properties {name:"HyperCard Backup"}
select {file "Appointments" of folder theHFFolderPath, ¬ file "HyperFile" of folder theHFFolderPath, ¬ file "Outstanding Invoices" of folder theHFFolderPath, ¬ file "Year" of folder theHFFolderPath, ¬ file monthlyBkp of folder theHFFolderPath, ¬
copy selection to folder "HyperCard Backup" of folder theHFFolderPath
select folder "HyperCard Backup" of folder theHFFolderPath
select file "Appointments" of folder ¬ "HyperFile Suite Backup" of folder theHFFolderPath
set name of selection to "Appointments.bkp"
select file "HyperFile" of folder "HyperCard Backup" of ¬ folder theHFFolderPath
set name of selection to "HyperFile.bkp"
select file "Outstanding Invoices" of ¬ folder "HyperFile Suite Backup" of folder theHFFolderPath
set name of selection to "Outstanding Invoices.bkp"
select file "Year" of folder "HyperFile Suite Backup" of ¬ folder theHFFolderPath
set name of selection to "Year.bkp"
set prefMonthlyBkp to (monthlyBkp & ".bkp") as string
select file monthlyBkp of folder "HyperFile Suite Backup" of ¬ folder theHFFolderPath
set name of selection to prefMonthlyBkp
select folder "HyperFile Suite Backup" of folder "The HyperFile Folder"
move selection to desktop
end tell
if theBoolean = "true" then
tell application "HyperCard"
activate
display dialog ¬ "Your backup has been saved to desktop." buttons {"Done"} default button {"Done"} with icon 129 giving up after 10
end tell
end if
end suiteBkp
more HyperTalk
 Macintosh Plus (late 1984), followed close behind the Mac 512k
 The classic Apple IIc (1981), part of a series of Apple computers that preceded the debut of the Macintosh
HyperCard Users Corner:
Here's a simple, but very useful little HyperTalk script for verifying the validity of a date entered by a user, assuming that you have a menu item "flag date..." (or whatever you choose to name it) or it could be altered slightly and placed within a mouseUp statement:
if menuItem = "Flag Date..." then
global tryDate
ask "Enter a date for your new appointment:" with the long date
if it ≠ "" and the result ≠ "Cancel" then
put it into tryDate
else
put "" into tryDate
exit doMenu
end if
if invalidDate() then
answer "The date entered is not valid!"
put "" into tryDate
exit doMenu
end if
--Here you would put the statements to execute if the entered date proves to be valid
put "" into tryDate
end if
function invalidDate
global tryDate
convert tryDate to short date
if the result = "invalid date" then
return true
else
return false
end if
end invalidDate
more HyperTalk

 Mac SE (circa 1987), was a more advanced version of the Mac Plus and had an internal hard drive.
YouTube Video Search Script:
tell application "Finder"
try
set webSearch to text returned of (display dialog "Enter YouTube Video
Search" default answer "" buttons {"Search", "Cancel"} default button 1)
open location "http://www.youtube.com/results?search_query=" & webSearch
on error theError
display dialog theError
end try
end tell
|
I’m really enjoying the design and layout of your site. It’s a very easy on the eyes which makes it much more enjoyable for me to come here and visit more often. Did you hire out a designer to create your theme? Superb work!…
I simply want to mention I am just newbie to blogging and site-building and honestly liked this web blog. Likely I’m planning to bookmark your site . You really come with amazing writings. Kudos for revealing your blog.
I simply want to mention I am newbie to blogging and really enjoyed this web blog. More than likely I’m going to bookmark your blog post . You really come with tremendous article content. Regards for revealing your website page.
I simply want to tell you that I’m beginner to blogs and certainly savored your web page. Probably I’m planning to bookmark your site . You definitely come with awesome articles. Thanks for sharing with us your web page.
I utterly love this piece of text. I must say that I actually agree with Johns comment above.
Thanks for the auspicious writeup. It in reality was once a leisure account it. Look complex to more brought agreeable from you! By the way, how can we keep up a correspondence?
Excellent! I thank you your input to this matter. It has been insightful. my blog: horoscope love compatibility
Paintball has got to be one of the most enjoyable and adventurous games to play that I have ever experienced. There’s a really good reason why it has become so popular. If you haven’t tried it yet, then you don’t know what you are missing.
Do you mind repost this to one of my sites on this topic? I’d link back to the original, of course. Let me know what you think.
Wow! Your site has a ton readers. How did you get so many viewers to view your blog I’m very jealous! I’m still studying all about posting articles on the internet. I’m going to look around on your website to get a better idea how to attract more people. Thank you!
Please, could you PM me and notify me few more thinks about this,
Definitely, what grand web log and instructive reviews, I without doubt will bookmark one’s internet site.All of the Best!
Yo, I believe your blog could be having internet browser analysis concerns. After i research your blog in Search, this indicates fine though when notch in The net Explorer, it possesses a number of overlapping. I just planned to provide you with quick heads right up! Other you should which often, very good website!
Thanks, You probably haven’t purported to achieve this, however I believe you have got managed to express the mind-set that lots of persons are in.
Thanks, You probably haven’t supposed to accomplish that, however I believe you encounter managed to express the mind-set that many of individuals are currently in.
Please, is it possible to PM me and inform me few more worries this approach,
The sense of planning to assist, however not determining how and even the place, is something various us have gone through.
My buddy suggested I’d like we are now business. He ended up being entirely right. Piece of article truly made my moment. You cannot think simply how much time frame I’d exhausted just for this information! Thanks
It a new idea! Just wanna say thank you for news you encounter diffused. Just continue publishing this sort of post. I will be a loyal reader, thanks a lot.
Happy to become visiting your website again, it really has been weeks most likely for me. Well, this is the story that I’ve been waited for so long.