Asp - Flash Etiket Bulutu

Aşağı Git Tüm Forumlar Web Tasarım - Programlama Yazılım Geliştirme Asp / Asp.NET Asp - Flash Etiket Bulutu

Bu konudaki kullanıcılar: 1 misafir

0
Cevap 859
Tıklama 0
Öne Çıkarma

1. sayfa

Asp - Flash Etiket Bulutu

Cevap Yaz

ontedi

14 yıl

Onbaşı

Konu Sahibi

Etiket Bulutu

<%
Set RS = DBBaglanti.ExeCute("Select * FROM tbletiketler ORDER BY goruntulenme DESC" )
if Not RS.Eof Then
%>
<embed type="application/x-shockwave-flash" src="tagcloud.swf" id="tagcloud" name="tagcloud" bgcolor="#EAE680" quality="high"
flashvars="tcolor=0x000000&mode=tags&distr=true&tspeed=150&tagcloud=<tags>
<%
Do While Not RS.Eof
%>
<a href='icerik.asp?icerik_ID=<%=RS("icerik_ID" )%>' style='11'><%=RS("baslik" )%></a>
<%
RS.MoveNext
Loop
%>
</tags>" allowscriptaccess="always" width="200" height="180">
<%
end if
RS.Close
Set RS = Nothing
%>

Örnek Çalışma: http://www.birturku.com/

Bu adresten swf dosyasını indirin: http://www.roytanck.com/2008/03/15/wp-cumulus-released/

Cevap Yaz

1. sayfa

Tüm Forumlar Web Tasarım - Programlama Yazılım Geliştirme Asp / Asp.NET Asp - Flash Etiket Bulutu