He estado trabajando en un VBScript de ADO que necesita aceptar parámetros e incorporar esos parámetros en la cadena de consulta que se pasa a la base de datos. Sigo recibiendo errores cuando el objeto de conjunto de registros intenta abrirse. Si paso una consulta sin parámetros, se abre el conjunto de registros y puedo trabajar con los datos. Cuando ejecuto el script a través de un depurador, el objeto de comando no muestra un valor para el objeto de parámetro. Me parece que me falta algo que asocie el objeto Command y el objeto Parameter, pero no sé qué. Aquí hay un poco del código VBScript:

...
'Open Text file to collect SQL query string'
Set fso = CreateObject("Scripting.FileSystemObject")
fileName = "C:\SQLFUN\Limits_ADO.sql"
Set tso = fso.OpenTextFile(fileName, FORREADING)

SQL = tso.ReadAll

'Create ADO instance'
 connString = "DRIVER={SQL Server};SERVER=myserver;UID=MyName;PWD=notapassword;   Database=favoriteDB"
 Set connection = CreateObject("ADODB.Connection")
 Set cmd = CreateObject("ADODB.Command")

  connection.Open connString
  cmd.ActiveConnection = connection
  cmd.CommandText = SQL
  cmd.CommandType = adCmdText

  Set paramTotals = cmd.CreateParameter
  With paramTotals
       .value = "tot%"
       .Name = "Param1"
  End With

  'The error occurs on the next line'
  Set recordset = cmd.Execute

  If recordset.EOF then
      WScript.Echo "No Data Returned"
  Else
      Do Until recordset.EOF
            WScript.Echo recordset.Fields.Item(0) ' & vbTab & recordset.Fields.Item(1)
            recordset.MoveNext
      Loop
  End If

La cadena SQL que uso es bastante estándar, excepto que quiero pasarle un parámetro. Es algo como esto:

SELECT column1
FROM table1
WHERE column1 IS LIKE ?

Entiendo que ADO debería reemplazar el "?" con el valor del parámetro que asigno en el script. El problema que estoy viendo es que el objeto de parámetro muestra el valor correcto, pero el campo de parámetro del objeto de comando es nulo según mi depurador.