w@rriorhckr
🏅Acemi Tasarımcı🏅
- Katılım
- 9 Şub 2009
- Mesajlar
- 37
- Tepkime puanı
- 1
<%
Dim x, y, temp, serv, D, cogul
x = Trim(day(date()))
D = Application( "serv" )
If D = x Then
Application( "cogul" ) = Application( "cogul" ) + 1
Else
Application( "cogul" ) = 1
End If
y = x
temp = y
Application( "serv" ) = temp
%>
Bugün ki hit sayısı: <%=Application( "cogul" )%>
:emo1::emo1::emo1::emo1::emo1::emo1::emo1:
Dim x, y, temp, serv, D, cogul
x = Trim(day(date()))
D = Application( "serv" )
If D = x Then
Application( "cogul" ) = Application( "cogul" ) + 1
Else
Application( "cogul" ) = 1
End If
y = x
temp = y
Application( "serv" ) = temp
%>
Bugün ki hit sayısı: <%=Application( "cogul" )%>
:emo1::emo1::emo1::emo1::emo1::emo1::emo1:
