this is part my VB script:

<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/testconn.asp" -->
<%
Dim Recordset1
Dim Recordset1_cmd
Dim Recordset1_numRows

Set Recordset1_cmd = Server.CreateObject ("ADODB.Command"
<font color=red> Recordset1_cmd.ActiveConnection = MM_testconn_STRING </font id=red>
Recordset1_cmd.CommandText = "SELECT DISTINCT DDF FROM MOCBGdata"
Recordset1_cmd.Prepared = true

Set Recordset1 = Recordset1_cmd.Execute
Recordset1_numRows = 0
%&gt;


i got error with the red line as Error Type:
ADODB.Command (0x800A0BB9)
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another

how come? and how to solve the prob?