以前用DV6时做过的效果,现在闲着没事拉出来给大家。
Announce/Announce.asp中1177行和1648行(官主原版未修改时):
Response.Write GetData(8,n)
修改为:
Response.Write "<TABLE cellSpacing=0 cellPadding=0 border=0 width='100%'><TR><td><table width=150 height=150 border=0 align=right cellpadding=0 cellspacing=0><tr><td align=center valign=top><img src=../images/muma.gif width=150 height=150></td></tr></table>"
Response.Write GetData(8,n)
Response.Write "</TR></table>"
代码中蓝色部分为广告表格大小,可自由调整;
代码中红色部分为广告内容代码,可自由调整。
树型显示时,请修改announce2.asp中:
Response.Write Form_Printcontent
修改为:
Response.Write "<TABLE cellSpacing=0 cellPadding=0 border=0 width='100%'><TR><td><table width=150 height=150 border=0 align=right cellpadding=0 cellspacing=0><tr><td align=center valign=top><img src=../images/muma.gif width=150 height=150></td></tr></table>"
Response.Write Form_Printcontent
Response.Write "</TR></table>"
因我的网站服务器正在调整中,如果有哪位兄弟可以提供演示,请留下地址,非常感谢!
小弟水平不高,只是希望能向文水哥哥学习一下,也希望对一些新手有所帮助。
如需仅在第一贴中显示,修改Announce/Announce.asp中:
Response.Write GetData(8,n)
修改为:
If cCur(GetData(1,n)) = 0 Then
Response.Write "<TABLE cellSpacing=0 cellPadding=0 border=0 width='100%'><TR><td><table width=150 height=150 border=0 align=right cellpadding=0 cellspacing=0><tr><td align=center valign=top><img src=../images/muma.gif width=150 height=150></td></tr></table>"
Response.Write GetData(8,n)
Response.Write "</TR></table>"
else
Response.Write GetData(8,n)
end if
------------------
转自:http://www.leadbbs.com/a/a.asp?B=200&ID=1871039&Ar=1871578&AUpflag=1&Ap=2&Aq=2&E=0