去掉动网广告“国内使用量最大的动网论坛”的方法

打开/inc/Dv_ClsOther.asp 找到:

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
If IsSqlDataBase = 0 Then
  If not IsObject(Application(Dvbbs.CacheName & "_TextAdservices")) Then
   Set XmlAds=Application(Dvbbs.CacheName & "_TextAdservices").cloneNode(True)
  Else
    Set XmlAds=Server.CreateObject("Msxml2.FreeThreadedDOMDocument" & MsxmlVersion )
    XmlAds.appendChild(XmlAds.createElement("xml"))
    XmlAds.documentElement.appendChild(XmlAds.createNode(1,"text","")).text="<iframe src="""&Dvbbs_Server_Url&"dvbbs/DvDefaultTextAd.asp"" height=""23"" width=""100%"" marginwidth=""0"" marginheight=""0"" hspace=""0"" vspace=""0"" frameborder=""0"" scrolling=""no""></iframe>"
  End If
 Else
   Set XmlAds=Server.CreateObject("Msxml2.FreeThreadedDOMDocument" & MsxmlVersion)
   XmlAds.appendChild(XmlAds.createElement("xml"))
 End If

这段,把变成红色的这一行注释掉. 在清除服务器缓存,就行了.

网友提供的另外一种方法,没实验过: 在inc/dv_clsother.asp里 找到

1
Set proc = Application(Dvbbs.CacheName & "_showtextads_"& Dvbbs.SkinID).createProcessor()

在其前面增加一行

1
XmlAds.documentElement.removeChild(XmlAds.documentElement.childNodes.item(0))

我最擅长从零开始创造世界,所以从来不怕失败,它最多也就让我一无所有。