苹果6的万能钥匙怎么用:asp问题Microsoft OLE DB Provider for ODBC Drivers (0x80040E0C)

<!--#include file="../Connections/mccx.asp" -->
<%
Dim kscx__MMColParam
kscx__MMColParam = "1"
If (Request.QueryString("gjz") <> "") Then
kscx__MMColParam = Request.QueryString("gjz")
End If
%>
<%
Dim kscx
Dim kscx_numRows

Set kscx = Server.CreateObject("ADODB.Recordset")
kscx.ActiveConnection = MM_mccx_STRING
select case request("tj")
case "1" '器件名称
kscx.Source = "SELECT qjmc, qjgn, qja, lbmc FROM qjb WHERE qjmc = '" + Replace(kscx__MMColParam, "'", "''") + "'"
case "2" '器件类别
kscx.Source = "SELECT qjmc, qjgn, qja, lbmc FROM qjb WHERE lbmc = '" + Replace(kscx__MMColParam, "'", "''") + "'"
case "3" '器件功能
kscx.Source = "SELECT qjmc, qjgn, qja, lbmc FROM qjb WHERE qjgn = '" + Replace(kscx__MMColParam, "'", "''") + "'"
end select
kscx.CursorType = 0
kscx.CursorLocation = 2
kscx.LockType = 1
kscx.Open()
kscx_numRows = 0