<% id=suz(request.querystring ("id")) set rst = bag.execute("select * from kategori where id=" & suz((id)) & " ") katid= rst("id" ) kategoriid= rst("id" ) kategori= rst("kategori") aciklama= rst("aciklama") rst.close set rst=nothing %> <%=kategori%> - <%=anatitle%> <%=googleanaliz%> <%Fox_feed()%> <%Fox_topmenu()%> <%Fox_nav()%>
EKİM MATBAA - <%=kategori%>

<%=aciklama%>
<%Fox_sol()%>
    <% id = suz(request.querystring("id")) set extra = bag.execute("select * from altkategori where katid=" & suz(kategoriid) & " order by id desc") IF extra.EOF THEN else Do while not extra.eof %>
  • "> <%=extra("altkategori")%>
    • <% extra.movenext:loop end if extra.close set extra=nothing %>
<% id = request.querystring("id") galeriSirala = 4 Set Rs=Server.CreateObject("Adodb.Recordset") Sorgu = "select * from urunler where katid=" & suz((id)) & " order by id desc" rs.pagesize = 60 Rs.Open Sorgu, bag, 1, 1 IF rs.EOF THEN else response.Write("
") if request.QueryString("s")="" or request.querystring("s")=0 then s=1 else s=request.QueryString("s") end if rs.AbsolutePage = s %> <% for k=1 to rs.pagesize if rs.eof or rs.bof then exit for if yan=galeriSirala then response.write ("") yan=0 End if %> <% yan=yan+1 if yan = (galeriSirala+1) then response.write ("") end if rs.movenext : next %>
">" alt="<%=rs("baslik")%>" />
"> <%=rs("baslik")%>
<%=rs("urunkod")%>
'">
');">
&text=Ekim Matbaa - <%=rs("baslik")%>'">
&text=Ekim Matbaa - <%=rs("baslik")%>'">

<% for x=1 to rs.pagecount %> <% next end if rs.close set rs=nothing %>
<%Fox_altfooter()%>
<%Fox_footer()%>