sapete cosa vuole dire questo errore?
Too few parameters. Expected 1.

sotto il codice.
<%

Set RsAppalti = Server.CreateObject("ADODB.Recordset")
RsAppalti.ActiveConnection = Connection
RsAppalti.Source = "SELECT IdComplesso, IdResponsabile, IdCommittente, IVA FROM complessi WHERE Attivo = 'active' AND IVA > 0 Order by IdCommittente"
RsAppalti.Open()

numero = Request("numero")
Do Until RsAppalti.EOF

Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.ActiveConnection = Connection
Rs.Source = "Select Mansione, Imponibile From Mansioni where IdComplesso = " & RsAppalti("IdComplesso") & " And Repeat = True"
Rs.Open()

Do Until Rs.EOF

IdFattura = "3370"
Mansione = Trim(Rs("Mansione"))
Imponibile = Trim(Rs("Imponibile"))

SQLVociFatture = "Insert into VociFatture (IdFattura,Mansione,Imponibile) Values (" & IdFattura & "," & Mansione & ",'" & Imponibile & "')"
Connection.Execute SQLVociFatture

Rs.MoveNext
Loop
RsAppalti.MoveNext
Loop %>