home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 September / CHIPCD_9_99.iso / software / uaktualnienia / OptionPackPL / iis4_02.cab / layout.inc1 < prev    next >
Encoding:
Text File  |  1998-04-27  |  1.3 KB  |  38 lines
  1. <%
  2.  If myinfo.Theme = "looseleaf" Then
  3.     response.write "<FONT FACE='VERDANA' SIZE='-2'>"
  4.     '    $Date: 9/11/97 5:07p $
  5.     '    $ModTime: $
  6.     '    $Revision: 8 $
  7.     '    $Workfile: layout.inc $
  8.     response.write "<TABLE width='100%' height='100%' "_
  9.     & "cellpadding='0' cellspacing='0' border='0' BGColor='#FFFFFF'>"
  10. '                ******************* CONTENTS *************
  11.     response.write "<TR><TD Valign='TOP' Colspan=2 Align=center><H1>"
  12.      call Title
  13.     response.write "</H1></TD></TR><TR><TD Valign=top Align=center Colspan=2>"
  14.      call page_datetime
  15.     response.write "<BR>"
  16.      call page_messaging
  17.      call file_check        'Checks for published files
  18.     response.write "</TD></TR>"_
  19.  
  20.     & "<TR><TD Valign=top Align=center Colspan=2>"
  21.     call layout_Email
  22.     response.write "</TD></TR><TR><TD Align=center>"
  23.     call Phone
  24.     response.write "</TD><TD Align=center>"
  25.     call faxPhone
  26.     response.write "</TD></TR><TR><TD Colspan=2 Align=center>"
  27.     call Address
  28.     For num = 1 to 4
  29.     response.write "</TD></TR><TR><TD Colspan=2 Align=center>"
  30.     response.write Heading(num)
  31.     Next
  32.     response.write "</TD></TR><TR><TD Colspan=2 Align=center>"
  33.      call page_links
  34.     response.write "</TD></TR><TR><TD Colspan=2 Align=center>"
  35.     call ie_logo
  36.     response.write "</TD></TD></TR></TABLE></FONT>"
  37.  End If
  38. %>