XxenesxX Yazılım

Sitemizde Gizliliği Görmek için Üye Olmanız gerekmektedir
XxenesxX Yazılım

Web Tasarım, Ücretsiz Scriptler, Reklam

En son konular

» Ultra Edit - Profesyonel Metin Editörü
28/6/2010, 17:31 tarafından Admin

» Delphi kod Arşivi
28/6/2010, 17:26 tarafından Admin

» Visual Basic
28/6/2010, 17:22 tarafından Admin

» GIMP - Bedava Photoshop
28/6/2010, 17:13 tarafından Admin

» Logon Studio - Windows Başlangıc ekranını değiştirme
28/6/2010, 17:11 tarafından Admin

» Ava Find - Bilgisayarınız için yerel arama Motoru
28/6/2010, 16:52 tarafından Admin

» ComboFix - Virüs Malware Trojan Temizleme Programı
28/6/2010, 16:48 tarafından Admin

» AVG Internet Security - İnternet Güvelik Programı
28/6/2010, 16:45 tarafından Admin

» Html'ye giriş
28/6/2010, 16:29 tarafından Admin

Ortaklar

 
WWW.XXENESXX.HAREKETFORUM.ORG
Puanlı üyelik Sistemi

28/6/2010, 00:30 tarafından Admin

Kod:
<%
vt_yol = Server.MapPath("db/veritabanim.mdb" )
set conn = server.createobject("adodb.connection" )
conn.open "Provider=Microsoft.JET.OLEDB.4.0; Data Source=" & vt_yol & ";"

Set rs = Server.CreateObject("ADODB.Recordset" )
sql="select * from uyeleriniz"
rs.open sql,conn,1,3

if rs("puan" ) > = 0 and rs("puan" ) < 50 then
response.write "Yeni Üye"
else
end if
if rs("puan" ) > = 51 and rs("puan" ) < 100 then
response.write "Normal Üye"
else
end if
if rs("puan" ) > = 101 and rs("puan" ) < 250 then
response.write "Bronz Üye"
else
end if
if rs("puan" ) > = 251 and rs("puan" ) < 500 then
response.write "Gümüş Üye"
else
end if
if rs("puan" ) > = 501 and rs("puan" ) < 1000 then
response.write "Altın Üye"
else
end if
%>


Istatistikler

Kullanıcılarımız toplam 34 mesaj attılar bunda 34 konu

Toplam 3 kayıtlı kullanıcımız var

Son kaydolan kullanıcımız: maraz-erkan

Kimler hatta?

Toplam 1 kullanıcı online :: 0 Kayıtlı, 0 Gizli ve 1 Misafir

Yok


[ Bütün listeye bak ]


Sitede bugüne kadar en çok 7 kişi 28/12/2008, 02:32 tarihinde online oldu.

Forum Saati 29/7/2010, 17:00