-- text figures

Figure 1 Changing Images


    <html>

    <head>
    <title></title>
    <script>
    <!--

    if (document.images) {
     image1on = new Image();
     image1on.src = "images/image1on.gif";

     image2on = new Image();
     image2on.src = "images/image2on.gif";

     image3on = new Image();
     image3on.src = "images/image3on.gif";

     image4on = new Image();
     image4on.src = "images/image4on.gif";

     image1off = new Image();
     image1off.src = "images/image1off.gif";

     image2off = new Image();
     image2off.src = "images/image2off.gif";

     image3off = new Image();
     image3off.src = "images/image3off.gif";

     image4off = new Image();
     image4off.src = "images/image4off.gif";

    }

    function turnOn(imageName) {
     if (document.images) {
     document[imageName].src = eval(imageName + "on.src");
     }
    }

    function turnOff(imageName) {
     if (document.images) {
     document[imageName].src = eval(imageName + "off.src");
     }
    }

    // -->
    </script>
    </head>

    <body bgcolor="#FFFFFF">

    <table width="400" border="0" cellpadding="0" cellspacing="0">
      <tr>
      <td width="100"><a href="image1link.html" onMouseOver="turnOn('image1')" 
onMouseOut="turnOff('image1')"><img name="image1" src="images/image1off.gif" alt="image1" 
border="0" WIDTH="100" HEIGHT="25"></a></td>
      <td width="100"><a href="image2link.html" onMouseOver="turnOn('image2')" 
onMouseOut="turnOff('image2')"><img name="image2" src="images/image2off.gif" alt="image2" 
border="0" WIDTH="100" HEIGHT="25"></a></td>
      <td width="100"><a href="image3link.html" onMouseOver="turnOn('image3')" 
onMouseOut="turnOff('image3')"><img name="image3" src="images/image3off.gif" alt="image3" 
border="0" WIDTH="100" HEIGHT="25"></a></td>
      <td width="100"><a href="image4link.html" onMouseOver="turnOn('image4')"
onMouseOut="turnOff('image4')"><img name="image4" src="images/image4off.gif" alt="image4" 
border="0" WIDTH="100" HEIGHT="25"></a></td>
      </tr>
    </table>
    </body>
    </html>

Figure 2 Preloading Images


     <html>
     <head>
     <title>Microsoft Interactive Developer - 1997 Back Issues
     </title> 
     <script language="javascript">
     root = "http://www.microsoft.com/mind/images/smallCovers/";
     type = ".gif";
     var item = new Array();
     var months = new Array ("Jan", "Feb", "Mar", "Apr", "May", "June", "Jul",
                             "Aug", "Sept", "Oct", "Nov", "Dec");
     var i;
     var year=97;
     for (i=0; i<12; i++) {
     item[i] = new Image;
     item[i].src = root + months[i] + year + "back" + type;
     }
     </script>
     </head>
 
     <body bgcolor=white>
     <table bgcolor="#6699cc"><tr><td>
     <tr><td align=center><img
      src="http://www.microsoft.com/mind/images/gifmation/logo.gif"></td></tr>
     <tr><td width=290 valign=top bgcolor="white">
     <script language="javascript">
 
     function updateImage(index) {
       if (index>=0) {
       document.images["imageview"].src = item[index].src;
       }else{
       document.images["imageview"].src =
       "http://www.microsoft.com/library/images/gifs/homepage/1ptrans.gif";
       }
     }
     var label;
     for (i=0; i<12; i++) {
      if (i<9) {
       label = "0" + (i+1) + (year);
      } else {
       label = "" + (i+1) + (year);
      }
      document.write ("<font face=arial><b>");
      document.write ("<a href='http://www.microsoft.com/mind/" + label +
      "/inthisissue" + label + ".htm' onMouseOver='updateImage(" + i + ");'
      onMouseOut='updateImage(-1)'>");
      document.write (months[i] + "&nbsp;19" + year);
      document.write ("</a> </b> </font> ");
     }
 
     </script>
     </td>
     <td bgcolor="white" align=center>
     <img src="http://www.microsoft.com/library/images/gifs/homepage/1ptrans.gif"
     name="imageview" width=72 height=97>
     </td></tr>
     </table> 
     </body> 
     </html>

Figure 3 Sample Excel View


 <html> 
 <head>
 <style>
 <!--
 TABLE {font-family:sans-serif; font-size:8pt;}
 TH {background:black; color:white;}
 .name {font-weight:bold}
 .value {}
 -->
 </style>
 </head>
 <body bgcolor=white>
 <H1>Sample Excel View</H1>
 
 <%
 PATH = "C:\My Documents\"
 FILE = "Sample.xls"
 TABLE = "DataTable1"
 DRIVER = "{Microsoft Excel Driver (*.xls)}"
 
 DB = "DBQ=" & PATH & FILE & ";"
 DB = DB & "DefaultDir=" & PATH & ";"
 DB = DB & "Driver=" & DRIVER & ";"
 DB = DB & "FIL=excel 5.0;ReadOnly=1;"
 
 SQL = "SELECT * FROM " & TABLE
 %>
 
 <%
 Set DataConn = Server.CreateObject("ADODB.Connection")
 DataConn.ConnectionTimeout = 15
 DataConn.CommandTimeout = 30
 DataConn.Open DB
 Set RS_item = DataConn.Execute(SQL)
 %>
 <table border>
 <tr>
 <%if RS_item.EOF then%>
 <td colspan=10>No Records Found</td>
 <%else%>
 <th valign=bottom>#</th>
 <%
     for each field in RS_item.fields
 %>
 <th valign=bottom><%=field.name%></th>
 <%
     next
 %>
 <%end if%>
 </tr>
 
 <%
 count=0
 Do While Not RS_item.EOF
     count = count+1
 %>
 <tr>
 <td class=value align=left valign=top bgcolor=silver><%=count%></td>
 <%
     for each field in RS_item.fields
 %>
 <td class=value align=left valign=top>"<%=field.value%>"</td>
 <%
     next
 %>
 </tr>
 <%
     RS_item.MoveNext
 Loop
 
 DataConn.Close
 %>
 </table> 
 </body> 
 </html>