whois online script or html code

[Password]

pedia kalhspera or kalhmera sas!

 

mipos gnorizete kanena etimo kodika kata protimisi html

pou na dixni to whois online sto site; diladi mia gramoula pou na leh

tora einai online 15 episkeptes tora einai 12 tora 25 klp,

 

kata protimisi opos ipa html code.

 

euxaristo poly. 8)

[ksp]

Nomizw oti auto ginetai se syndiasmo me apostoli cockies apo ton server ston teliko xristi

[baxter]

me sketo html kwdika de ginetai...

hreiazesai kapoia glwssa (perl,php,asp...)

 

kati tetoio borei na ginei kratwdas mia db me ta ips pou ehoun episkeftei to site sou kai tin wra pou egine i teleftaia tous kinisi sto site..

kathe fora pou tha ginetai mia kinisi sto site sou tote tha eleghetai i db me ta ips,tha ananewneis to hrono tou sygekrimenou ip kai ystera tha kaneis elegho stin db gia to poia ips ehoun meinei anenerga gia ena sygekrimeno hroniko diastima (px 15 lepta) kai tha ta diagrafeis apo tin db.

gia na deis posa atoma einai sto site sou apla tha vlepeis poses eggrafes yparhoun stin db sou.

[Vackhus]

An trexi o server sou ASP, pernis ton parakato kodika, ton antigrafis se ena notepad, ton sozis os Global.asa kai to anevazis ston idio folder pou vriskete i selida pou parousiazi tous online episkeptes tis dedomenis stigmis. Epita, sti selida pou parousiazis ton aon arithmo ton episkepton grafis sto simio pou thelis na parousiazete to exis:

<%=Application("Episkeptis")%>

 

MIONEKTIMA: An kapios mpi sti selida sou, tote o arithmos tha auxithi kata ena. An figi epita apo 1 lepto, o arithmos tha paramini o idios epidi exi default na allazi to "periexomeno" tou o server kathe 20 lepta. Opote emis orizoume sto Sub Session_OnEnd na allazi kathe 1 lepto. Exakolouthi na iparxi provlima giati enas xristis mpori na einai sti selida sou kai na diavazi gia arkate lepta, ena keimeno, ena arthro klp klp, diladi na min exi figi apo tin selida sou. An kapios allos xristis mpi sti selida sou paralila kai meta tou enos leptou, tha di -1 xristes(kai as einai o protos mesa pou diavazi ekini ti stigmi).

 

><script language="vbscript" runat="server">
Sub Application_OnStart
Application("Episkeptis")=0
End SubSub

Session_OnStart
Application.Lock
Application("Episkeptis")=Application("Episkeptis")+1
Application.UnLock
End Sub

Sub Session_OnEnd
Session.Timeout=1
Application.Lock
Application("Episkeptis")=Application("Episkeptis")-1
Application.UnLock
End Sub
</script>

 

PS Fisika den iparxi periptosi me apli HTML na to kanis auto pou thelis.