<%
Dim Recordset1
Dim Recordset1_cmd
Dim Recordset1_numRows
Set Recordset1_cmd = Server.CreateObject ("ADODB.Command")
Recordset1_cmd.ActiveConnection = MM_coon_STRING
Recordset1_cmd.CommandText = "SELECT * FROM 表1 WHERE m_xuehao = ?"
Recordset1_cmd.Prepared = true
Recordset1_cmd.Parameters.Append Recordset1_cmd.CreateParameter("param1", 200, 1, 255, Recordset1__MMColParam) ' adVarChar
Set Recordset1 = Recordset1_cmd.Execute
Recordset1_numRows = 0
%>
红色那一行报错....
------解决方案--------------------
没什么问题。是不是参数Recordset1__MMColParam没有值，输出看看
response.write "
------解决方案--------------------
"&Recordset1__MMColParam&"
------解决方案--------------------
"
Recordset1_cmd.CommandText = "SELECT * FROM [表1] WHERE m_xuehao = ?"