IE4 DHTML + ASP 实现滚动新闻

　经常在一些站点看到有这样的东东，一个方框，里面的内容（通常是新闻标题） 滚动播出，周而复始。其实在IE 4 上显示这样的功能是异常简单的事情。 飞鸟就做了一个，不敢独享（反正我也没有ASP站点好用，我做INTRANET，扔在公司局网 上除了自己也没人会看），将源码共享给大家。

　 　 主要函数只有一个：

　 　 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.netease.com/~liaoyu/news.zip"

NewsStr(0,1)="网络学堂"

NewsStr(1,1)="http://www.soccerchina.com/school/"

NewsStr(0,2)="软件下载"

NewsStr(1,2)="http://www.soccerchina.com/school/"

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