<%
dim modeli(100)
dim resimi(100)
dim idsim(100)
sf=request.querystring("sf")
if sf="" then
sf=1
end if
%>
<%
prj=request.QueryString("prj")
sql="select *from galeri where kat='1'"
if prj="1" then
sql="select *from galeri where kat='1'"
end if
if prj="2" then
sql="select *from galeri where kat='2'"
end if
if prj="3" then
sql="select *from galeri where kat='3'"
end if
if prj="4" then
sql="select *from galeri where kat='4'"
end if
if prj="5" then
sql="select *from galeri where kat='5'"
end if
if prj="6" then
sql="select *from galeri where kat='6'"
end if
if prj="7" then
sql="select *from galeri where kat='7'"
end if
if prj="8" then
sql="select *from galeri where kat='8'"
end if
if prj="9" then
sql="select *from galeri where kat='9'"
end if
set veri=server.createobject("adodb.recordset")
veri.open sql,conn,1,3
%>
<%
If Not veri.EOF Then
veri.pagesize=8
veri.absolutepage=sf
sayfalama=veri.pagecount
%>
<%
for i=1 to veri.pagesize
if veri.eof then exit for
art=art+1
modeli(art)=veri(2)
resimi(art)=veri(3)
idsim(art)=veri(4)
veri.movenext
next
end if
%>
