I assume id_aduan is the autonumber field? If so, you should not be using the quotes around the value. You also don't need the * in the statement. Try this: (assumming you have set aduan equal to a numerical value rather than a string value.)
sq2= "DELETE FROM tb_aduan WHERE id_aduan=" & aduan
set rs =db.execute(sq2)
Tim