home *** CD-ROM | disk | FTP | other *** search
/ What the Doctor Required - The Freshest December / December.iso / windows / mem1577.pe / folder.htt < prev    next >
Encoding:
Text File  |  1997-08-28  |  7.5 KB  |  189 lines
  1. <!-- 
  2.  * This file was automatically generated by Microsoft Internet Explorer 4.0 
  3.  * using the file %THISDIRPATH%\folder.htt (if customized) or
  4.  * res://webvw.dll/folder.htt (if not customized).
  5.  -->
  6.  
  7. <html>
  8.    <!-- this style defines the appearance of any hyperlinks that get displayed -->
  9.    <style>
  10.       a:link      {font: 8pt/10pt verdana; color: #FF6633}
  11.       a:visited   {font: 8pt/10pt verdana; color: #0099FF}
  12.       a:active    {font: 8pt/10pt verdana; color: black}
  13.    </style>
  14.  
  15.    <head>
  16.       <!-- allow references to any resources you might add to the folder -->
  17.       <!-- (a "webbot" is a special wrapper for FrontPage compatibility) -->
  18.       <!-- webbot bot="HTMLMarkup" tag="base" startspan -->
  19.       <base href="%THISDIRPATH%\">
  20.       <!-- webbot bot="HTMLMarkup" endspan -->
  21.  
  22.       <script language="JavaScript" for="FileList" event="SelectionChanged">
  23.          // this script updates the left info panel when you select icons
  24.          var items = FileList.FocusedItem;
  25.          var fldr  = FileList.Folder;
  26.          var data;
  27.          var text;
  28.  
  29.          // sanity check
  30.          if (!items || !fldr)
  31.             return;
  32.  
  33.          // name
  34.          text = "<b>" + fldr.GetDetailsOf(items, 0) + "</b>";
  35.  
  36.          // type
  37.          data = fldr.GetDetailsOf(items, 2);
  38.          if (data != "")
  39.             text += "<br>" + data;
  40.  
  41.          // date
  42.          data = fldr.GetDetailsOf(items, 3);
  43.          if (data != "")
  44.             text += "<br><br>" + fldr.GetDetailsOf(null, 3) + ": " + data;
  45.  
  46.          // size
  47.          data = fldr.GetDetailsOf(items, 1);
  48.          if (data != "")
  49.             text += "<br><br>" + fldr.GetDetailsOf(null, 1) + ": " + data;
  50.  
  51.          // tip
  52.          data = fldr.GetDetailsOf(items, -1);
  53.          if (data != "" && data != name) {
  54.             var start;
  55.             var end;
  56.             var theLink;
  57.  
  58.             // look for embedded links
  59.             text += "<br><br>";
  60.             start = data.indexOf("http://");
  61.             if (start < 0)
  62.                start = data.indexOf("file://");
  63.             if (start < 0)
  64.                text += data;
  65.             else {
  66.                end = data.indexOf(" ", start);
  67.                if (end < 0)
  68.                   end = data.length;
  69.                if (start > 0)
  70.                   text += data.substring(0, start - 1);
  71.                theLink = data.substring(start, end);
  72.                text += theLink.link(theLink);
  73.                if (end < data.length)
  74.                   text += data.substring(end + 1, data.length);
  75.             }
  76.          }
  77.  
  78.          // replace SPAN1 with the new text
  79.          SPAN1.innerHTML = text;
  80.  
  81.          // erase any visible thumbnail since the selection changed
  82.          document.all.Thumbnail.style.display = "none";
  83.          // tell the control to generate the new thumbnail asynchronously
  84.          document.all.Thumbnail.displayFile(items.Path);
  85.       </script>
  86.  
  87.       <script language="JavaScript" for="Thumbnail" event="OnThumbnailReady">
  88.          // when the new thumbnail has been generated, just display it
  89.          document.all.Thumbnail.style.display = "";
  90.       </script>
  91.  
  92.       <script>
  93.          // this function handles fixed panel sizing and collapsing when the window resizes
  94.          function fixSize() {
  95.             var hideTop = 200
  96.             var hideLeft = 400
  97.             var ch = document.body.clientHeight
  98.             var cw = document.body.clientWidth
  99.  
  100.             if (hideTop > ch || hideLeft > cw) {
  101.                document.all.heading.visibility = "hidden"
  102.                document.all.FileList.style.pixelTop = 0
  103.                document.all.panel.style.pixelTop = 0
  104.             } else {
  105.                document.all.heading.visibility = "visible"
  106.                document.all.FileList.style.top = (document.all.heading.offsetHeight - 32) + "px"
  107.                document.all.panel.style.top = (document.all.heading.offsetHeight) + "px"
  108.                document.all.rule.style.width = (cw - 84) + "px"        
  109.             }
  110.             if (hideLeft > cw) {
  111.                document.all.panel.visibility = "hidden"
  112.                document.all.FileList.style.pixelLeft = 0
  113.             } else {
  114.                document.all.panel.visibility = "visible"
  115.                document.all.FileList.style.pixelLeft = document.all.panel.style.pixelWidth 
  116.             }
  117.             document.all.FileList.style.pixelWidth = cw - document.all.FileList.style.pixelLeft
  118.             document.all.FileList.style.pixelHeight = ch - document.all.FileList.style.pixelTop
  119.             document.all.panel.style.pixelHeight = ch - document.all.panel.style.pixelTop
  120.          }
  121.       </script>
  122.    </head>
  123.  
  124.    <body topmargin=0 leftmargin=0 rightmargin=0 bottommargin=0 scroll=no onload="fixSize()">
  125.  
  126.       <!-- start heading banner -->
  127.       <div ID="heading" style="position: absolute; width: 100%; height: 88px; background: URL(res://webvw.dll/folder.gif) no-repeat">
  128.          <p style="margin-left: 84px; padding-left: 20px; margin-top: 16px">
  129.          <!-- using a table with nowrap to prevent undesirable word wrapping -->
  130.          <table>
  131.             <tr>
  132.                <td nowrap>
  133.                   <font style="font: 16pt/16pt verdana; font-weight: bold; color: #0099FF">
  134.                      <!--webbot bot="HTMLMarkup" startspan alt="<B><I>Web View Folder Title</I></B> " -->
  135.                      %THISDIRNAME%
  136.                      <!--webbot bot="HTMLMarkup" endspan -->
  137.                   </font>
  138.                </td>
  139.             </tr>
  140.          </table>
  141.          <!-- this is more efficient than a long graphic, but we have to adjust it in FixSize() -->
  142.          <hr ID="rule" style="position: absolute; top: 44px; left: 84px" size=1px color=black>
  143.       </div>
  144.       <!-- end heading banner -->
  145.  
  146.       <!-- start left info panel -->
  147.       <div ID="panel" style="position: absolute; top: 88px; width: 30%; background: window; overflow: auto">
  148.          <p style="margin-left: 20px; margin-top: 8px; margin-right: 8px">
  149.          <font style="font: 8pt/10pt verdana; font-weight: normal; color: text">
  150.             <!-- the initial prompt in this span gets replaced by script -->
  151.             <span id="SPAN1">
  152.                Select an icon to view its description.
  153.             </span>
  154.             <br><br>
  155.  
  156.             <!-- HERE'S A GOOD PLACE TO ADD A FEW LINKS OF YOUR OWN -->
  157.             <!-- (examples commented out)
  158.                <a href="http://www.mylink1.com/">Custom Link 1</a>
  159.                <br>
  160.                <a href="http://www.mylink2.com/">Custom Link 2</a>
  161.                <br><br>
  162.             -->
  163.          </font>
  164.  
  165.          <!-- this is the thumbnail viewer control, sized optimally for 640x480 -->
  166.          <object id="Thumbnail"
  167.             classid="clsid:FB324600-F8A0-11D0-9EAD-00805F714772"
  168.             style="width: 150px; height: 150px; display: none">
  169.          </object>
  170.       </div>
  171.       <!-- end left info panel -->
  172.  
  173.       <!-- this is the standard file list control -->
  174.       <!-- webbot bot="HTMLMarkup" startspan u-src="file:///C:\Program Files\Microsoft FrontPage Express\Data\FoldData.gif" -->
  175.       <object id="FileList" border=0 tabindex=1
  176.          classid="clsid:1820FED0-473E-11D0-A96C-00C04FD705A2"
  177.          style="position: absolute; left: 30%; top: 88px; width: 70%; height: 100%">
  178.       </object>
  179.       <!-- webbot bot="HTMLMarkup" endspan -->
  180.  
  181.       <script language="JavaScript">
  182.          // call our fixSize() function whenever the window gets resized
  183.          window.onresize = fixSize;
  184.       </script>
  185.  
  186.    </body>
  187. </html>
  188.  
  189.