Re: Finding default browser with AS
Re: Finding default browser with AS
- Subject: Re: Finding default browser with AS
- From: Victor Yee <email@hidden>
- Date: Mon, 30 Apr 2001 16:58:36 -0400
Hi, I'm not sure if I'm parsing the file correctly (seems to work with the limited amount of tests that I've run) but you could try this:
set x to ("" & (path to preferences) & "Internet Preferences")
try
set fileRef to open for access file x
repeat
read fileRef until "q"
set qNext to read fileRef for 2
if qNext is ":x" then exit repeat
end repeat
read fileRef until return
read fileRef until "H"
set browserClient to (items 5 thru 8 of (read fileRef until return)) as string
read fileRef until return
read fileRef until "H"
set mailClient to (items 5 thru 8 of (read fileRef until return)) as string
close access fileRef
on error
close access fileRef
end try
{browserClient, mailClient}
Victor