Re: Scripting Fetch, help
Re: Scripting Fetch, help
- Subject: Re: Scripting Fetch, help
- From: Michelle Steiner <email@hidden>
- Date: Tue, 8 May 2001 12:18:35 -0700
On 5/8/01 6:13 AM, Walter Harris <email@hidden> wrote:
>
Can anyone give me some example AppleScripts for scripting Fetch 3.0.3 or
>
point me in the right direction?
here is one
property FileName : ""
property gDesturl : ""
property theFile : {}
if theFile is {} then set theFile to {} & ,
(choose file with prompt "Please choose the file to upload." of type
{"JPEG"})
if gDesturl is "" then specify_destination()
on idle
with timeout of (10 * minutes) seconds
tell application "Fetch"
put into url gDesturl item theFile binary format Raw Data
end tell
end timeout
return 1 * hours
end idle
on specify_destination()
set dialog_reply to display dialog "Enter Destination URL in format:" &
return & ,
"
ftp://user:password@host/path/" default answer gDesturl
if button returned of dialog_reply = "OK" then
set gDesturl to text returned of dialog_reply
end if
end specify_destination
--Michelle
----------------------------------------------------------------------
| Michelle Steiner | We're not human beings having a spiritual |
| | experience. We're spiritual beings |
| email@hidden | having a human experience. |
----------------------------------------------------------------------