På vilken sida börjar besökaren??

två alternativ för global.asa:

1. i sub session_onstart, spara namnet på aktuell sida till databasen.

sub session_onstart
strFirstPage = request.servervariables("script_name")
'stoppa in i db eller vad du nu vill göra
end sub

2. med servervariabeln http_referer kan du se varifrån besökaren kom.

är det inte en sida på din server, så borde ju detta vara sidan som besökaren börjar på?

sub session_onstart
if not instr(request.servervariables("http_referer"), request.servervariables("server_name")) >0 then
strFirstPage = request.servervariables("script_name")
'stoppa in i db eller vad du nu vill göra
end if
end sub

eftersom en session kan timeouta när man fortfarande är på sajten, så hade jag nog kört alt. 2.

(jag hoppas att detta funkar, har inte testat, utan skrev rätt ur huvet)

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>

Ok ANders!

Uttryckte mig lite dåligt tror jag. Jag vill veta vilken sida som besökaren kommer in på min site. Alltså hittar vår site via sökmotor så kan det hända att han kommer in på annan en annan sida än index typ

jo, och det var den frågan jag svarade på.

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>

Tack Anders!

En fråga till. I det fältet där jag ser varifrån alla kommer så får jag ofta upp vår hemsidesadress även om jag klickat tex på länken som finns under min profil här på webforum. Ps detta har inte att göra med det scriptet som Anders fixade förut utan med en helt vanlig. Refferer

Vad kan problemet vara. Kan det vara så att nån av filerna ligger fel! Global.asa ligger i roten

******************** NYTT
Kolla på denna sidan så ser ni hur det ser ut. Jag har de 3 senaste träffarna klickat på länkar på andra siter till vår hemsida. Som ni ser så har det funkat ibland att få den riktiga "refferen" www.amts.nu/default.asp

[Redigerat av pellsäter den 29 jun 2001]

[Redigerat av pellsäter den 29 jun 2001]

visa gärna hur funktionen som loggar all information ser ut.

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>

Här Global.asa

<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Session_OnStart
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open Application("DBstr")

strIp = Request.ServerVariables("REMOTE_HOST")
strKlient = Request.ServerVariables("HTTP_USER_AGENT")
dtmDatum = Now
strReferer = Request.ServerVariables("HTTP_REFERER")

if not instr(request.servervariables("http_referer"), request.servervariables("server_name")) \>0 then
strFirstPage = request.servervariables("script_name")


SQL = "INSERT INTO logg (dtm, ip, klient, referer, firstpage) VALUES (#" & dtmDatum & "#, '" & strIp & "', '" & strKlient & "', '" & strReferer & "', '" & strFirstPage & "')"
objConn.Execute(SQL)

objConn.Close
Set objConn = Nothing
Application("intActive_users") = Application("intActive_users") + 1
end if

End Sub

Sub Session_OnEnd
Application("intActive_users") = Application("intActive_users") - 1
End Sub

Sub Application_OnStart
Application("intActive_users") = 0
Application("DBstr") = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("/stats/stats.mdb") & ";"
End Sub

Sub Application_OnEnd

End Sub
</SCRIPT>

jag kan inte se något fel. jag kan dock meddela att jag har ungefär samma problem i bland på min egen statistikmodul som jobbar på samma sätt.
man kan inte helt utesluta att det är någon bugg som ibland gör att referern innehåller fel saker.

jag måste passa på att berömma dig för din variabelnamngivning!

det är inte många som är duktiga på namngivning, men det där var roligt att se. :)

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>

tacka inte mig men jag håller med dig om det.

Det är ett script som Vide gjort en gång i tiden somjag hittat här

Tack Vide

ok, bra vide! :)

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>

:)

Även om jag tydligen har blandat engelska och svenska, vilket är en dålig vana, den skall jag sluta upp med, och helt gå över till engelska.

------------------
Vide rox = new Vide();
rox.learn("C#");
webeye.nu