PR Danışmanlık > Kurumsal > Sertifikalar Site Haritası | İletişim Bilgileri
 
  Sertifikalar  
<% page = IDCntrl(Request.QueryString("page")) if page="" then page="1" end if SET RSPCL=Server.CreateObject("ADODB.Recordset") RSPCL.open "SELECT * FROM ProCertificates WHERE langID=1 and status=1 order by proCertificateID DESC",Conna,3,1 if RSPCL.RecordCount>0 then RSPCL.pagesize=20 sortNo=5 RSPCL.AbsolutePage=page end if %> <% if RSPCL.RecordCount>0 then %> <% for i=1 to cint(RSPCL.pagesize/sortNo) %> <% if not RSPCL.EOF then %> <% for j=1 to 4 %> <% if not RSPCL.EOF then %> <% RSPCL.MoveNext %> <% end if %> <% next %> <% end if %> <% next %>
 
" class="highslide" onClick="return hs.expand(this)"> " title="PR Danışmanlık" style="border: 1px solid #AAD1F7" width="170" height="234" />
 
 
<%=RSPCL("proCertificateText")%>
 
<% if RSPCL.PageCount>1 then %> <% firstpage=page-5 if firstpage="0" or firstpage<"0" then firstpage="1" end if lastpage=page+5 if RSPCL.PageCount
<% if page-1<>"0" then %> <% end if %> <%for i=firstpage to lastpage %> <%if i<>CINT(page) then%> <%else%> <%end if%> <%next%> <% if not int(page)=int(RSPCL.PageCount) then %> <%end if%>

<< Geri

<%=i%> <%=i%> İleri >>
<% end if %> <% sortNo=0 %> <% else %>
Kayıtlı Sertifika Bulunamadı
<% end if %> <% RSPCL.Close %>