Re: Check for network connection
Re: Check for network connection
- Subject: Re: Check for network connection
- From: Tod Hallberg <email@hidden>
- Date: Tue, 03 Jun 2003 10:17:27 -0500
- Organization: Monical Pizza Corporation
Tod Hallberg wrote:
Tod Hallberg wrote:
I have looked thru the archives, but I cannot seem to locate what I
am looking for..
What I am trying to do is create a daily script that can "ping", or
use some other method, to check a 40 or more 56k frame relay netowrk
connections.
I am using OS 9, AS 1.8.3
I would like to just check to see if the router on the far end is up,
but if I must, I could always try a computer on the other end. I
would not want to use Appletalk to attempt to mount a volume, as this
take just way too long.
thanx
tod
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.
Well here is what I came up with to check the network for Appletalk
Zones. This will work for now, but I really don't want to have to rely
on the appletalk zones being active to perform this check.
With Akua Sweets 143
set theZones to (get the network zone names) as list
set theZones to order list theZones by name
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.
Well a new problem has popped up.........
I saved my script as an compiled app and ran it. It returned "Could not
run the script "Network check.app" because of scripting system (OSA)
error. -1750".
However, if I save the exact same script as a Run Only App, it works
just fine.
any ideas would be apperciated.
------------Begin script----------
set MonicalZones to (get the network zone names) as list
set MonicalZones to order list MonicalZones by name
--return MonicalZones
set DateNow to (current date)
--return DateNow
set currMonth to month of (DateNow) as string
set currDate to day of (DateNow) as string
set currYear to year of (DateNow) as string
--Set month to 2-digit number
if currMonth is "January" then set currMonth to "01" as string
if currMonth is "February" then set currMonth to "02" as string
if currMonth is "March" then set currMonth to "03" as string
if currMonth is "April" then set currMonth to "04" as string
if currMonth is "May" then set currMonth to "05" as string
if currMonth is "June" then set currMonth to "06" as string
if currMonth is "July" then set currMonth to "07" as string
if currMonth is "August" then set currMonth to "08" as string
if currMonth is "September" then set currMonth to "09" as string
if currMonth is "October" then set currMonth to "10" as string
if currMonth is "November" then set currMonth to "11" as string
if currMonth is "December" then set currMonth to "12" as string
--Set day to 2-digit number
if currDate is "1" then set currDate to "01" as string
if currDate is "2" then set currDate to "02" as string
if currDate is "3" then set currDate to "03" as string
if currDate is "4" then set currDate to "04" as string
if currDate is "5" then set currDate to "05" as string
if currDate is "6" then set currDate to "06" as string
if currDate is "7" then set currDate to "07" as string
if currDate is "8" then set currDate to "08" as string
if currDate is "9" then set currDate to "09" as string
set shortDate to currMonth & "/" & currDate & "/" & currYear as string
--return shortDate
set TimeNow to (items -1 thru -11 of (DateNow as text)) as text
--return TimeNow
set OrigTextItemDlim to text item delimiters
set text item delimiters to return
--return text item delimiters
(*display dialog "At" & TimeNow & ", on " & shortDate & ,
", these zones were available:" & return & ,
MonicalZones*)
set the clipboard to {"At" & TimeNow & ", on " & shortDate & ,
", these zones were available:" & return & ,
MonicalZones} as text
set text item delimiters to OrigTextItemDlim
--return text item delimiters
tell application "Finder"
activate
open clipboard
end tell
---------End Script-------------
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.