<%=redkod("site_aciklama")%>

• Anasayfa
• Haberler
• Multimedya
• Ziyaretçi Defteri
• Projeler
• Ürünler
• İletişim

SAYFALAR

DOSYALAR

<% Set redkod = Server.CreateObjecT("ADODB.RecordSet") rSQL = "Select * FROM defter Where onay=true order by id desc" redkod.open rSQL,conn,1,3 if redkod.eof Then Response.Write "Kayıt Girilmemiş." Else If (not redkod.eof) then sayfa = Request.QueryString("sayfa") If sayfa="" Then sayfa=1 redkod.pagesize = 1 redkod.absolutepage = sayfa sayfa_sayisi = redkod.pagecount for i=1 to redkod.pagesize if redkod.eof then exit for end if %>

GÖRÜŞLER

ANKET

VİDEO

İSTATİSTİKLER

Projeler

<% set redkod = server.createobject("adodb.recordset") galeriSirala = 6 tablo = "Select * from Projeler " redkod.pagesize = 32 redkod.open tablo,conn,1,3 if redkod.eof Then Response.Write " Kayıtlı Veri bulunamadı" Else if request.QueryString("s")="" or request.querystring("s")=0 then s=1 else s=request.QueryString("s") end if redkod.AbsolutePage = s %> <% for k=1 to redkod.pagesize %> <% if redkod.eof or redkod.bof then exit for %> <% if yan=galeriSirala then response.write ("") yan=0 End if %> <% yan=yan+1 if yan = (uretimlerSirala+1) then response.write ("") end if %> <% redkod.movenext : next redkod.close set redkod=Nothing End if %> -