滚动新闻

主 要 函 数 只 有 一 个 ：

　 　 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.forasp.cn"



NewsStr(0,1)="网站制作学习"

NewsStr(1,1)="http://www.forasp.cn/"



NewsStr(0,2)="网站制作学习"

NewsStr(1,2)="http://www..forasp.cn/"



NewsStr(0,3)="网站制作学习"

NewsStr(1,3)="http://www.forasp.cn"



NewsStr(0,4)="网站制作学习"

NewsStr(1,4)="http://www.forasp.cn"



NewsStr(0,5)="网站制作学习"

NewsStr(1,5)="http://www.forasp.cn"

%>

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