后台编辑文章或删除文章时就出现：

Microsoft VBScript 运行时错误 错误 '800a005e' 无效使用 NUll ：'CInt'

\admin\KS.Article.asp,line 578

578行是红色代码部分：求大家帮忙给解决一下

Sub showContent(SQL)

With Response

For I=0 To Ubound(SQL,2)

If CInt(SQL(5,I)) = 1 Then

TypeStr = "图文"

Else

     TypeStr = "普通"

End If

    AttributeStr = ""

If SQL(7,I) = 1 Or SQL(8,I) = 1 Or SQL(9,I) = 1 Or SQL(10,I) = 1 Or SQL(11,I) = 1 Or SQL(12,I) = 1 Then

  If SQL(7,I) = 1 Then AttributeStr = AttributeStr & (" <span title=""推荐" & KS.C_S(ChannelID,3) & """ style=""cursor:default""><font color=""green"">荐</font></span> ")

  If SQL(8,I) = 1 Then AttributeStr = AttributeStr & ("<span title=""热门" & KS.C_S(ChannelID,3) & """ style=""cursor:default""><font color=""red"">热</font></span> ")

  If SQL(9,I) = 1 Then AttributeStr = AttributeStr & ("<span title=""今日头条"" style=""cursor:default""><font color=""#0000ff"">头</font></span> ")

  If SQL(10,I) = 1 Then AttributeStr = AttributeStr & ("<span title=""滚动" & KS.C_S(ChannelID,3) & """ style=""cursor:default""><font color=""#F709F7"">滚</font></span> ")

  If SQL(11,I) = 1 Then AttributeStr = AttributeStr & ("<span title=""幻灯片" & KS.C_S(ChannelID,3) & """ style=""cursor:default""><font color=""black"">幻</font></span>")

  IF SQL(12,I) = 1 Then AttributeStr = AttributeStr & ("<span title=""固顶" & KS.C_S(ChannelID,3) & """ style=""cursor:default""><font color=""brown"">固</font></span>")

   Else

AttributeStr = "---"

   End If