Αρχή :: Παραδείγματα Κώδικα :: Επισκέπτες τώρα     

 

Επισκέπτες τώρα 

Αν θέλετε να παρουσιάσετε πόσοι επισκέπτες υπάρχουν στο site σας τώρα, για παράδειγμα, θα χρειασθείς κάτι για να αποθηκεύσεις αυτή τη μεταβλητή (αριθμό hits). Με ASP θα πρέπει να δημιουργήσεις ένα αρχείο στο οποίο θα δηλώνεις και θα αποθηκεύεις την data. Θα πρέπει να δημιουργήσεις ένα αρχείο global.asa για αυτό το λόγο αν δεν έχεις. Το global.asa αρχείο συμπεριλαμβάνει ρουτίνες συμβάντος: 

Application_OnStart
Application_OnEnd
Session_OnStart
Session_OnEnd 


Άνοιξε το notepad και τοποθέτησε τα παρακάτω σε νέο αρχείο: 

<SCRIPT LANGUAGE=VBScript RUNAT=Server> 

Sub Application_OnStart
Application("Active") = 0
End Sub 

Sub Application_OnEnd

'δεν χρειάζεται τίποτα για αυτό το παράδειγμα
End Sub 

Sub Session_OnStart
Session.Timeout = 5
Session("Start") = Now
Application.lock
Application("Active") = Application("Active") + 1
'προσθέτει 1 στο επισκέπτες τώρα σύνολο για κάθε νέο επισκέπτη
Application.unlock
End Sub 

Sub Session_OnEnd
Application.lock
Application("Active") = Application("Active") - 1
'αφαιρεί 1 στο επισκέπτες τώρα σύνολο για κάθε επισκέπτη που αποχωρεί
Application.unlock
End Sub 


</SCRIPT> 

Σώσε αυτό το αρχείο ως: global.asa 



Άνοιξε πάλι το wordpad και τοποθέτησε το παρακάτω κώδικα
<%@ Language=VBScript %> 

<html>
<head>
<title>Επισκέπτες τώρα</title>
</head>
<body>


Είσαι ένας από <%=Application("Active")%> επισκέπτες τώρα. 

</body>
</html>


Σώσε αυτό το αρχείο ως: current_count.asp ή πρόσθεσε το <%=Application("Active")%> σε asp σελίδες.

 

Tony Barnes











Η Εταιρία | Web Hosting | Domain names | Web Information | Υπηρεσίες | Resellers | Υποστήριξη |
Copyright © 2007–09 4GR.NETWORKS, All rights reserved.