Global.asa spørgsmål

Du kan finde næsten alle conectionsstrings på:
http://www.connectionstrings.com/

Da vi ikke ved hvilken driver du har, og om du kører localhost, er det ikke til at sige hvilken du skal bruge, men en af de første 4 MyODBC connections burde gøre det.

så dvs. den eksempelvis kunne se sådan her ud???

Sub Application_OnStart
Application("db") =    
Driver={MySQL ODBC 3.51 Driver};Server=localhost;Database=myDataBase;User=myUsername;Password=myPassword;Option=3;
End Sub

men hva så omkring det med de sessions... selve asp-scriptet opretter jo de sessions den skal bruge, men kan dette så fungere korrekt!!!

Det skal i ":

Application("db") = "Driver={MySQL ODBC 3.51 Driver};Server=localhost;Database=myDataBase;User=myUsername;Password=myPassword;Option=3;"

Sub Application_OnStart
Application("db") = "Driver={MySQL ODBC 3.51 Driver};Server=localhost;Database=myDataBase;User=myUsername;Password=myPassword;Option=3;"
End Sub

korrekt???
men hvordan fungere det med session? fordi jeg har jo allerede oprettet de forskellige sessions, jeg ville have systemet til at arbejde ud fra...

Session bliver helt automatisk kvalt så snart session.timeout er udløbet (normalt mellem 15-20 min). Det er også der Session_OnEnd bliver aktiveret. Der er INGEN måde at lave lave et script, som virker 100%, så session bliver afsluttet når/hvis brugeren lukker browseren.

Jeg er ikke med på hvad du vil gøre når session afsluttes. Du snakker om noget database kontrol (ved oprettelse??), men ellers har du kun session's, og de lukker som sagt automatisk. Det er ikke Application's i stedet??

okay, kan se jeg har udtrygt mig forkert, det beklager jeg...

jeg sidder og arbejder med global.asa, dette er så første gang, jeg overhovedet har kastet mig i krig med dette, og derved er på barbund med de forskellige ting, da jeg kun har den artikel fra busschou at gå efter, men den er jo så skrevet til en mdb database...

men det problem, skulle du så allerede have hjulpet mig med at løse...
nu kommer det mere advanceret i selve global.asa nemlig det med sessions

i selve den førnævnte artikel, er der lavet et eksempel omkring sessions, jeg tillader mig at skrive det her

<--
Sub Session_OnStart
Session("bruger") = replace(request.form("brugernavn"),"'","")
session("kode") = replace(request.form("kode"),"'","")

Dim conn, rs

Set Conn = Server.CreatObject("ADODB.Connection")
Conn.Open Application("db")
Set rs = Conn.execute("Select * from tabel where bruger = '" &session("bruger") "' &_ "' And kode = '"&session("kode")&"'")

if not rs.eof then
session("id") = rs("id")
conn.execute("Update tabel set online = true where id = "&session("id"))
Else
Session.abandon
response.redirect "login.html"
conn.close
set conn = nothing


der opretter den jo selv, en session med id som  indhold, men hvad nu hvis jeg allerede har denne fil??? fordi den laver mit asp-script jo, og det må den gerne blive ved med...

kan jeg så bare skrive

Sub Session_OnStart
dim conn
conn.execute("update tabel set online = "ja" where id = '" & Session("user_id")& "'")
Sub Session_OnEnd

jeg er ganske klar over, dette system ikke virker 100 %, men det er bedre end slet ikke noget system overhovedet ;-)

Det kan du desværre ikke. Session_OnStart bliver kun kørt første gang brugeren kommer ind på en ASP side, uden der er nogen session. Læg mærke til at koden redirecter til en html side og session.abandon bliver kaldt. Hvis der var redirected til en ASP side i stedet, havde vi fået et uendeligt loop.

Du skal derimod selv tilføje:
conn.execute("update tabel set online='ja' where id="& Session("user_id"))

Til dit nuværende loginscript. Du kan dog godt kalde logaf trickeren:
Sub Session_OnEnd
  if isNumeric(Session("user_id")&"") then
    Set conn = Server.CreatObject("ADODB.Connection")
    conn.Open Application("db")
    conn.execute("update tabel set online='nej' where id="& Session("user_id"))
  end if
End Sub

så dvs. asp-scripet manuelt skal sætte den til "ja"

men jeg kan godt få global.asa til evt. at rette den til nej???
ved at bruge den kode du der smed ind...

og er det så muligt for mig at oprettet 2 if'er i sub Session_onEnd???

sorry jeg lyder noobet, men det er jeg også i dette tilfælde...
fordi jeg vil også gerne have lavet det sådan, at i tilfælde af session("chaton") den timer ud, at den derved retter det i databasen.....

med denne kommando
conn.execute("update tabel set chatonline='nej' where id="& Session("user_id"))


hvis det er muligt

Ja, du kan godt få den til at afslutte (sætte til nej)

Du kan oprette alle de if'er du vil i Session_onEnd. Du kan faktisk skrive alt det ASP kode du vil. Det er en ganske normal Sub(). I stedet for manuelt at kalde den, som man normalt gør med sub/funktioner, gør IIS'en det bare for dig.

Ikke helt med på have du mener med "i tilfælde af session("chaton") den timer ud"?? Session variablerne har ikke selvstændige timeout. Enten er de der alle sammen, eller også er der ingen.

En lille forklaring på session:

Session fungere på den måde, at der oprettes en cookie på brugerens computer med et ID i. Serveren gemmer en tilsvarende fil hvor "sidst-set" også er med. Serveren kører nogle funktioner, som sletter filerne hvis "sidst-set" er over session.timeout tiden.

I denne fil gemmer den også alle de variabler, som er oprette. Jeg skal ikke kunne sige præsis hvordan det ser ud, men noget i denne stil:

ID=jhg78nb2378b4589jbnkjr32732hb32jm
time=29-01-2007 12:41:36
userID=3
navn=fennec
AndreVaraiblerOprettet=xxx

Der er derfor heller ikke muligt at nedlægge en enkelt sessionvariabel. Det eneste man kan gøre et at sætte den til tom:
session("navn") = ""

Altså, har en bruger været aktiv på sitet (skiftet side), inden for session.timeout tiden, vil ALLE sessionvariabler være tilstede. Hvis ikke, bliver Session_OnEnd funktionen aktiveret af serveren, hvorefter ALLE sessionvariabler bliver nedlagt.

okay, jeg er så bleven misundervist i hvad en session er, for jeg har forstået det sådan en session er noget der bliver gemt i browseren og ikke per txtfil... som en cookie bliver -)

men no om det, jeg ved ikke helt hvordan jeg skal forklare det, for det lader ikke til jeg gør det godt nok...

men sidder sammen med nogle andre og arbejder med et lille cms system...
så når det endelig er man logger på systemet, opretter den en session("user_id") som indeholder det unikke bruger_id som passede med de oplysninger brugeren opgav...

derefter når kontrolleren er udfyldt, retter den feltet, online til ja i databasen, så brugeren derved optræder i onlinelisten :-D

men så er jeg bekendt med, folk ikke tager sig tiden, til at trykke på log af knappen, men enten bare surfter videre til en anden side, eller lukker browservinudet, og dertil ville jeg gerne have, den fjerner ham fra onlinelisten igen efter lidt tid, hvilket også er derfor global.asa skulle indeholde
<--
if isNumeric(Session("user_id")&"") then
    Set conn = Server.CreatObject("ADODB.Connection")
    conn.Open Application("db")
    conn.execute("update tabel set online='nej' where id="& Session("user_id"))
end if
-->

fordi så fjerner den selvfølgelig "Ja" i online og erstatter det med et "Nej"
men i selve CMS systemet har vi også en chat, hvor det sådan set er det samme, bare den opretter en session("chaton") som lisom online indeholder ja/nej... hvis dette felt er ja, optræder brugeren i onlinelisten på chatten, og hvis nej, jamen så er brugeren der ikke...

så derfor skal funktionen jo også være sådan, i tilfælde af brugeren bare lukker vinduet, at den evt. kan opdatere det felt i databasen, så han ikke optræder der...
ved godt der er en ie kommando "beforeunload" tror jeg den lyder... men den virker ikke i mozilla firefox :-(

Der findes flere forskellige script til at hurtigt at logge brugere af, men som du selv har opdaget er de ikke cross-browser, og heller ikke særlig virksomme.

Jeg kan lige så godt sige det. Der findes ingen gylden løsning.

Det jeg selv har gjort, er at have en skjult iFrame, som opdatere hver 30 sek. Den opdatere så hele tiden databasen med et tidspunkt for "sidst set online". Hvis den tid er over 30 sek siden, er brugeren "Ikke online".

hmmm muligt du kan give mig den :-D  kan så godt ske, jeg sætter den til lidt mere end 30 sekunder :D

Angående session, så prøv at deaktivere cookies. Så vil du se at du ikke kan logge ind længere. Man kan så godt vælge at opfatte cookies, som en del af browseren. Med det nye "tabbed-browsing", som er kommet frem, skal jeg ikke kunne sige om sessioncookies er blevet flyttet ind i kildekoden i stedet.

Mener at kan huske at man i nogle browsers har mulighed for at kun aktivere sessioncookies.

Men husk på at sessionvariablerne kun ligger på serveren, det eneste som ligger på klienten er sessionID'et. Jeg kunne dog forstille mig at webserveren (IIS/Apache) så småt er ved at gå over i noget database styring i stedet for filstyring.

Der er ikke meget i den fil:

[online.asp]
<!--#include file="start.asp"-->
<%
if isnumeric(session("userID")) then
  conn.execute("update userTable set lastOnline=now() where id="& session("userID"))
end if
%>
<script>
window.setTimeout("location.reload()",30000)
</script>

okay, hvis jeg vil lave det i min connection til databasen....

set rs = conn.execute("select * from bruger where chatonline = ja")

er det muligt, man kunne lave det sådan den også kiggede feltet chattime igennem, og hvis den var mere end 7 minutter gammel, er brugeren ikke online længere...

Jeps:
set rs = conn.execute("select * from bruger where chattime>DATE_ADD(now(), INTERVAL -7 MINUTE);")

oki, den var ski da meget simpel :D
så er det vel DATE_ADD(now) som er den variabel, jeg skal skrive i update

form-feltet:
<input type="hidden" value="<% = DATE_ADD(now) %>" name="chattime" />

conn.execute("update bruger set chattime='"&chattime&"' where id = '" & session("user_id") & "'")

kan man tilføje med en AND i den linje....

så det ser sådan her ud
set rs = conn.execute("select * from bruger where chatonline = ja AND chattime>DATE_ADD(now(), INTERVAL -7 MINUTE);")

Du behøver ikke et hidden felt. Du indsætter bare klokken via databasen's indbyggede funktion:
conn.execute("update bruger set chattime=now() where id = '" & session("user_id") & "'")

Og ja du kan godt bruge AND. Præsis som du har gjort, men der skal nok lige ' omkring ja:
set rs = conn.execute("select * from bruger where chatonline = 'ja' AND chattime>DATE_ADD(now(), INTERVAL -7 MINUTE)")

Dit ID er vel også et tal, så det skal ikke i ':
conn.execute("update bruger set chattime=now() where id=" & session("user_id"))

okay, hvordan laver jeg så, den selv ændre det i databasen...

if chatime = "øhhbøhh" then
conn.execute("update bruger set chatonline='"Nej"' where id = '" & session("user_id") & "'")
end if

Tænker du på at opdatere chatonline='nej' for alle hvor chattime er ældre end 7 minutter??

jup :-) det ville jo egentlig nok være lettest, end at den bare tager hver enkelt..

conn.execute("update bruger set chatonline='nej' where chattime<DATE_ADD(now(), INTERVAL -7 MINUTE)")

fennec, kommer du lige med et svar :)

.o) <-- One Eyed Jack