<% deisken=request.querystring("id") set mesax=server.createobject("adodb.recordset") sqll="select * from haber where kimlik=" & deisken mesax.open sqll,baglanti,1,3 mesax("okunma")=mesax("okunma") + 1 mesax.Update %>
<%=mesax("baslik")%>
<%=mesax("tarih")%>
" width="111" height="95" align="left"> <%=mesax("haber")%>
Okunma :<%=mesax("okunma")%>
<% mesax.close() set mesax=nothing baglanti.close:set baglanti=nothing%>
<%=mesax("baslik")%> <%=mesax("tarih")%>