实现滚动新闻

核心提示：经 常 在 一 些 站 点 看 到 有 这 样 的 东 东 ，一 个 方 框 ，实现滚动新闻， 里 面 的 内 容 （ 通 常 是 新 闻 标 题 ）滚 动 播 出 ， 周 而 复 始 ， 当 然 要 显 示 日 期 ， 也 可 是 其 他 的 提 示 信 息 left,top 方 框 的 绝 对 坐 标 NewS

经 常 在 一 些 站 点 看 到 有 这 样 的 东 东 ，一 个 方 框 ， 里 面 的
内 容 （ 通 常 是 新 闻 标 题 ）滚 动 播 出 ， 周 而 复 始 。 其 实 在
IE 4 上 显 示 这 样 的 功 能 是 异 常 简 单 的 事 情 。
　 　 主 要 函 数 只 有 一 个 ：
　 　 sub ShowNews
　 　 (TitleStr,TitleLink,DateStr,left,top,NewsStr)
　 　 参 数 说 明 ：
　 　 TitleStr 方 框 的 标 题
　 　 TitleLink 方 框 标 题 的 联 接 ， 可 以 为 空 串
　 　 DateStr 如 果 是 新 闻 ， 当 然 要 显 示 日 期 ， 也 可 是 其 他
的 提 示 信 息
　 　 left,top 方 框 的 绝 对 坐 标
　 　 NewStr 实 际 显 示 的 信 息 及 其 联 接 ， 是 个 两 维 数 组 。
调 用 范 例
<!-- #include file="news.inc" -->
<%
dim NewsStr(1,5)
NewsStr(0,0)="下载本公告栏"
NewsStr(1,0)="http://www.aaaaaaa.aaaaaa"

NewsStr(0,1)="xxx"
NewsStr(1,1)="http://www.xxx.com/"

NewsStr(0,2)="软件下载"
NewsStr(1,2)="http://www.xxx.com/"

NewsStr(0,3)="球迷贺卡"
NewsStr(1,3)="http://www.soccerchina.com/postcard"

NewsStr(0,4)="中文YAHOO"
NewsStr(1,4)="http://gbchinese.yahoo.com"

NewsStr(0,5)="足球世界"
NewsStr(1,5)="http://www.soccerchina.com"

ShowNews "网站一览","","98-12-15",10,100,NewsStr
%>