<HTML><FONT FACE=arial,helvetica><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="2">I'm trying to write a Revolution app that will get the HTML source from whatever page is presently displayed in IE. I need to have Revolution detect when the user has reached a certain page on a web-site, and react to that page after the user lands on it) Normally, this would not be a problem - - - I'd just have Revolution run an Applescript that says<BR>
<BR>
tell application "Internet Explorer"<BR>
set htmlsource to GetSource<BR>
end tell<BR>
<BR>
However, Applescript has a hard time with older versions of the Mac OS (8.1, 8.5, 8.6), where it displays that annoying "where is" dialog. Since I'm running Rev in OS 8.1, 8.5, 8.6, I also cannot use the "using terms from" command to allow Revolution to compile the GetSource call. GetSource in IE is apparently <<event </FONT><FONT COLOR="#FF8000" FACE="Courier" FAMILY="FIXED" SIZE="1">MSIEORC</FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="2">>> as a raw code call. I'm getting a "compiler error" in Revolution when I try to run this script. Since this is my first attempt at using raw codes, I could be just getting the syntax wrong. Here's what I've got so far:<BR>
<BR>
</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B>set</B></FONT><FONT COLOR="#408000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> creaType</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B> to</B></FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> "MSIE"</FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="2"><BR>
</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B>tell</B></FONT><FONT COLOR="#0000FF" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> application</FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> "Finder"</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B> to</B></FONT><FONT COLOR="#0000FF" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> open application file id</FONT><FONT COLOR="#408000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> creaType</FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="2"><BR>
<BR>
</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B>tell</B></FONT><FONT COLOR="#0000FF" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> application</FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> "Finder"</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B> to set</B></FONT><FONT COLOR="#408000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> appOfMine</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B> to</B></FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> (</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B>the first</B></FONT><FONT COLOR="#0000FF" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> process</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B> whose</B></FONT><FONT COLOR="#0000FF" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> creator type</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B> is</B></FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> (</FONT><FONT COLOR="#408000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1">creaType</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B> as</B></FONT><FONT COLOR="#0000FF" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> type class</FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1">))</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B> as</B></FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="2"> <<</FONT><FONT COLOR="#0000FF" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1">class</FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="2"> psn >><BR>
<BR>
</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B>tell</B></FONT><FONT COLOR="#0000FF" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> application</FONT><FONT COLOR="#408000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> appOfMine</FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="2"><BR>
</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B> set</B></FONT><FONT COLOR="#408000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> theSource</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B> to</B></FONT><FONT COLOR="#FF8040" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> <<</FONT><FONT COLOR="#FF8000" FACE="Courier" FAMILY="FIXED" SIZE="1">event MSIEORC>></FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="2"><BR>
</FONT><FONT COLOR="#0000FF" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"> return theSource</FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="2"><BR>
</FONT><FONT COLOR="#FF0000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="1"><B>end tell</B></FONT><FONT COLOR="#000000" FACE="Geneva" FAMILY="SANSSERIF" SIZE="2"></FONT></HTML>