.dcr uzantılı(shockwave) dosyaları çalıştırmak için kod ?

Arkadaşlar .dcr (shockwave ) dosyalarını aşağıda bulunun scripte uyarlamak istiyorum . Script .swf dosyalarını macromedia flash player ile oyunatıyor. database den oyun ismini alarak ekrana getiriyor. öyle bir asp kod yazmalıyım ki shockwave ve flash oynatılabilsin ve ikisini de database den cekebilsin yani .dcr uzantılı dosyalarıda bu scriptte oynatabilmem.
Bu konuda yardımcı olabilirseniz cok sevinirim
kod aşağıda asp scrip ve access database kullanıyor.

<%@Language="VBScript" Codepage="1254"%>


<% ekran = kt(request.querystring("ekran")) %>
<% if ekran = "" then ekran = "normal" %>
<% oid = request.querystring("oid")
oid = Replace(oid, Chr(10) , "") 'satır başı
oid = Replace(oid, Chr(60) , "") 'küçüktür
oid = Replace(oid, Chr(62) , "") 'büyüktür
oid = Replace(oid, Chr(39) , "") 'tek tırnak
oid = Replace(oid, Chr(34) , "") 'çift tırnak
%>
<% if oid = "" then %>
<% response.write("<br><br><br><center><b><font class=normal>Üzgünüm ,bir hata oluştu lütfen anasayfaya geri dönün.</font></b></center><br><br><a href=default.asp target=_top class=normal><b>..::Ana Sayfaya Dön::..</b></a><br><br><br><br><br>") %>
<% response.end %>
<% end if %>
<%
o_SQL = "SELECT * FROM oyunlar WHERE oyun_id="&oid
oyun.open o_SQL,db,1,3
%>
<% if oyun.eof then %>
<% response.write("<br><br><br><center><b><font class=normal>Üzgünüm ,bir hata oluştu lütfen anasayfaya geri dönün.</font></b></center><br><br><a href=default.asp target=_top class=normal><b>..::Ana Sayfaya Dön::..</b></a><br><br><br><br><br>") %>
<% response.end %>
<% end if %>
<% if ekran = "normal" then %>
<br>
<div align="center" style="width:690;border:1px solid black;background-color:#4F4F4F;background-image:url('img/bg.gif');">
<div style="width:680;height:22;border:1px solid black;background-color:red;background-image:url('img/orta_bg.gif');" align="center"><font style="font-family:tahoma;font-weight:bolder;color:white;font-size:14px;"><%=oyun("oyun_adi")%></font></div>
<div style="width:680;height:8;border:0;border-left:1px solid black;border-right:1px solid black;"></div>
<div style="width:680px;border:1px solid black;background-color:blue;background-image:url('img/bg_text.gif');" align="left"><img src="img/kose.gif" width="15" height="15" align="absmiddle"><font style="font-family:tahoma;font-weight:bold;color:black;font-size:9px;"><a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=12999667&url=default.asp" target="_top" class="normal" data-href="default.asp" target="_top" class="normal">Ana Sayfa</a> <img src="img/kose.gif" width="15" height="15" align="absmiddle"> <a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=12999667&url=#" onclick="muzion('oyunlar','kat.asp?kid=<%=oyun("oyun_kati")%>');return false;" class="normal" data-href="#" onclick="muzion('oyunlar','kat.asp?kid=<%=oyun("oyun_kati")%>');return false;" class="normal"><%=oyun("oyun_kat_adi")%></a> <img src="img/kose.gif" width="15" height="15" align="absmiddle"> <%=oyun("oyun_adi")%></font></div>
<div style="width:680;height:8;border:0;border-left:1px solid black;border-right:1px solid black;"></div>
<div style="width:680;border:1px solid black;border-top:0;border-bottom:0;" align="left">
<table border="0">
<tr>
<td align="center" width="100" height="100">
<img src="<%=oyun("oyun_resmi")%>" alt="Oyun Resmi" width="140" height="100" align="texttop" style="border:1px solid black;">
</td>
<td width="100%" valign="top" align="left" style="border:1px solid black;background-color:blue;background-image:url('img/bg_text.gif');">
<font style="font-size:9px;font-family:tahoma;color:black;"><b>Oyun Adı:</b> <%=oyun("oyun_adi")%><br><b>Oyun Kategorisi:</b> <%=oyun("oyun_kat_adi")%><br><b>Oynanma :</b> <%=oyun("oyun_hiti")%> | <b>Oyunun Eklenme Tarihi:</b> <%=oyun("oyun_tarihi")%><br><b>Oyun Hakkında Bilgiler:</b> <%=oyun("oyun_bilgi")%></font>
</td>
</tr>
</table>
</div>
<div style="width:680;border:1px solid black;" align="center" id="oyun">
<%
width = "680"
height = "480"
%>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="<%=width%>" height="<%=height%>">
<param name= "width" value="<%=width%>" valuetype=data">
<param name= "heighth" value="<%=height%>" valuetype=data">
<param name= "autoplay" value="true" valuetype=data">
<param name= "cache" value="false" valuetype=data">
<param name="movie" value="<%=oyun("oyun_url")%>">
<param name="quality" value=high>
<param name="enablecontentmenu" value="false">
<embed src="<%=oyun("oyun_url")%>" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="<%=width%>" height="<%=height%>">
</embed></object>
</div>
<div align="center" style="border-left:1px solid black; border-right:1px solid black; border-bottom:1px solid black; width:680;height:22;border-top:0px none;background-color:red;background-image:url('img/orta_bg.gif');"><a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=12999667&url=#" class="normal" onclick="window.open('oyna.asp?oid=<%=oyun("oyun_id")%>&ekran=full','oyunmoyunnettc','width=950,top=0,left=35,height=692,noresizable');muzion('oyun','oyunmoyun.asp?oid=<%=oyun("oyun_id")%>');return false;" data-href="#" class="normal" onclick="window.open('oyna.asp?oid=<%=oyun("oyun_id")%>&ekran=full','oyunmoyunnettc','width=950,top=0,left=35,height=692,noresizable');muzion('oyun','oyunmoyun.asp?oid=<%=oyun("oyun_id")%>');return false;"><img src="img/tamekran.gif" width="350" height="22" align="absmiddle" border="0"></a></div>
<br>
</div>
<br>
<% oyun("oyun_hiti") = oyun("oyun_hiti") + 1
oyun.update %>
<% elseif ekran = "full" then%>
<html>
<head>
<title><%=site_adi%></title>
</head>
<body topmargin="0" leftmargin="0" rightmargin="0">
<%
width = "950"
height = "670"
%>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="<%=width%>" height="<%=height%>">
<param name= "width" value="<%=width%>" valuetype=data">
<param name= "heighth" value="<%=height%>" valuetype=data">
<param name= "autoplay" value="true" valuetype=data">
<param name= "cache" value="false" valuetype=data">
<param name="movie" value="<%=oyun("oyun_url")%>">
<param name="quality" value=high>
<param name="enablecontentmenu" value="false">
<embed src="<%=oyun("oyun_url")%>" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="<%=width%>" height="<%=height%>">
</embed></object>
<div align="center" style="width:100%;background-color:red;"><input type="button" value="Pencereyi Kapat" onclick="window.close();return false;" style="font-size:10px;font-weight:bold;color:black;"></div>
</body>
</html>
<% end if %>
<% oyun.close %>
<% db.close %>

.dcr uzantılı(shockwave) dosyaları çalıştırmak için kod ?

Benzer içerikler