Help: Scripting Internet Connect, Airport Extreme

[mbrun]

I’m looking for help scripting Internet Connect and Airport Extreme with the built-in modem. I’m on OS 10.3.7 with a PowerBook G4 and want to run a script to turn Airport on (it uses Internet Connect which also includes screens for Internal Modem, Bluetooth and VPN), connect using the Airport Extreme built-in modem, and launch Mail. I’d like one for the reverse of that also which, when modem reset has completed will put the PB to sleep.

I’m a scripting newbie and have been unable to find a solution and have failed at chopping up other scripts and adding new components to make mine work. I’ve basically got nothing.

Incidentally, I just found something online that brings in to question whether this will be possible. It was from the FAQ for ABDialer and it said; “Can I use ABDialer with the Airport modem?
No, the Airport modem is not directly accessible from the Mac. It’s only used by Airport itself to provide an internet connection.”

So, I wonder if this is possible. Any help is appreciated.

Model: PowerBook G4
Browser: Safari 125.12
Operating System: Mac OS X (10.3.7)

[mbrun]

I came across silvermeteors’ reply to a post that seems to give a good start to the script I’m looking for. It seems that if the night_mode portions (see below) are taken out his script, it accomplishes the part that turns on/off AirPort. Can anyone modify it to then connect to the AirPort Extreme internal modem then launch Mail? Ideally, it would be written to run the reverse when I’m finished so that only one script is needed to start all that up as well as shut it all down.

Anyone? I’ve made some feeble attempts with my limited scripting knowledge and failed miserably.

@silvermeteors

…Anyway, you asked for a script so here’s one I wrote:

set night_mode to false
set test_time to time of (current date)
if test_time ≥ 0 then if test_time ≤ 21600 then set night_mode to true

activate application "Internet Connect"
tell application "System Events"
	get system attribute "sysv"
	if result is greater than or equal to 4144 then -- Mac OS X 10.3.0
		if UI elements enabled then
			tell application process "Internet Connect" to tell window 1
				if name is not "AirPort" then click button "AirPort" of tool bar 1
				set button_states to name of every button as list
				if button_states contains "Turn AirPort On" then
					if night_mode is false then click button "Turn Airport On"
				else if night_mode is true then
					click button "Turn AirPort Off"
				end if
			end tell
		else
			beep
			display dialog "GUI Scripting is not enabled" & return & return & "Open System Preferences and check Enable Access for Assistive Devices in the Universal Access preference pane, then run this script again." with icon stop
			if button returned of result is "OK" then
				tell application "System Preferences"
					activate
					set current pane to pane "com.apple.preference.universalaccess"
				end tell
			end if
		end if
	else
		beep
		display dialog "This computer cannot run this script" & return & return & "The script uses GUI Scripting technology, which requires an upgrade to Mac OS X 10.3 Panther or newer." with icon caution buttons {"Quit"} default button "Quit"
	end if
end tell
quit application "Internet Connect"