leadbbs贴子右上角增加广告代码的修改

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=http://www.51one.net/tobbs/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=http://www.51one.net/tobbs/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=http://www.51one.net/tobbs/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