修改方法:
打开Plus/Mood.asp,找到Function GetVoteStr()这段代码,查找
- Dim ItemVoteNum(15)
- TotalVote=0
增加红色部分。往下,查找
- VoteStr=VoteStr & "<table border=""0"" width=""100%"" cellspacing=""0"" cellpadding=""0""><tr><td class=""mood_top"" colspan=""15"">您看到此" & KS.C_S(ChannelID,4) & KS.C_S(ChannelID,3) & "时的感受是:已有 <b><font size=""5"" color=red>" & TotalVote & "</font></b> 人表态!</td></tr><tr>"
对应增加红色部分。再往下,查找
- VoteStr=VoteStr & "<td valign=""bottom"" style=""text-align:center"">" & ItemVoteNum(I) & "<br><img alt=""" & Percentage & "%"" src=""" & KS.Setting(2) & "/images/default/post.gif"" height=""" & PerVote*50 & """ width=""20""><br><img alt=""" & VoteItemArr(0) & """ src=""" & ImgSrc & """ border=""0""><br>" & VoteItemArr(0) & "<br><input type=""radio"" onclick=""MoodPosition(" & I &");"" name=""votebutton""></td>"
改为
- VoteStr=VoteStr & "<td valign=""bottom"" style=""text-align:center"">" & ItemVoteNum(I) & "<br><img alt=""" & Percentage & "%"" src=""" & KS.GetDomain & "images/default/post.gif"" height=""" & PerVote*50 & """ width=""20""><br><img style=""CURSOR: hand"" onclick=""MoodPosition(" & I &");"" alt=""" & VoteItemArr(0) & """ src=""" & ImgSrc & """ border=""0""><br>" & VoteItemArr(0) & "</td>"
顺便将在二级目录下投票后柱状图不显示的BUG一并修复。
好啦,修改完毕!