/ Forside / Teknologi / Udvikling / ASP / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
Session og Logbog
Fra : Jørgen Müller


Dato : 30-11-02 10:50

Hej Gruppe

Jeg vil gerne have lavet en logbog over antal unikke besøg pr. side, men er
ikke helt klar over, hvordan den skal skrues sammen?
Forestiller mig at lave en tabel med sidenavn og en tæller der opdateres fra
en include fil.
Går ud fra at alle der åbner mit websted automatisk "laver" en session, men
hvordan får jeg adgang til den?
Har både sider for alle og sider for medlemmer(Login og oprettelse af
Session("PersonID").

Har været ude for, at session variabler der er sat til 5 minutter udløber
efter 5 minutter selv om brugeren surfer rundt på siderne, kan det være
rigtigt?

--
Med Venlig Hilsen

Jørgen Müller



 
 
Jakob Andersen (30-11-2002)
Kommentar
Fra : Jakob Andersen


Dato : 30-11-02 12:27

"Jørgen Müller" <j.muller@mail.tele.dk> wrote
> Jeg vil gerne have lavet en logbog over antal unikke besøg pr. side, men
er
> ikke helt klar over, hvordan den skal skrues sammen?

Har du ikke adgang til serverens logfiler? Det er lidt dumt at opfinde den
dybe tallerken 2 gange.

> Går ud fra at alle der åbner mit websted automatisk "laver" en session,
men
> hvordan får jeg adgang til den?

I din Global.asa fil kan du eksekvere kode i Session_OnStart funktionen

> Har været ude for, at session variabler der er sat til 5 minutter udløber
> efter 5 minutter selv om brugeren surfer rundt på siderne, kan det være
> rigtigt?

Sker dette mens du "piller" ved dine filer, og er du sikker på at din
session timeout ikke er sat til 5 min.

--
Jakob Andersen



Jørgen Müller (30-11-2002)
Kommentar
Fra : Jørgen Müller


Dato : 30-11-02 14:02

Hej Gruppe (Jacob)
>Har du ikke adgang til serverens logfiler? Det er lidt dumt at opfinde den
dybe tallerken 2 gange.
Jo da, men den er ikke tilfredsstillende, kan kun vise de 10 sider der har
flest besøg, og da jeg kører med frame bliver de 4 sider vist hele tiden, så
derfor?

>Sker dette mens du "piller" ved dine filer, og er du sikker på at din
session timeout ikke er sat til 5 min.
Det sker når jeg surfer rundt på siderne, der vel og mærke ligger på min
egen computer. Har nu fundet ud af, at det specielt er en fil, der laver
balladen, for når jeg har haft den åben et par gange, eller har benyttet mig
af formularen og afsendt et bud, så er min Session("PersonID") slettet?
Jeg var ikke klar over, at en session variabel udløb efter det antal
minutter man satte den til i session_on_start. Troede at det først talte når
sessionen var inaktiv?
Har lavet en ny session timeout på 50 min og genstartet men det hjælper
ikke?

Her er koden i Bid.asp der laver balladen.
<!-- #include file="Clssfd.asp" -->
<META NAME="Generator" CONTENT="Stone's WebWriter 3.5">
<BASEFONT FACE="Verdana" BGCOLOR="Black">
<HTML>
<HEAD>
<TITLE>Salgsbud</TITLE>
</HEAD>

<BODY BGCOLOR="White">
<%
Response.Write "<H1 align=center>Velkommen " & "nr. " &_
Session("PersonID") & " " & Session("Fornavn") & "</H1>"

Dim rsItem, strItemName, strDescription
Set rsItem = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT T_Varer.VareNavn, T_Varer.Beskrivelse, T_Varer.Mindstepris,
" &_
"T_Varer.Billede " &_
"FROM T_Varer " &_
"WHERE T_Varer.VareID = " & Request("Item")

rsItem.Open strSQL, objConn
strItemName = rsItem("VareNavn")
strDescription = rsItem("Beskrivelse")
strMindstePris = rsItem("Mindstepris")
strBillede = rsItem("Billede")
rsItem.Close
Set rsItem = Nothing

Dim rsBid
Set rsBid = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT T_Bud.VareID, T_Bud.ByderID, T_Bud.BudDato, " &_
"T_Bud.BudPris, T_Bud.BudForskel " &_
"FROM T_Bud " &_
"WHERE VareID =" & Request("Item") &_
" ORDER BY BudPris DESC"
rsBid.Open strSQL, objConn

%>

<CENTER><H1>Danmarks Småbådsfiskeklubber<BR>Bud på <%= strItemName
%></H1></Center>
<P>

<%
Dim varHighBid
varHighBid = 0
If rsBid.EOF Then
Response.Write "Indtil nu er der ikke blevet budt på denne vare!"
Else

Response.Write "Bud History (højeste bud først)" &_
"<TABLE BORDER=""2"" CELLSPACING=""3"" CELLPADDING=""3"">" &_
"<TR>" &_
"<TH>Byder ID</TH>" &_
"<TH>Bud Dato</TH>" &_
"<TH>Bud</TH>" &_
"<TH>Bud forskel</TH>" &_
"</TR>"
Do While Not rsBid.EOF
Response.Write _
" <TR>" & _
" <TD>" & rsBid("ByderID") & "</TD>" & _
" <TD>" & rsBid("BudDato") & "</TD>" & _
" <TD ALIGN=RIGHT>" & FormatCurrency(rsBid("BudPris")) & "</TD>" &
_
" <TD ALIGN=RIGHT>" & FormatCurrency(rsBid("BudForskel")) & "</TD>"
& _
" </TR>"
If varhighBid = 0 Then varHighBid = rsBid("BudForskel")
rsBid.MoveNext
Loop
rsBid.Close
Set rsBid = Nothing
Response.Write "</TABLE>"
End If
%>

<FORM NAME="frmBid" ACTION="prv.asp" METHOD="Post" onSubmit="return
VerifyData()">
<INPUT TYPE="Hidden" NAME="ItemID" VALUE="<%= Request("Item") %>">
<P>
<TABLE WIDTH="80%" BORDER="0">
<TR>
<TD ROWSPAN="6"><IMG src="<%= strBillede %>"></TD>
</TR>
<TR>
<TD WIDTH="20%"><B>Vare:</B></TD>
<TD><%= strItemName %></TD>
</TR>
<TR>
<TD WIDTH="20%"><B>Mindstepris:</B></TD>
<TD><%= FormatCurrency(strMindstepris) %></TD>
</TR>
<TR>
<TD><B>Beskrivelse:</B></TD>
<TD><%= Replace(strDescription, vbcrlf, "<BR>") %></TD>
</TR>
<TR>
<TD><B>Dit bud >>>>></B></TD>
<TD><INPUT TYPE="text" NAME="Bid" SIZE="40"></TD>
</TR>
<TR>
<TD></TD>
<TD ALIGN="center" COLSPAN="2"><BR>
<INPUT TYPE="Submit" VALUE="Byd på vare">&nbsp;&nbsp;
<INPUT TYPE="Reset"></TD>
</TR>
</TABLE>
</FORM>
<HR>
<TABLE BORDER="0" WIDTH="100%>
<TR Align="Center">
<TD WIDTH="33%"><A HREF="BrowseListings.asp">Gennemse tilbuddene</A></TD>
<TD WIDTH="33%">Tilføj vare til salg</TD>
<TD WIDTH="33%"><A HREF="Register.asp?Update=True">Ændre
Registreringsdata</A></TD>
</TR>
</TABLE>
</BODY>

<SCRIPT language="JavaScript">
<!--
function VerifyData()
{
if (document.frmBid.Bid.value <= <%= varHighBid %>)
{
alert ("Du bliver nødsaget til at byde højre end " +
"<%= FormatCurrency(varHighBid) %>.");
return false;
}
else
return true;
}
-->
</SCRIPT>
</HTML>

--
Med Venlig Hilsen

Jørgen Müller



Jørgen Müller (30-11-2002)
Kommentar
Fra : Jørgen Müller


Dato : 30-11-02 16:41

Hej Gruppe

Så har jeg endelig fundet fejlen i Bid.asp og grunden til, at mine session
lige pludselig ikke virkede mere.

> <TR>
> <TD ROWSPAN="6"><IMG src="<%= strBillede %>"></TD>
> </TR>
I ovenstående linie bliver der indsat et billede, og det virkede også fint,
men hvis der ikke er noget billede,
så gik session variablerne agurk og holdt op med at virke. Løsningen ser
sådan her ud:
<%
If IsNull(strBillede) Then
Response.Write "<TD ROWSPAN=6>&nbsp;</TD>"
Else
Response.Write "<TD ROWSPAN=6><IMG src=" & strBillede & "></TD>"
End If
%>
Jeg har nemlig samme problem som så mange andre med Null og nul.

OBS. jeg mangler stadig lidt "meget" mere viden om, hvordan man laver en
logbog sammen med en database?
--
Med Venlig Hilsen

Jørgen Müller



Søg
Reklame
Statistik
Spørgsmål : 177560
Tips : 31968
Nyheder : 719565
Indlæg : 6408950
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste