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}
.style5 {font-size: 16px; font-weight: bold; color: #006600;}
.style14 {font-size: 10px}
.style18 {font-family: "Courier New", Courier, mono; color: #0000FF; font-size: 11px;}
.style19 {color: #0000FF; font-family: "Courier New", Courier, mono;}
.style4 {font-size: 12px}
</style>

<script language="JavaScript" type="text/JavaScript">
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}
//-->
</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>


<table width="600"  border="0" cellpadding="1" cellspacing="1">
<tr>
    <td><span class="style5">Reading Analog Channels on DAQ-12X Boards </span></td>
</tr>
    
<tr>
    <td>
    <br>
    
    <!-- THIS SECTION IMPLEMETS TABLE HEADER -->    
    <table width="100%"  border="0">
    <tr bgcolor="#F6F6F6">
        <td><strong>Analog Channel </strong></td>
        <td><strong>Value</strong></td>
        <td><strong>Percentage</strong></td>
    </tr>
    
    <!-- CHANEL #1 -->
    <tr>
        <td width="22%">Analog Channel # 1 </td>
        <td width="22%"><span class="style18">^MAX12X:00^</span></td>
        <td width="56%">
        <script language="VBScript" type="text/VBScript">
            dim i
            i = ^MAX12X:00^
            if i <> 65535 then
                i = Cint( i/40.95)
                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='" & i & "' height='10'>"
                Document.Write "</td></tr></table>"
                Document.Write "</td><td>" & i & "%</td></tr>"
                Document.Write "</table>" 
            else
                Document.write "Channel Invalid"
            end if
        </script>
        </td>
    </tr>
    
    <!-- CHANEL #2 -->
    <tr>
        <td>Analog Channel # 2 </td>
        <td><span class="style18">^MAX12X:01^</span></td>
        <td>
        <script language="VBScript" type="text/VBScript">
            dim i
            i = ^MAX12X:01^
            if i <> 65535 then
                i = Cint( i/40.95)
                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='" & i & "' height='10'>"
                Document.Write "</td></tr></table>"
                Document.Write "</td><td>" & i & "%</td></tr>"
                Document.Write "</table>" 
            else
                Document.write "Channel Invalid"
            end if
        </script>
        </td>
    </tr>
    
    <!-- CHANEL #3 -->
    <tr>
        <td>Analog Channel # 3 </td>
        <td><span class="style18">^MAX12X:02^</span></td>
        <td>
        <script language="VBScript" type="text/VBScript">
            dim i
            i = ^MAX12X:02^
            if i <> 65535 then
                i = Cint( i/40.95)
                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='" & i & "' height='10'>"
                Document.Write "</td></tr></table>"
                Document.Write "</td><td>" & i & "%</td></tr>"
                Document.Write "</table>" 
            else
                Document.write "Channel Invalid"
            end if
        </script>
        </td>
    </tr>
    
    <!-- CHANEL #4 -->
    <tr>
        <td>Analog Channel # 4 </td>
        <td><span class="style18">^MAX12X:03^</span></td>
        <td>
        <script language="VBScript" type="text/VBScript">
            dim i
            i = ^MAX12X:03^
            if i <> 65535 then
                i = Cint( i/40.95)
                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='" & i & "' height='10'>"
                Document.Write "</td></tr></table>"
                Document.Write "</td><td>" & i & "%</td></tr>"
                Document.Write "</table>" 
            else
                Document.write "Channel Invalid"
            end if
        </script>
        </td>
    </tr>
    
    <!-- CHANEL #5 -->
    <tr>
        <td>Analog Channel # 5 </td>
        <td><span class="style18">^MAX12X:04^</span></td>
        <td>
        <script language="VBScript" type="text/VBScript">
            dim i
            i = ^MAX12X:04^
            if i <> 65535 then
                i = Cint( i/40.95)
                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='" & i & "' height='10'>"
                Document.Write "</td></tr></table>"
                Document.Write "</td><td>" & i & "%</td></tr>"
                Document.Write "</table>" 
            else
                Document.write "Channel Invalid"
            end if
        </script>
        </td>
    </tr>
    
    <!-- CHANEL #6 -->
    <tr>
        <td>Analog Channel # 6 </td>
        <td><span class="style18">^MAX12X:05^</span></td>
        <td>
        <script language="VBScript" type="text/VBScript">
            dim i
            i = ^MAX12X:05^
            if i <> 65535 then
                i = Cint( i/40.95)
                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='" & i & "' height='10'>"
                Document.Write "</td></tr></table>"
                Document.Write "</td><td>" & i & "%</td></tr>"
                Document.Write "</table>" 
            else
                Document.write "Channel Invalid"
            end if
        </script>
    </td>
    </tr>
    
    <!-- OTHER CHANELS  -->
    <tr>
        <td><div align="center"><strong>.</strong></div></td>
        <td><div align="center" class="style2"><strong><span class="style19">.</span></strong></div></td>
        <td><strong>.</strong></td>
    </tr>
    <tr>
        <td><div align="center"><strong>.</strong></div></td>
        <td><div align="center" class="style2"><strong><span class="style19">.</span></strong></div></td>
        <td><strong>.</strong></td>
    </tr>
    <tr>
        <td><div align="center"><strong>.</strong></div></td>
        <td><div align="center" class="style2"><strong><span class="style19">.</span></strong></div></td>
        <td><strong>.</strong></td>
    </tr>
    <tr>
        <td><div align="center"><strong>.</strong></div></td>
        <td><div align="center" class="style2"><strong><span class="style19">.</span></strong></div></td>
        <td><strong>.</strong></td>
    </tr>
    
    <!-- CHANEL #63 -->
    <tr>
        <td>Analog Channel # 63</td>
        <td><span class="style14"><span class="style18">^MAX12X:63^</span></span></td>
        <td>
        <script language="VBScript" type="text/VBScript">
            dim i
            i = ^MAX12X:63^
            if i <> 65535 then
                i = Cint( i/40.95)
                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='" & i & "' height='10'>"
                Document.Write "</td></tr></table>"
                Document.Write "</td><td>" & i & "%</td></tr>"
                Document.Write "</table>" 
            else
                Document.write "Channel Invalid"
            end if
        </script>
    </td>
    
    </tr>
    </table>
    </td>
</tr>
</table>

</body>
</html>

Screenshot