Microsoft VBScript runtime error '800a000d'

Type mismatch: '[string: ""]'

/ddd324/elencodati.asp, line 1303


vi mostro la query



If Trim(Session("stato")) > 0 Then
strSQL = strSQL & "%' AND stato = '" & Trim(Session("stato")) & "'"
Else
strSQL = strSQL & "%' AND NOT stato = 'AR'"
End If


cosa cè che nn va ??

fatemi sapere grazie