<%=verilerg("baslik")%>
-
<%
videoBulunamadi=0
sql="select * from videolar where galeri="&verilerg("id")&" order by sira;"
set veriler=mysql_baglanti.execute(sql)
if not veriler.eof then
veriler.movefirst
say=1
Set FS=CreateObject("Scripting.FileSystemObject")
file_link=Request.ServerVariables("APPL_PHYSICAL_PATH" )&"/so-content/uploads/videos"
do while not veriler.eof
%>
<%
dosya_durumu=0
if veriler("embed")=0 then
video_dosya_yolum="/so-content/uploads/videos/"
if FS.fileexists(file_link&"/"&veriler("dosya"))=true then
dosya_durumu=1
end if
else
video_dosya_yolum=""
dosya_durumu=1
end if%>
<%
if dosya_durumu=1 then
%>
-
" rel="shadowbox;width=600;height=450;player=swf" title="<%=veriler("baslik")%>" href="<%=so_url%>/so-content/plugins/shadowbox/player.swf?file=<%=video_dosya_yolum%><%=veriler("dosya")%>&image=<%=so_url%>/so-content/uploads/<%=so_logo%>&autostart=true&stretching=none&volume=40&allowscriptaccess=always<%if instr(veriler("dosya"),".mp3")>0 then%>&plugins=revolt-1<%end if%>"><%if FS.fileexists(file_link&"/"&veriler("thumbnail"))=true then%>
" width="112" height="112" title="<%=veriler("baslik")%>" alt="<%=veriler("baslik")%>"/><%else%>
"/><%end if%>
<%end if%>
<%
say=say-+1
veriler.movenext
loop
set FS=nothing
else
videoBulunamadi=1
%>
<%
end if
%>