asp script yorum onayı

asp scriptte ziyaretçilerin yazdığı soru cevap onaylanmadan yayınlanmasın istiyorum . bunu nasıl yapabilirim?

<% set yorumlar = tkm.execute("select * from tbl_yorumlar where onay = 1") %>
<%
harf = Request.QueryString("harf" )
set rs = server.CreateObject("adodb.recordset")
sql="Select * from tbl_sorular order by id desc"

birinci sorgu (tablon varsa) doğru gözüküyor zaten.

(yani veritabanında onay tablosu yapacan, yorumlar kaydedilirken -veya default olarak- değerini 0 yapacan. sorgu onaysız olduğu için çekmeyecek.)

veritabanını açıp baktıgımda onay tablosunda karşısında 1 yazanlarda 0 yazanlarda sayfa içerisinde gözukuyorlar,onaylılarda onaysızlarda...

ama burada sadece onaylı olanları çekmesi lazım yanı 1 olan değerleri tabloya bağlantın onu gösteriyor
<% set yorumlar = tkm.execute("select * from tbl_yorumlar where onay = 1") %>