Ciclo for each e query insert into

[orcim]

Ciao, non riesco a far passare il valore della variabile MMore nella query insert into, dov'è l'errore:

for each strVar in recordsetA.fields
for each strVas in recordsetB.fields
    
Dim MMore     
IF recordsetA("valoreA") < recordsetB("valoreB")  then
MMore = DVDR
end if

IF recordsetA("valoreA") < 1 AND recordsetB("valoreB") < 2 then
MMore = DVDRW
end if

      if strVar.name = strVas.name then
      if strVar.value < strVas.value then

SQL = "INSERT INTO RisorsePC (ID, data, Valore) VALUES ("& recordsetA("ID") &", #"& now &"#, '"& MMore &"')"