<%
dim strTelNo
select case lcase(channelid)
case "channel_0000032"
strTelNo="0512-65210545"
case "channel_0000018"
strTelNo="0512-68667430"
case "channel_0000017"
strTelNo="0512-68261188"
case "channel_0000019"
strTelNo="0512-68261188"
case "channel_0000020"
strTelNo="0512-68261188"
case "channel_0000021"
strTelNo="0512-65240380"
case else
strTelNo="0512-65155020"
end select
%>
