<?rev
   -- Standard header -------------------------------
   put "Troz : : On-Rev" into tHeader
   include "../../includes/header.irev"
   
   include "../../includes/menu.irev"
   --------------------------------------------------
?>

   <?rev include "includes/scriptlink.irev" ?>
   <h1>Answer Dialog</h1>
   
   <p>
   This script uses two methods to show JavaScript alert wrapped in an irev include file, 
   so as to provide a dialog box which is very useful for debugging etc.
   </p>

   <p>
   Thanks to <a href="http://bleuciel.on-rev.com/examples.irev">Jacques at bleuciel</a> 
   for the first example and bvg for the basis of the second (which I have since edited).
   </p>

   <p>Refresh the page to see the dialogs again.</p>

   <a href="showscript.irev?showscript=includes/answer.irev">
      Script of first include file
   </a>
   <br /><br />
   <a href="showscript.irev?showscript=includes/alert.irev">
      Script of second include file
   </a>

<?rev
   include "includes/answer.irev"
   put $_SERVER["REMOTE_ADDR"] into tIP
   jcAnswer "Your IP address is " & tIP

   include "includes/alert.irev"      
   put $_SERVER["HTTP_USER_AGENT"] into tAgent
   doAlert "Your browser is " & tAgent
?>
      

<?rev
   -- Standard footer -------------------------------
   include "includes/showIncludes.irev"
   include "../../includes/footer.irev"
   --------------------------------------------------
?>