Questa

Set RS=dbconn.Execute(sql)

falla diventare semplicemente:

dbconn.Execute(sql)

Roby