Hvis nu jeg kun har 2 filer på serveren default.asp samt global.asa global.asa: ****************** <SCRIPT LANGUAGE=\"VBScript\" RUNAT=\"Server\"> Sub Application_OnStart Application(\"OnlineUsers\") = 0 End Sub Sub Application_OnEnd End Sub
Sub Session_OnStart Application.Lock Application(\"OnlineUsers\") = Application(\"OnlineUsers\") + 1 Application.UnLock End Sub
Sub Session_OnEnd Application.Lock Application(\"OnlineUsers\") = Application(\"OnlineUsers\") - 1 Application.UnLock End Sub </SCRIPT> ****************** og default.asp:
Der bliver investeret massivt i AI. Teknologien er mere tilgængelig end nogensinde, og ambitionerne er høje. Alligevel oplever mange virksomheder, at resultaterne udebliver.
den kode kan du sætte ind hvor du vil, lige meget om det er antal.asp eller hvad det er, men din default.asp kan lige så godt bare kun inde holde den kode jeg skrev øverst i denne kommentar, så let er det!
Synes godt om
Slettet bruger
22. december 2000 - 04:35#6
nu står der fint som det eneste på siden Online brugere: men ikke hvor mange der er??
</body> </html> ************ der står alt dette som tekst på siden: Application(\"OnlineUsers\") = CInt(Application(\"OnlineUsers\") + 1) og Application(\"OnlineUsers\") = CInt(Application(\"OnlineUsers\") - 1)
default.asp skal bare være som vi hele tiden har skrevet den!
global.asa: <SCRIPT LANGUAGE=\"VBScript\" RUNAT=\"Server\"> Sub Application_OnStart Application(\"OnlineUsers\") = 0 End Sub Sub Application_OnEnd End Sub
Sub Session_OnStart Application.Lock Application(\"OnlineUsers\") = CInt(Application(\"OnlineUsers\") + 1) Application.UnLock End Sub
Sub Session_OnEnd Application.Lock Application(\"OnlineUsers\") = CInt(Application(\"OnlineUsers\") - 1) Application.UnLock End Sub </SCRIPT>
Synes godt om
Slettet bruger
22. december 2000 - 04:45#15
min fejl, jeg havde sgu slettet global.asa - nu virjer det. Men inden point uddelingen kommer så: hvordan laver jeg nu en session så brugeren ikke står som online 20 min efter han er smuttet ??
<SCRIPT LANGUAGE=\"VBScript\" RUNAT=\"Server\"> Sub Application_OnStart Application(\"OnlineUsers\") = 0 End Sub Sub Application_OnEnd End Sub
Sub Session_OnStart Application.Lock Application(\"OnlineUsers\") = Application(\"OnlineUsers\") + 1 Application.UnLock
Session.TimeOut = 5 End Sub
Sub Session_OnEnd Application.Lock Application(\"OnlineUsers\") = Application(\"OnlineUsers\") - 1 Application.UnLock End Sub </SCRIPT>
Synes godt om
Slettet bruger
22. december 2000 - 04:53#22
meget fornemt, lige inden jeg smider mine dyrebare point: hvis jeg åbner explorer 3-4 gange og går ind på siden, registrerer den det så kun en gang eller vil der stå alle dem jeg har åbnet ??
hexia:> som jeg skriver ... \"det kan også være du kun \"udløser\" en session da du er fra samme IP ..\"
Synes godt om
Slettet bruger
22. december 2000 - 05:04#31
ja, jeg har lige prøvet www.bekhoj.dk som har den samme, den registrerer heller flere. Jeg faldt forresten ned af stolen da jeg opdagede at han kun er 14 år og sidder og leger med asp
hexia >> er du sikker på at du skal lære ASP?? prøv at lære HTML helt først og så gå videre med ASP, men du indsætter bare <font color=\"green\"><%=Application(\"OnlineUsers\")%></font> find farvekoden i stedet for green!
tdaugaard synes du stadig Pentium sux ? Eller er du blevet ældre :P
Jens K
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.