7、留言本点精华，置顶出错

解决方法：

打开guestbook/index.asp

并找到,61行

FileContent=Replace(FileContent,"{$GuestTitle}",conn.execute("select boardname from ks_guestboard where id=" & boardid)(0))
替换成如下代码

on error resume next
        FileContent=Replace(FileContent,"{$GuestTitle}",conn.execute("select boardname from ks_guestboard where id=" & boardid)(0))
        if err then
         if KS.S("Istop")="1" then
          FileContent=Replace(FileContent,"{$GuestTitle}","置顶帖子")
         else
          FileContent=Replace(FileContent,"{$GuestTitle}","精华帖子")
      end if
        end if