Arkadadaşlar ben MWP daa bazı yerler üzerinde, basit çarpma-bölme işlemlerini yaparak bu forumda ki gibi, Aktiflik-Deneyim-Seviye yapmaya çalıştım. Forumda profilde bulunan Mesaj Sayısı-Altın-Forum Puanı bölümlerini uyarlayayım dedim. Ama hareketlik yok. bütün günümü aldı. Kodlara bakın isterseniz mantıken olması lazım. Ve yapabilen arkadaşlar paylaşırsa sevinirim.
<%
M_REPP = Int((M_REP/1000)*100)
M_GOLDD = Int((M_GOLD/1000)*100)
M_POSTSS = Int((M_POSTS/1000)*100)
if REPP > 78 Then
REPPP="78"
else
REPPP=REPP
end if
if M_GOLDD > 78 Then
M_GOLDDD="78"
else
M_GOLDDD=M_GOLDD
end if
if M_POSTSS > 78 Then
M_POSTSSS="78"
else
M_POSTSSS=M_POSTSS
end if %>
Aktiflik<br><img src="images/vote_mavi.gif" width="<%=REPPP%>%" height="7"><%=REPP%>%<br>
Deneyim<br><img src="images/vote_yesil.gif" width="<%=M_GOLDDD%>%" height="7"><%=M_GOLDD%>%<br>
Seviye<br><img src="images/vote_kirmizi.gif" width="<%=M_POSTSSS%>%" height="7"><%=M_POSTSS%>%<br>
Bu da diğer kod. ama bunuda uyduramadım. Bu kod üsttekinden daha kaliteli. buna da bakın isterseniz.
<fieldset>
<legend> <b>Üye seviyesi</b> </legend>
<%
if request("x")="p" then
M_POSTS=request("M_POSTS")
M_GOLD=request("M_GOLD")
end if
%>
<% ' Aktiflik BAŞLANGICI %>
<%
dim M_POSTS
if lngAuthorNumOfPosts = 1 then
M_POSTS = 10
elseif M_POSTS = 2 then
M_POSTS = 12
elseif M_POSTS = 3 then
M_POSTS = 13
elseif M_POSTS = 4 then
M_POSTS = 14
elseif M_POSTS >= 5 and M_POSTS <=10 then
M_POSTS = 25
elseif M_POSTS >= 11 and M_POSTS <=20 then
M_POSTS = 28
elseif M_POSTS >= 21 and M_POSTS <=30 then
M_POSTS = 30
elseif M_POSTS >= 31 and M_POSTS <=40 then
M_POSTS = 32
elseif M_POSTS >= 41 and M_POSTS <=50 then
M_POSTS = 34
elseif M_POSTS >= 51 and M_POSTS <=54 then
M_POSTS = 36
elseif M_POSTS >= 55 and M_POSTS <=60 then
M_POSTS = 38
elseif M_POSTS >= 61 and M_POSTS <=80 then
M_POSTS = 40
elseif M_POSTS >= 81 and M_POSTS <=100 then
M_POSTS = 42
elseif M_POSTS >= 101 and M_POSTS <=120 then
M_POSTS = 44
elseif M_POSTS >= 121 and M_POSTS <=140 then
M_POSTS = 46
elseif M_POSTS >= 141 and M_POSTS <=160 then
M_POSTS = 48
elseif M_POSTS >= 161 and M_POSTS <=180 then
M_POSTS = 50
elseif M_POSTS >= 181 and M_POSTS <=200 then
M_POSTS = 52
elseif M_POSTS >= 201 and M_POSTS <=220 then
M_POSTS = 54
elseif M_POSTS >= 221 and M_POSTS <=240 then
M_POSTS = 56
elseif M_POSTS >= 241 and M_POSTS <=260 then
M_POSTS = 58
elseif M_POSTS >= 261 and M_POSTS <=280 then
M_POSTS = 60
elseif M_POSTS >= 281 and M_POSTS <=300 then
M_POSTS = 62
elseif M_POSTS >= 301 and M_POSTS <=340 then
M_POSTS = 64
elseif M_POSTS >= 341 and M_POSTS <=380 then
M_POSTS = 66
elseif M_POSTS >= 381 and M_POSTS <=420 then
M_POSTS = 68
elseif M_POSTS >= 421 and M_POSTS <=480 then
M_POSTS = 70
elseif M_POSTS >= 481 and M_POSTS <=500 then
M_POSTS = 72
elseif M_POSTS >= 501 and M_POSTS <=550 then
M_POSTS = 74
elseif M_POSTS >= 551 and M_POSTS <=600 then
M_POSTS = 76
elseif M_POSTS >= 601 and M_POSTS <=700 then
M_POSTS = 78
elseif M_POSTS >= 701 and M_POSTS <=800 then
M_POSTS = 80
elseif M_POSTS >= 801 and M_POSTS <=900 then
M_POSTS = 82
elseif M_POSTS >= 901 and M_POSTS <=1000 then
M_POSTS = 84
elseif M_POSTS >= 1001 and M_POSTS <=1100 then
M_POSTS = 86
elseif M_POSTS >= 1100 and M_POSTS <=1200 then
M_POSTS = 88
elseif M_POSTS >= 1200 and M_POSTS <=1500 then
M_POSTS = 90
elseif M_POSTS >= 1500 and M_POSTS <=1750 then
M_POSTS = 92
elseif M_POSTS >= 1750 and M_POSTS <=2000 then
M_POSTS = 94
elseif M_POSTS >=2000 then
M_POSTS = 96
else
M_POSTS=0
end if
%>
<% ' Aktiflik BİTİŞİ %>
<%
dim M_GOLD
if M_GOLD = 1 then
M_GOLD = 5
elseif M_GOLD = 2 then
M_GOLD = 10
elseif M_GOLD = 3 then
M_GOLD = 15
elseif M_GOLD = 4 then
M_GOLD = 20
elseif M_GOLD >= 5 and M_GOLD <=10 then
M_GOLD = 25
elseif M_GOLD >= 11 and M_GOLD <=20 then
M_GOLD = 30
elseif M_GOLD >= 21 and M_GOLD <=30 then
M_GOLD = 35
elseif M_GOLD >= 31 and M_GOLD <=40 then
M_GOLD = 40
elseif M_GOLD >= 41 and M_GOLD <=50 then
M_GOLD = 42
elseif M_GOLD >= 51 and M_GOLD <=54 then
M_GOLD = 44
elseif M_GOLD >= 55 and M_GOLD <=60 then
M_GOLD = 46
elseif M_GOLD >= 61 and M_GOLD <=80 then
M_GOLD = 48
elseif M_GOLD >= 81 and M_GOLD <=100 then
M_GOLD = 50
elseif M_GOLD >= 101 and M_GOLD <=120 then
M_GOLD = 52
elseif M_GOLD >= 121 and M_GOLD <=140 then
M_GOLD = 54
elseif M_GOLD >= 141 and M_GOLD <=160 then
M_GOLD = 56
elseif M_GOLD >= 161 and M_GOLD <=180 then
M_GOLD = 58
elseif M_GOLD >= 181 and M_GOLD <=200 then
M_GOLD = 60
elseif M_GOLD >= 201 and M_GOLD <=220 then
M_GOLD = 62
elseif M_GOLD >= 221 and M_GOLD <=240 then
M_GOLD = 64
elseif M_GOLD >= 241 and M_GOLD <=260 then
M_GOLD = 66
elseif M_GOLD >= 261 and M_GOLD <=280 then
M_GOLD = 68
elseif M_GOLD >= 281 and M_GOLD <=300 then
M_GOLD = 70
elseif M_GOLD >= 301 and M_GOLD <=340 then
M_GOLD = 72
elseif M_GOLD >= 341 and M_GOLD <=380 then
M_GOLD = 74
elseif M_GOLD >= 381 and M_GOLD <=420 then
M_GOLD = 76
elseif M_GOLD >= 421 and M_GOLD <=480 then
M_GOLD = 78
elseif M_GOLD >= 481 and M_GOLD <=500 then
M_GOLD = 80
elseif M_GOLD >= 501 and M_GOLD <=550 then
M_GOLD = 82
elseif M_GOLD >= 551 and M_GOLD <=600 then
M_GOLD = 84
elseif M_GOLD >= 601 and M_GOLD <=700 then
M_GOLD = 86
elseif M_GOLD >= 701 and M_GOLD <=800 then
M_GOLD = 88
elseif M_GOLD >= 801 and M_GOLD <=900 then
M_GOLD = 89
elseif M_GOLD >= 901 and M_GOLD <=1000 then
M_GOLD = 90
elseif M_GOLD >= 1001 and M_GOLD <=1100 then
M_GOLD = 91
elseif M_GOLD >= 1100 and M_GOLD <=1200 then
M_GOLD = 92
elseif M_GOLD >= 1200 and M_GOLD <=1500 then
M_GOLD = 94
elseif M_GOLD >= 1500 and M_GOLD <=1750 then
M_GOLD = 95
elseif M_GOLD >= 1750 and M_GOLD <=2000 then
M_GOLD = 96
elseif M_GOLD >=2000 then
M_GOLD = 97
else
M_GOLD=0
end if
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="12">
<tr>
<td colspan="2"><font size="1">Aktiflik</font> <font size="1"> </font> </td>
</tr>
<tr>
<td colspan="2" height="2"><font size="1">
<TABLE cellSpacing=0 cellPadding=0 width=98 border=0 height="12">
<TBODY>
<TR>
<TD style="border: 0px inset #808080"><IMG height=9 src="truncu2.gif" width="<%=M_POSTS%>%"><IMG height=9 src="truncu.gif" width=5></TD>
</TR>
</TBODY>
</TABLE>
</font> </td>
<tr>
<td colspan="2" height="2"><font size="1">Seviye</font></td>
</tr>
<tr>
<td colspan="2" height="2">
<TABLE cellSpacing=0 cellPadding=0 width=97 border=0 height="12">
<TBODY>
<TR>
<TD style="border: 0px inset #808080"><IMG height=9 src="yesil1.gif" width="<%=M_GOLD%>%"><IMG height=9 src="yesil.gif" width=5></TD>
</TR>
</TBODY>
</TABLE>
</fieldset>
</table>
Teşekkür listesi şu anda boş.