<%on error resume next%> <% sql="select * from anasayfaReklam order by dil desc;" set veriler=mysql_baglanti.execute(sql) if not veriler.eof then say2=1 %> <% veriler.movefirst Set FS=CreateObject("Scripting.FileSystemObject") file_link=Request.ServerVariables("APPL_PHYSICAL_PATH" )&"/so-content/uploads/reklam" do while not veriler.eof %> <% iFileSize=0 say2=say2+1 veriler.movenext loop set FS=nothing else %>

Sistemde kayıtlı reklam bulunamadı.

<% end if %>

		Dosya	Başlık	Link	Boyut
/flag.gif" width="24"/>	<%=say2%>	<% if FS.fileexists(file_link&"/"&veriler("resim"))=true then strFileName = file_link&"/"&veriler("resim") Set objFile = FS.GetFile(strFileName) 'Get the file size iFileSize = cint(objFile.Size/1024) %> " title="<%=veriler("baslik")%>">" alt="<%=veriler("baslik")%>"/> <% else %> "/> <% end if %>	<%=veriler("baslik")%>	" target="_blank"><%=veriler("link")%>	<%=iFileSize%> Kb	<%if veriler("aktif")=1 then%>&durum=<%=veriler("aktif")%>&SID=<%=session.SessionID%>','Yayından Kaldır')"><%else%>&durum=<%=veriler("aktif")%>&SID=<%=session.SessionID%>','Yayınla')"><%end if%>	','Reklam bilgisi güncelle');" class="tip-top" title="Güncelle">	','Reklam sil');">