欧美性猛交XXXX免费看蜜桃,成人网18免费韩国,亚洲国产成人精品区综合,欧美日韩一区二区三区高清不卡,亚洲综合一区二区精品久久

1、修改dispbbs.asp文件
找到
     InStr(Ubblists,",39,") > 0  Then
       Node.selectSingleNode("@body").text = dv_ubb.Dv_UbbCode(postbody,UserGroupID,1,0)
    Else
       Node.selectSingleNode("@body").text = dv_ubb.Dv_UbbCode(postbody,UserGroupID,1,1)
    End If

改成
      If InStr(Ubblists,",39,") > 0  Then
      If Dvbbs.userid=0 then    
           Node.selectSingleNode("@body").text = left(Node.selectSingleNode("@body").text,250)&"......<br><br><p></p>  <font color=#AAAAAA>您還沒(méi)有登陸，欲知全文內容，請選擇<a href=reg.asp><font color=red>[注冊]</font></a>或者<a href=login.asp><font color=blue>[登陸]</font></a>。</font>"
           Else
       Node.selectSingleNode("@body").text = dv_ubb.Dv_UbbCode(postbody,UserGroupID,1,0)
      End if
     Else
      If Dvbbs.userid=0 then
             Node.selectSingleNode("@body").text = left(Node.selectSingleNode("@body").text,250)&"......<br><br><p></p>  <font color=#AAAAAA>您還沒(méi)有登陸，欲知全文內容，請選擇<a href=reg.asp><font color=red>[注冊]</font></a>或者<a href=login.asp><font color=blue>[登陸]</font></a>。</font>"
           Else
       Node.selectSingleNode("@body").text = dv_ubb.Dv_UbbCode(postbody,UserGroupID,1,1)
      End if
     End If

2、修改TopicOther.asp文件
找到
   Templist=Replace(Templist,"{$body}",SimJsReplace(dv_ubb.Dv_UbbCode(SQL(3,i),SQL(4,i),1,1)))
改成
      If Dvbbs.userid=0 then
        Dvbbs.AddErrCode(6)
        Dvbbs.Showerr()
      Else
   Templist=Replace(Templist,"{$body}",SimJsReplace(dv_ubb.Dv_UbbCode(SQL(3,i),SQL(4,i),1,1)))
   End if
修改結束

注：其中的紅字部分可以修改成你需要顯示的文章的長(cháng)度。