Är det någon som vet hur man gör för att filtrera bort sitt eget ip-nr. när man har typ "iplogg.asp. Jag vill alltså inte att mitt eget ip-nr. ska loggas bara andras,
Micke

<code>
If Request.ServerVariables("REMOTE_ADDR") <> "123.123.123.123" Then
'Logga ip
End If
</code>

/Johan

Tack för tipset men jag får inte till det, ipnr. syns inte nu men loggas i databasen jag gjorde så här i logg.asp:

<%Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/logg.mdb")

If Request.ServerVariables("REMOTE_ADDR") <> "127.0.0.1" Then
'Logga ip
End If


Conn.Close
Set Conn = Nothing%>

Ska jag ev. lägga in den koden fler filer eller är det den här.
Micke

Du får lägga if-satsen runt koden som loggar, hur ser koden ut som loggar?

/Johan

Kör du på en lokal server eller en server på internet?

Om det är på internet så får du tänka om, 127.0.0.1 = den lokala datorns ip, om den ligger på nätet är det ju servern som är 127.0.0.1



...

lokal när jag testar hemma sen på mitt webbhotell i slutänden när allt stämmer:

Koden är denna:

<link rel="stylesheet" href="stil.css" type="text/css">

<table width="281" cellpadding="0" cellspacing="0">
<tr>
<td><b>Senaste IP-Loggningen:</b></td>
<td align="center"><b>Ip-nummer:</b></td>
<td align="right"><b>Antal:</b></td>
</tr>
<tr>
<td colspan="3"><hr></td>
</tr>
<%Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/logg.mdb")

Set RS = Conn.Execute("Select Distinct ip From logg")

Do Until RS.EOF
Set ReS = Conn.Execute("Select datum From logg Where ip='" & RS("ip") & "'")
Set Antal = Conn.Execute("Select Count(*) As antal From logg Where ip='" & RS("ip") & "'")%>
<tr>
<td><%=ReS("datum")%></td>
<td align="center"><%=RS("ip")%></td>
<td align="right"><%=Antal("antal")%></td>
</tr>
<%RS.MoveNext
Loop
RS.Close
Set RS = Nothing%>
</table>

Micke

Du ska lägga if-satsen runt koden som loggar och inte den som visar resultatet (om du nu inte vill logga dej själv också men inte visa).

Jag förstår inte vad du vill göra riktigt med denna koden, den visar hur många gånger varje ip har besökt och ett av datumen... Om du förklarar vad du vill göra ska det nog gå att slänga ihop i en enda SQL-fråga.

/Johan

:-) oj tog vist fel, den här ska det vara:

<%Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/logg.mdb")

Ip = Request.Servervariables("REMOTE_ADDR")
Conn.Execute("Insert Into logg(Ip) Values('"& Ip &"')")

Conn.Close
Set Conn = Nothing%>

Vad jag vill göra är att inte logga mig när jag går in på min sida.

Micke

Du skriver så här:
<code>
<%
Ip = Request.Servervariables("REMOTE_ADDR")

If Ip <> "123.123.123.123" Then
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/logg.mdb")

Conn.Execute("Insert Into logg(Ip) Values('"& Ip &"')")

Conn.Close
Set Conn = Nothing
End If
%>


</code>
Tänk på att du måste köra en deletfråga med dit ipnummer för att ta bort de poster som redan fins i databasen.

Jag gorde en deletefråga men gjorde nog fel det kom upp ett felmeddelande, skulle nog behöva hjälp med den saken också.

Micke