Home
 
 
 
 



 
 
 
 
<% 'Projekti: Sadasnji projekti Dim rsProjektiSadasnji Set rsProjektiSadasnji = Server.CreateObject("ADODB.Recordset") Upit = "SELECT tblClanci.* FROM tblClanci where Cat = 3;" rsProjektiSadasnji.CursorType = 2 rsProjektiSadasnji.LockType = 3 rsProjektiSadasnji.Open Upit, WebCon Do while not rsProjektiSadasnji.EOF %> <% rsProjektiSadasnji.movenext loop rsProjektiSadasnji.close Set rsProjektiSadasnji = nothing %> <% 'Projekti: Arhiva projekata Dim rsProjektiArhiva Set rsProjektiArhiva = Server.CreateObject("ADODB.Recordset") Upit = "SELECT tblClanci.* FROM tblClanci where Cat = 4;" rsProjektiArhiva.CursorType = 2 rsProjektiArhiva.LockType = 3 rsProjektiArhiva.Open Upit, WebCon Do while not rsProjektiArhiva.EOF %> <% rsProjektiArhiva.movenext loop rsProjektiArhiva.close Set rsProjektiArhiva = Nothing %>

Projekti


- Sadašnji projekti

- Arhiva projekata


 Sadašnji projekti

<% = rsProjektiSadasnji("Ime") %>

<% = rsProjektiSadasnji("Sadrzaj") %>


Arhiva projekata

<% = rsProjektiArhiva("ime") %>

<% = rsProjektiArhiva("sadrzaj") %>


Copyright (C) www.inkluzija-sibenik.hr 2007. Sva prava zadržana.

Veličina slova




Predstavljamo vam novi broj časopisa Inkluzija
Poslušajte sadržaj Teme broja