 |
<%
dim m,rs,sql,topclass
m=0
set rs = server.createobject("adodb.recordset")
sql = "SELECT * FROM program"
rs.open sql, conn, 1, 1
if err.number <> 0 then
response.write "数据库连接出错"&err.description
else
do while not rs1.eof
%>
| 番禺早晨 |
| 常在我心间 |
| 摇摆都市 |
| 叹世界 |
| 股来股去 车天车地 律师与你 |
| 乐不群 |
| 一点放纵 |
| 粤曲查笃撑 |
| 友共情 |
| 挥洒阳光 |
| 假日想点 |
| 最爱广播剧 |
| 嘻嘻哈哈太阳吧 |
| 星 club 扬声器 |
| 淘淘吧 |
| 今晚你想点 |
| 夜飞翔 |
| 快乐者联盟 |
| |
<%
end if
rs.close
%>
|
|
