While kayitlar.Read() 

            ilkdiv=(kayitlar.Item("duyuru_baslik") & "<br>") 
            ikincidiv=(kayitlar.Item("duyuru") & "<br>") 
        End While
şeklinde gelen verileri değişkenlere atayınız.
örneğin htm kodlarınız
<html>
kodlar
kodlar
...
<div><%=ilkdiv%></div>

kodlar kodlar

<div><%=ikincidiv%></div>

kodlar kodlar
....
</html>
burada kırmız ile yazdıklarımız htmlnin arasına asp kodu sıkıştırıyorz.
= ifadasi bu gibi tek satırlık kodlardar response.write yerine geçer.
yani isterseniz <%response.write ilkdiv%>de yazabilirsiniz