Ciao a tutti, ho un problemino, vorrei recuperare i dati di un db, usando come filtro un datodi un'altro recordset presente nella pagina stessa, cioè:

il record set "QuantitaProdotto" carica i dati usando come filtro il campo "Quantita" del RecordSet "OrdineEffettuato"

come mai recuperando i dati con questo sistema:

codice:
<%
Dim QuantitaProdotto__MMColParam
QuantitaProdotto__MMColParam = "(OrdineEffettuato.Fields.Item("Quantita").Value)"
If (Request("MM_EmptyValue") <> "") Then 
  QuantitaProdotto__MMColParam = Request("MM_EmptyValue")
End If
%>
<%
Dim QuantitaProdotto
Dim QuantitaProdotto_numRows

Set QuantitaProdotto = Server.CreateObject("ADODB.Recordset")
QuantitaProdotto.ActiveConnection = MM_ConnessioneImpericaweb_STRING
QuantitaProdotto.Source = "SELECT * FROM Offertissime_quantità_valori WHERE id_quantita = '" + Replace(QuantitaProdotto__MMColParam, "'", "''") + "'"
QuantitaProdotto.CursorType = 0
QuantitaProdotto.CursorLocation = 2
QuantitaProdotto.LockType = 1
QuantitaProdotto.Open()

QuantitaProdotto_numRows = 0
%>
mi da questo errore?

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/area_riservata/Offertissime/ordine_ok2.asp, line 67

QuantitaProdotto__MMColParam = "(OrdineEffettuato.Fields.Item("Quantita").Val ue)"
---------------------------------------------------------------^
Grazie tante per l'aiuto....