set haber= conn.execute("select (comments.id) as cevid,comments.poster,comments.comment,comments.da te,data.* from data left join comments on data.id=comments.dataid where comments.dataid=" & id )