quickview.asp question

[adiaz]

OK Peeps are you sick of me yet? I know I am a pain in the bum!
visit my quickview page : My quickview page

I have 2 questions;
1 On the top under the title bar I have a Forecast going It scrolls along under the left of the title bar It isn't getting data to display. I havent a clue where this is comming form to either delete or put the data in. Does any one know?

Also notice that my lighting Status only shows "on" or "off" for the status. I would like to have the on and off bulbs there or a similar gif instead of words.Please tell me what to add to get it to show icons rather than text.

Thanks!

Here is the snippet from the page that reports the status of lighting:


'>>>>> Begin Lighting Status Table <<<<<

response.write "<table border='0' cellpadding='0' cellspacing='1' width='100%'>"
response.write "<tr>"
response.write "<td class='tableheader' colspan='2'>Lighting Status</td></tr>"

response.write "<table border='0' cellpadding='0' cellspacing='1' width='100%'>"

response.write "<tr>"
response.write "<td class='tablerowodd' align='absmiddle' width='70'>Office Desk Lamp</td>"

if hs.DeviceValue("A2") > 0 then
strVar = "On"
else
strVar = "Off"
end if
response.write "<td class='tablecellcustom' align='center' cellspacing='0' cellpadding='0'>"
response.write strVar & "</td></tr>"

response.write "<tr>"
response.write "<td class='tablerowodd' align='absmiddle' width='150'>Front Porch Lights</td>"

if hs.DeviceValue("F1") > 0 then
strVar = "On"
else
strVar = "Off"
end if
response.write "<td class='tablecellcustom' align='center' cellspacing='0' cellpadding='0'>"
response.write strVar & "</td></tr>"

response.write "<tr>"
response.write "<td class='tablerowodd' align='absmiddle' width='150'>Back Porch Lights</td>"

if hs.DeviceValue("B2") > 0 then
strVar = "On"
else
strVar = "Off"
end if
response.write "<td class='tablecellcustom' align='center' cellspacing='0' cellpadding='0'>"
response.write strVar & "</td></tr>"

response.write "<tr>"
response.write "<td class='tablerowodd' align='absmiddle' width='150'>Outside Garage Carriage Lights</td>"

if hs.DeviceValue("G5") > 0 then
strVar = "On"
else
strVar = "Off"
end if
response.write "<td class='tablecellcustom' align='center' cellspacing='0' cellpadding='0'>"
response.write strVar & "</td></tr>"

response.write "<tr>"
response.write "<td class='tablerowodd' align='absmiddle' width='150'>Living Room Lamp</td>"

if hs.DeviceValue("L1") > 0 then
strVar = "On"
else
strVar = "Off"
end if
response.write "<td class='tablecellcustom' align='center' cellspacing='0' cellpadding='0'>"
response.write strVar & "</td></tr>"

response.write "<tr>"
response.write "<td class='tablerowodd' align='absmiddle' width='150'>Backyard Pool Light Motion Sensor Light</td>"

if hs.DeviceValue("E5") > 0 then
strVar = "On"
else
strVar = "Off"
end if
response.write "<td class='tablecellcustom' align='center' cellspacing='0' cellpadding='0'>"
response.write strVar & "</td></tr>"

response.write "<tr>"
response.write "<td class='tablerowodd' align='absmiddle' width='150'>Media Room Table Lamp</td>"

if hs.DeviceValue("A1") > 0 then
strVar = "On"
else
strVar = "Off"
end if
response.write "<td class='tablecellcustom' align='center' cellspacing='0' cellpadding='0'>"
response.write strVar & "</td></tr>"

response.write "<tr>"
response.write "<td class='tablerowodd' align='absmiddle' width='150'>Turtle Aquarium Lighting</td>"

if hs.DeviceValue("B3") > 0 then
strVar = "On"
else
strVar = "Off"
end if
response.write "<td class='tablecellcustom' align='center' cellspacing='0' cellpadding='0'>"
response.write strVar & "</td></tr>"

response.write "</table>"

'-----End Light Status Table-----

[paugusto]

Al,

The forecast info comes from running the WeatherMan Script Package. The display of it's data in the custom header is controlled by "Show Page Scroll" and "Use WeatherMan Alert Links" on the includes setup page (setup_includes.asp in your includes folder). Set them both to "No" to supress the display.

To get the on/off icons in your status, change each instance of:
strVar = "On"
to
strVar = "<img align=""absmiddle"" src=""/on.gif""> On"

and

strVar = "Off"
to
strVar = "<img align=""absmiddle"" src=""/off.gif""> Off"


Paul

[adiaz]

Again many thnks woked like a charm!