Non esegue la query di inserimento valori

[fraude]

Ciao, qualcuno mi spiega perchè questo codice non esegue la query????
Str si valorizza come:

1-pagina test

str = sigla
response.write str & "
"
set re = new RegExp
re.Pattern="(\d+)-([^-]+)-([^-]+)"
re.Global=true
Response.Write str & "<hr>" & re.Pattern & "<hr>"
set ris = re.Execute(str)
for each rr in ris
	sql = "INSERT INTO Software (campi...) VALUES (" & campi & "'...)"
	cn.execute(sql)
next