index.asp
<html>
<head>
<title>SHT7X Sensor</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<STYLE>
body,td,th {font-family: Arial, Helvetica, sans-serif; font-size: 12px;}
</STYLE>
</head>
<body bgcolor="white">
<TABLE WIDTH=100% HEIGHT=100%>
<!-- THIS SECTION IMPLEMENTS WEBCAT LOGO IMAGE AT THE TOP OF THE PAGE -->
<tr HEIGHT=1%>
<TD><img src="banner.gif" width="349" height="90" border="0"></TD>
</tr>
<TR>
<TD ALIGN=Center VALIGN=Middle>
<!-- THIS SECTION IMPLEMENTS DEVICE IMAGE -->
<table cellpadding=0 cellspacing=0 width=525 height=254 background="digit.png" ID="Table1">
<tr>
<td colspan=3><img src="p_top.gif" height=108 width=525 border=0 vspace=0></td>
</tr>
<!-- THIS SECTION IMPLEMENTS TEMPERATURE LABEL AND VALUE-->
<tr>
<td><img src="p_temp.gif" height=28 width=327 border=0 vspace=0></td>
<td width=163 align=right>
<iframe src="temp.asp" border="0" width="160" height="27" marginwidth=0 marginheight=0 hspace=0 vspace=0 frameborder=0 scrolling=no>
</iframe>
</td>
<td><img src="p_left.gif" height=28 width=36 border=0 vspace=0></td>
</tr>
<!-- ----------- -->
<tr>
<td colspan=3><img src="p_middle.gif" height=10 width=525 border=0 vspace=0></td>
</tr>
<!-- THIS SECTION IMPLEMENTS HUMIDITY LABEL AND VALUE-->
<tr>
<td><img src="p_hum.gif" height=28 width=327 border=0 vspace=0></td>
<td width=163 align=right>
<iframe src="humidity.asp" border="0" width="160" height="27" marginwidth=0 marginheight=0 hspace=0 vspace=0 frameborder=0 scrolling=no>
</iframe>
</td>
<td><img src="p_left.gif" height=28 width=36 border=0 vspace=0></td>
</tr>
<!-- ----------- -->
<tr>
<td colspan=3><img src="p_bottom.gif" height=81 width=525 border=0 vspace=0></td>
</tr>
</table>
</td>
</tr>
<tr height="1%">
<td><HR>
<p align=right><font color=Gray face="Tahoma; Arial" size="2">Copyright ? 1998-2005 BiPOM Electronics </font></p>
</td>
</tr>
</TABLE>
</body>
</html>
temp.asp
<html>
<head>
</head>
<script language = "JavaScript">
<!--
function AutoReload()
{
self.location.reload();
window.setTimeout("AutoReload()", 5000); // reinit timer
}
window.setTimeout("AutoReload()", 5000); // 5000-mseconds interval
var Temperature = ^SHT7XTEMP^;
function ConvertTemperature(t)
{
return Math.round((t*0.01-40.0)*10)/10;
}
function PlayEffect() {
tb1.style.visibility = "hidden";
tb1.filters.revealTrans.Apply();
tb1.filters.revealTrans.Play();
tb1.style.visibility = "visible";
}
//-->
</script>
<body background="digit.png" onload="PlayEffect();">
<table border=0 cellpadding=0 cellspacing=0 width="100%" id=tb1 style='filter: revealTrans(duration=1,transition=5);'>
<tr>
<td align=right>
<font color="white" size="4"><b>
<script language="VBScript" type="text/VBScript">
dim num, i, k
if Temperature = 65535 Then
document.write("<font color=Red>!!! ERROR !!!</font>")
else
i = Len(ConvertTemperature(Temperature))
k = 1
if ConvertTemperature(Temperature) < 9 and ConvertTemperature(Temperature) > -9 Then
document.write("<img src='digit.png' height='28' width='17' align=absBottom>" )
end if
Do until i = 0
num = Mid(Cstr(ConvertTemperature(Temperature)) , k, 1)
if num = "," or num = "." then
num = "dot"
else if num = "-" then
num = "minus"
end if
end if
document.write("<img src='" & num & ".png" & "' align=absBottom>" )
i = i - 1
k = k + 1
loop
document.write("<img src='cel.png' align=absBottom>")
end if
</script>
</b></font>
</td>
</tr>
</table>
</body>
</html>
humidity.asp
<html>
<head>
</head>
<script language = "JavaScript">
<!--
function AutoReload()
{
self.location.reload();
window.setTimeout("AutoReload()", 5000); // reinit timer
}
window.setTimeout("AutoReload()", 5000); // 5000-mseconds interval
var Temperature = ^SHT7XTEMP^;
var Humidity = ^SHT7XHUMI^;
function ConvertHumidity(rh)
{
var C1=-4.0;
var C2=0.0405;
var C3=-0.0000028;
var T1=0.01;
var T2=0.00008;
var t_C = Temperature *0.01 - 40;
var rh_lin=C3*rh*rh + C2*rh + C1;
var rh_true=(t_C-25)*(T1+T2*rh)+rh_lin;
if(rh_true>100){rh_true=100;}
if(rh_true<0.1){rh_true=0.1;}
return Math.round(rh_true*10)/10;
}
function PlayEffect() {
tb1.style.visibility = "hidden";
tb1.filters.revealTrans.Apply();
tb1.filters.revealTrans.Play();
tb1.style.visibility = "visible";
}
//-->
</script>
<body background="digit.png" onload="PlayEffect();">
<table border=0 cellpadding=0 cellspacing=0 width="100%" id=tb1 style='filter: revealTrans(duration=1,transition=5);'>
<tr>
<td align=right>
<font color="white" size="4"><b>
<script language="VBScript" type="text/VBScript">
dim num, i, k
if Humidity = 65535 Then
document.write("<font color=Red>!!! ERROR !!!</font>")
else
i = Len(ConvertHumidity(Humidity))
k = 1
if ConvertHumidity(Humidity) < 9 Then
document.write("<img src='digit.png' height='28' width='17' align=absBottom>" )
end if
Do until i = 0
num = Mid(Cstr(ConvertHumidity(Humidity)) , k, 1)
if num = "," or num = "." then
num = "dot"
end if
document.write("<img src='" & num & ".png" & "' align=absBottom>" )
i = i - 1
k = k +1
loop
document.write("<img src='per.png' align=absBottom>")
end if
</script>
</b></font>
</td>
</tr>
</table>
</body>
</html>
Screenshot