问题出现在在用户所在的用户组设置,允许删除已审核的文章时出现如题问题,解决方法;
以打开ks_cls/kesion.membercls.asp
找到
394行左右
If KS.ChkClng(KS.U_S(GroupID,1))=1 Then
Conn.Execute("Delete From " & KS.C_S(ChannelID,2) &" Where Inputer='" & UserName & "' And ID In(" & ID & ")")
Else
Conn.Execute("Delete From " & KS.C_S(ChannelID,2) &" Where Inputer='" & UserName & "' and Verific<>1 And ID In(" & ID & ")")
End If
Conn.Execute("Delete From KS_ItemInfo Where Inputer='" & UserName & "' and Verific<>1 and InfoID in(" & ID & ") and channelid=" & ChannelID)
改为
If KS.ChkClng(KS.U_S(GroupID,1))=1 Then
Conn.Execute("Delete From " & KS.C_S(ChannelID,2) &" Where Inputer='" & UserName & "' And ID In(" & ID & ")")
Conn.Execute("Delete From KS_ItemInfo Where Inputer='" & UserName & "' and InfoID in(" & ID & ") and channelid=" & ChannelID)
Else
Conn.Execute("Delete From " & KS.C_S(ChannelID,2) &" Where Inputer='" & UserName & "' and Verific<>1 And ID In(" & ID & ")")
Conn.Execute("Delete From KS_ItemInfo Where Inputer='" & UserName & "' and Verific<>1 and InfoID in(" & ID & ") and channelid=" & ChannelID)
End If
这样以后在会员中心删除文章就不会出现ks_iteminfo表没有删除的情况了。