WEB开发网
开发学院CMS教程dvbbs 动网论坛教程:发帖语气重修改 阅读

动网论坛教程:发帖语气重修改

 2010-07-22 18:58:33 来源:WEB开发网   
核心提示: function GetSpeakSelect(id){aSpeak[0] = '选择语气...';if(!id){id=0}var sSpeak;for (i = 0;i <= aSpeak.length-1;i++)

function GetSpeakSelect(id){
aSpeak[0] = '选择语气...';
if(!id){id=0}
var sSpeak;
for (i = 0;i <= aSpeak.length-1;i++){
  sSpeak += '<option value="' + i + '">' + aSpeak + '</option>';
}

sSpeak = '<select name="Speak">' + sSpeak + '</select>';
document.write(sSpeak);
}
/******************************************************************************
* 论坛发帖子语气插件添加JS部分结束                       *
******************************************************************************/

2、打开dispbbs.asp文件,做以下修改:
找到
  '========随机广告节点
  Set CNode = XMLDOM.createNode(2,"ads","")
  Cnode.text=Topic_Ads()
  node.attributes.setNamedItem(Cnode)
  Rs.MoveNext

  Set CNode = XMLDOM.createNode(2,"ads","")
  Cnode.text=Topic_Ads()
  node.attributes.setNamedItem(Cnode)

  Rs.MoveNext
之间添加
  '发帖语气
  Set CNode = XMLDOM.createNode(2,"Speak","")
  Cnode.text= Split(node.attributes.getNamedItem("Ubblist").text,",")(0)
  node.attributes.setNamedItem(Cnode)
  '发帖语气
即改成
  '========随机广告节点
  Set CNode = XMLDOM.createNode(2,"ads","")
  Cnode.text=Topic_Ads()
  node.attributes.setNamedItem(Cnode)
  '发帖语气
  Set CNode = XMLDOM.createNode(2,"Speak","")
  Cnode.text= Split(node.attributes.getNamedItem("Ubblist").text,",")(0)

上一页  1 2 3 4 5  下一页

Tags:论坛 教程 发帖

编辑录入:爽爽 [复制链接] [打 印]
赞助商链接