**************************************************************************
'                         存储过程的调用
**************************************************************************
  
Dim mycommand As ADODB.Command
Dim rstByQuery As RecordsetSet mycommand = New ADODB.Commandmycommand.Parameters.Append mycommand.CreateParameter("tel", adVarChar, adParamInput, 200)
mycommand("tel") = s手机
mycommand.Parameters.Append mycommand.CreateParameter("rq", adDate, adParamInput)
mycommand("rq") = d日期
mycommand.Parameters.Append mycommand.CreateParameter("ss", adVarChar, adParamOutput, 200)mycommand.ActiveConnection = db
mycommand.CommandText = "SearchByTel"
mycommand.CommandType = adCmdStoredProc      '表明command 为存储过程Set RsShow = mycommand.Execute()执行时报错: [Microsoft][ODBC SQL Server Driver]没有执行可选特性
 请问如何解决?