WEB SUNUCUMA KİMLER BAĞLI?

ASP Script ile Web sunucunuza bağlı olan kullanıcıları ve hangi sayfalarda bulunduklarını kolayca bulabiliriz.

Aşağıdaki verdiğim kodlar sayesinde NT4 – Service Pack 3 yüklü ve Internet Information Server 4’e sahip bir sunucunun “execute” hakkı verilmiş bir klasöründen çalıştırdığınızda size sunucunuzdaki kullanıcıların IP adreslerini ve şu anda bulundukları sayfaları söyleyecek…

Sayfayı her seferinde yenilemenize gerek yok, ASP sayfası bu işi kendisi hallediyor…

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
<!-- #INCLUDE VIRTUAL="/includes/tracker.asp" > -->
<%
MyServer=Request.ServerVariables("SERVER_NAME")
MyPath=Request.ServerVariables("SCRIPT_NAME")
MySelf="HTTP://"&MyServer&MyPath
%>
<html>
<head>
<meta HTTP-EQUIV="REFRESH" CONTENT="20;<%=MySelf%>">
</head>
<body BGCOLOR="#FFFFFF">
<%
Application.Lock
Set TempStats=Application("stats")
Application.Unlock
%>
<center>
<b>Toplam Kullanıcı:</b> <%=TempStats.Count %>
<table BORDER="1" CELLPADDING="10" bgcolor="#6699cc">
<tr><th>Kullanıcı</th><th>Bulunduğu sayfa</th></tr>
<%
TempItems=TempStats.Items
TempKeys=TempStats.Keys
For i=0 to UBOUND(TempKeys)
%>
<tr><td><%=Tempkeys(i)%></td><td><%=TempItems(i)%></td></tr>
<%
Next
%>
</table>
</center>
</body>
</html>