<% sql2="select * from fotograflar where galeri="&veriler("id")&" order by sira;" set veriler2=mysql_baglanti.execute(sql2) if not veriler2.eof then say2=1 %> <% veriler2.movefirst Set FS=CreateObject("Scripting.FileSystemObject") file_link=Request.ServerVariables("APPL_PHYSICAL_PATH" )&"/so-content/uploads/gallery" do while not veriler2.eof %> <% iFileSize=0 say2=say2+1 veriler2.movenext loop set FS=nothing else %> <% end if %>

	Sıra	Resim	Resim Başlığı	Dosya Adı	Dosya Boyutu	Seçtiğimin Önünde Listelensin
" title="<%=veriler2("baslik")%>" >	<%=say2%>	<% if FS.fileexists(file_link&"/"&veriler2("dosya"))=true and FS.fileexists(file_link&"/"&veriler2("thumb"))=true then strFileName = file_link&"/"&veriler2("dosya") Set objFile = FS.GetFile(strFileName) 'Get the file size iFileSize = cint(objFile.Size/1024) %> " title="<%=veriler2("baslik")%>">" alt="<%=veriler2("baslik")%>"/> <% else %> "/> <% end if %>	<%if veriler2("baslik")<>"" then%><%=veriler2("baslik")%><%else%>-<%end if%>	<%=veriler2("dosya")%>	<%=iFileSize%> Kb	" name="tasi<%=veriler2("id")%>" action="<%=so_ur%>/so-admin/resimTasi.asp?SID=<%=session.SessionID%>&galeri=<%=sadece_sayi(request.QueryString("id"))%>" method="post">"> ','Resim liste sırası değiştirme','Bu resim listelemelerde seçtiğiniz resmin üstünde yer alacaktır.');"> Seç / Tıkla <% sqlt="select * from fotograflar where galeri="&veriler("id")&" and id<>"&veriler2("id")&" order by sira;" set verilert=mysql_baglanti.execute(sqlt) if not verilert.eof then verilert.movefirst say3=1 do while not verilert.eof %> "><%=say3%>) <%if verilert("baslik")<>"" then%><%=verilert("baslik")%><%else%><%=verilert("dosya")%><%end if%> <% say3=say3+1 verilert.movenext loop end if %>	&SID=<%=session.SessionID%>&galeri=<%=sadece_sayi(request.QueryString("id"))%>','Resim sil');">

<% else %> <% end if %>