<%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%>
<% Set rs = conn.execute("Select * from haberler where tur=10") if not rs.eof then sDetay2 = rs("detay") end if Set rs = nothing response.Write(sdetay2)%> <% Set rs = conn.execute("Select * from haberler where tur=4") if not rs.eof then sBaslik = rs("baslik") sID = rs("id") resim= haberresimbir(sID) sDetay = rs("detay") end if%>

<%=sBaslik%>

<%if resim<>"bos.gif" then %> <%end if%> <%=sDetay%>