index.asp
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Welcome To MINI-MAX/51-E Web Server</title>
<style type="text/css">
body,td,th {font-family: Arial, Helvetica, sans-serif; font-size: 12px;}
body {margin-left: 0px; margin-top: 0px; margin-right: 0px; margin-bottom: 0px; background-image: url(digits.gif);}
.style2 {font-size: 11px}
.style3 {font-size: 16px; font-weight: bold; color: #006600;}
.style8 { font-family: "Courier New", Courier, mono; font-size: 11px;}
.style4 {color: #000099}
.style9 {font-size: 12px}
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
//-->
</script>
<!-- THIS SECTION IMPLEMENTS READ CHANELS VALUES ON TB-1 BOARD-->
<script language="VBScript" type="text/VBScript">
dim CH0, CH1, CH2,CH3
CH0 = ^TB1:0^
CH1 = ^TB1:1^
CH2 = ^TB1:2^
CH3 = ^TB1:3^
</script>
</head>
<body>
<!-- THIS SECTION IMPLEMENTS WEBCAT LOGO IMAGE AT THE TOP OF THE PAGE -->
<table width="100%" border="0" cellpadding="1">
<tr>
<td><a href="javascript:;" onClick="MM_openBrWindow('webcat.jpg','','width=515,height=475')"><img src="banner.gif" width="349" height="90" border="0"></a></td>
</tr>
</table>
<p>
<span class="style3">Reading Analog Channels on TB-1 Board</span> <br><br>
</p>
<table width="600" border="0" cellpadding="0" cellspacing="1">
<!-- THIS SECTION IMPLEMENTS TABLE HEADER -->
<tr bgcolor="#F5F5F5">
<td><strong>Channel</strong></td>
<td><strong>Value</strong></td>
<td><strong>Percentage</strong></td>
</tr>
<!-- CHANNEL #0 -->
<tr>
<td width="143"><strong>Analog Channel 0 </strong></td>
<td width="97"><span class="style8"><span class="style4">
<script language="VBScript" type="text/VBScript">
document.write(CH0)
</script>
</span></span>
</td>
<td width="356">
<script language="VBScript" type="text/VBScript">
percent = Cbyte((CH0 * 100)/255)
Document.Write "<table border='0'><tr><td>"
Document.Write "<table border='1' bgcolor='white' bordercolor='red' cellspacing='0' cellpadding='0' width='104'><tr><td>"
Document.Write "<img src='bar.jpg' width='" & percent & "' height='10'>"
Document.Write "</td></tr></table>"
Document.Write "</td><td>" & percent & "%</td></tr>"
Document.Write "</table>"
</script>
</td>
</tr>
<!-- CHANNEL #1 -->
<tr>
<td><strong>Analog Channel 1 </strong></td>
<td><span class="style8"><span class="style4">
<script language="VBScript" type="text/VBScript">
document.write(CH1)
</script>
</span></span>
</td>
<td>
<script language="VBScript" type="text/VBScript">
percent = Cbyte((CH1 * 100)/255)
Document.Write "<table border='0'><tr><td>"
Document.Write "<table border='1' bgcolor='white' bordercolor='red' cellspacing='0' cellpadding='0' width='104'><tr><td>"
Document.Write "<img src='bar.jpg' width='" & percent & "' height='10'>"
Document.Write "</td></tr></table>"
Document.Write "</td><td>" & percent & "%</td></tr>"
Document.Write "</table>"
</script>
</td>
</tr>
<!-- CHANNEL #2 -->
<tr>
<td><strong>Analog Channel 2 </strong></td>
<td><span class="style8"><span class="style4">
<script language="VBScript" type="text/VBScript">
document.write(CH2)
</script>
</span></span>
</td>
<td>
<script language="VBScript" type="text/VBScript">
percent= Cbyte((CH2 * 100)/255)
Document.Write "<table border='0'><tr><td>"
Document.Write "<table border='1' bgcolor='white' bordercolor='red' cellspacing='0' cellpadding='0' width='104'><tr><td>"
Document.Write "<img src='bar.jpg' width='" & percent & "' height='10'>"
Document.Write "</td></tr></table>"
Document.Write "</td><td>" & percent & "%</td></tr>"
Document.Write "</table>"
</script>
</td>
</tr>
<!-- CHANNEL #3 -->
<tr>
<td><strong>Analog Channel 3 </strong></td>
<td><span class="style8"><span class="style4">
<script language="VBScript" type="text/VBScript">
document.write(CH3)
</script>
</span></span>
</td>
<td>
<script language="VBScript" type="text/VBScript">
percent= Cbyte((CH3 * 100)/255)
Document.Write "<table border='0'><tr><td>"
Document.Write "<table border='1' bgcolor='white' bordercolor='red' cellspacing='0' cellpadding='0' width='104'><tr><td>"
Document.Write "<img src='bar.jpg' width='" & percent & "' height='10'>"
Document.Write "</td></tr></table>"
Document.Write "</td><td>" & percent & "%</td></tr>"
Document.Write "</table>"
</script>
</td>
</tr>
</table>
</body>
</html>
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Welcome To MINI-MAX/51-E Web Server</title>
<style type="text/css">
body,td,th {font-family: Arial, Helvetica, sans-serif; font-size: 12px;}
body {margin-left: 0px; margin-top: 0px; margin-right: 0px; margin-bottom: 0px; background-image: url(digits.gif);}
.style2 {font-size: 11px}
.style3 {font-size: 16px; font-weight: bold; color: #006600;}
.style8 { font-family: "Courier New", Courier, mono; font-size: 11px;}
.style4 {color: #000099}
.style9 {font-size: 12px}
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
//-->
</script>
<!-- THIS SECTION IMPLEMENTS READ CHANELS VALUES ON TB-1 BOARD-->
<script language="VBScript" type="text/VBScript">
dim CH0, CH1, CH2,CH3
CH0 = ^TB1:0^
CH1 = ^TB1:1^
CH2 = ^TB1:2^
CH3 = ^TB1:3^
</script>
</head>
<body>
<!-- THIS SECTION IMPLEMENTS WEBCAT LOGO IMAGE AT THE TOP OF THE PAGE -->
<table width="100%" border="0" cellpadding="1">
<tr>
<td><a href="javascript:;" onClick="MM_openBrWindow('webcat.jpg','','width=515,height=475')"><img src="banner.gif" width="349" height="90" border="0"></a></td>
</tr>
</table>
<p>
<span class="style3">Reading Analog Channels on TB-1 Board</span> <br><br>
</p>
<table width="600" border="0" cellpadding="0" cellspacing="1">
<!-- THIS SECTION IMPLEMENTS TABLE HEADER -->
<tr bgcolor="#F5F5F5">
<td><strong>Channel</strong></td>
<td><strong>Value</strong></td>
<td><strong>Percentage</strong></td>
</tr>
<!-- CHANNEL #0 -->
<tr>
<td width="143"><strong>Analog Channel 0 </strong></td>
<td width="97"><span class="style8"><span class="style4">
<script language="VBScript" type="text/VBScript">
document.write(CH0)
</script>
</span></span>
</td>
<td width="356">
<script language="VBScript" type="text/VBScript">
percent = Cbyte((CH0 * 100)/255)
Document.Write "<table border='0'><tr><td>"
Document.Write "<table border='1' bgcolor='white' bordercolor='red' cellspacing='0' cellpadding='0' width='104'><tr><td>"
Document.Write "<img src='bar.jpg' width='" & percent & "' height='10'>"
Document.Write "</td></tr></table>"
Document.Write "</td><td>" & percent & "%</td></tr>"
Document.Write "</table>"
</script>
</td>
</tr>
<!-- CHANNEL #1 -->
<tr>
<td><strong>Analog Channel 1 </strong></td>
<td><span class="style8"><span class="style4">
<script language="VBScript" type="text/VBScript">
document.write(CH1)
</script>
</span></span>
</td>
<td>
<script language="VBScript" type="text/VBScript">
percent = Cbyte((CH1 * 100)/255)
Document.Write "<table border='0'><tr><td>"
Document.Write "<table border='1' bgcolor='white' bordercolor='red' cellspacing='0' cellpadding='0' width='104'><tr><td>"
Document.Write "<img src='bar.jpg' width='" & percent & "' height='10'>"
Document.Write "</td></tr></table>"
Document.Write "</td><td>" & percent & "%</td></tr>"
Document.Write "</table>"
</script>
</td>
</tr>
<!-- CHANNEL #2 -->
<tr>
<td><strong>Analog Channel 2 </strong></td>
<td><span class="style8"><span class="style4">
<script language="VBScript" type="text/VBScript">
document.write(CH2)
</script>
</span></span>
</td>
<td>
<script language="VBScript" type="text/VBScript">
percent= Cbyte((CH2 * 100)/255)
Document.Write "<table border='0'><tr><td>"
Document.Write "<table border='1' bgcolor='white' bordercolor='red' cellspacing='0' cellpadding='0' width='104'><tr><td>"
Document.Write "<img src='bar.jpg' width='" & percent & "' height='10'>"
Document.Write "</td></tr></table>"
Document.Write "</td><td>" & percent & "%</td></tr>"
Document.Write "</table>"
</script>
</td>
</tr>
<!-- CHANNEL #3 -->
<tr>
<td><strong>Analog Channel 3 </strong></td>
<td><span class="style8"><span class="style4">
<script language="VBScript" type="text/VBScript">
document.write(CH3)
</script>
</span></span>
</td>
<td>
<script language="VBScript" type="text/VBScript">
percent= Cbyte((CH3 * 100)/255)
Document.Write "<table border='0'><tr><td>"
Document.Write "<table border='1' bgcolor='white' bordercolor='red' cellspacing='0' cellpadding='0' width='104'><tr><td>"
Document.Write "<img src='bar.jpg' width='" & percent & "' height='10'>"
Document.Write "</td></tr></table>"
Document.Write "</td><td>" & percent & "%</td></tr>"
Document.Write "</table>"
</script>
</td>
</tr>
</table>
</body>
</html>
Screenshot
