账号通
    

账号  

密码  

2374

查看

3

回复
主题:[分享]KesionCMS V8.0x后台调查系统里删除选中调查时把所有的调查都删除的修正 [收藏主题] 转到:  
科汛官方 当前离线

47268

主题

145

广播

405

粉丝
添加关注
级别:管理员

用户积分:101604 分
登录次数:7935 次
注册时间:2006/12/7
最后登录:2023/12/14
科汛官方 发表于:2011/12/13 9:32:30   | 显示全部帖子 查看该作者主题 楼主 

问题:在后台调查系统里当后台删除选某个调查时,会全部把所有的调查都删除了。



解决方法:



打开admin/ks.vote.asp



98行

   function DelVote(id)

   {

    if (id=='') id=get_Ids(document.myform);

    if (id==''){

      alert('请先选择要删除的调查主题!')

    }else if  (confirm('真的要删除选中的调查主题吗?')){

    location="KS.Vote.asp?Action=Del&Page="+Page+"&Voteid="+id;

    }

   }



把红色的voteid改成id



再往下找到192行

   Sub VoteDel()

    Dim ID,IDArr,I

    ID=KS.S("VoteID")

    If KS.IsNul(ID) Then Call KS.AlertHintScript("请选择要删除的主题!")

    IDArr=Split(KS.FilterIds(ID),",")

    For I=0 To Ubound(IDArr)

    KS.DeleteFile(KS.Setting(3)&"config/voteitem/vote_" & IDArr(i) &".xml")

    Conn.Execute("delete from KS_Vote where ID="&Clng(IDArr(i)))

    Conn.Execute("delete from KS_PhotoVote where channelid=-1 and InfoID='"&Clng(IDArr(i))&"'")

    Next

    Response.redirect "KS.Vote.asp?Page="&KS.G("Page")

   End Sub



同样把上面红色的voteid改成id即可。

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.08203秒 powered by KesionCMS 9.0