<%
bolum=guvenlik(request("bolum"))
If Not Isnumeric(bolum) Or Len(bolum)=0 Then
msg ""
End If
Set rs= cilem.execute("SELECT * FROM haber WHERE haberonay='Evet' and bolum=" & guvenlik(request("bolum")))
If rs.eof Then
msg""
End If
%>
<% Sub msg(uyari)%>
<%= uyari %>
<% response.end
End Sub %>
<%bolum=guvenlik(request("bolum"))
set rs=server.createobject("adodb.recordset")
rs.open "haber where haberonay='Evet' and bolum=" & guvenlik(request("bolum")),cilem,1,3
%>
<%=rs("baslik")%>
<%if rs("resimsiz")="" or rs("resimsiz")="Kapat" then %><% else %>
<%=rs("resimurl")%><% else %>resim/<%=rs("resim")%><% end if%>" alt="<%=rs("baslik")%>" style="border:1px solid #DDDDDD; width: 150px; " align="left" border="0" /><% end if%>