IPadresse til navn

Hvis du har registrering af brugernavne på din side, så skulle det ikke være noget problem at lave sådan en liste. Du kan jo bare gemmen en record om hvornår brugeren sidst har været der, og hvilken ip de har haft.

du skal da bare tjekke på brugernavn og ip og hvis den finde ud af navnet på den bruger der ejer ipen, "else" annonym

har i ikke lige et script eller noget??

Det er temmeligt enkelt at lave, hvis brugerne skal logge ind. Jeg kan lave det hele til dig med login for 200 pts, hvis det har interesse.

nej, fuck det...

men lige noget andet... hvis jeg har
a.writeline(time & "

hvordan får jeg så datoen med...???

er igang med at prøve noget til dig

bruger date

du kan liste sådan her..

http://www.1q.frip.dk/ip.asp

ja, det ser godt ud... må jeg få den kode...

skal du kun liste da. skal du ikke sætte navn og ip ind ?

nej, det er sådan jeg kan se hvem der har været inde... altså lissom http://www.bellinizone.dk/tracker.txt , bare i en asp-fil og med navn ud for ipen!

jamen ligenu tjekker jeg ikke nogen IND det er bare en database som jeg havde.

kan du lave sådan en til mig?? hvis du vil skal du nok få noget for det.

Im way ahead of you

Kontakt mig venligt via mit minisite

Hvad var så løsningen - skriv den lige her til os andre :-)

<%
session.LCID = 1030
%>
<% navn = ("Navnet") %>
<%set rs = server.CreateObject("ADODB.Recordset")
set conn = server.CreateObject("ADODB.Connection")'
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath("db.mdb")
SQL = "Select * from ip where ip = '" & request.ServerVariables("REMOTE_ADDR") & "'"
set rs = conn.execute(SQL)
If rs.EOF Then
strSQL = "INSERT INTO ip(ip, dato, navn) VALUES ('" & Request.ServerVariables("REMOTE_ADDR") & "',  '" & now() & "', '" & navn & "')"
Set rs = Conn.Execute(strSQL)
else %><strong>Du er registeret på listen herunder</strong><%End If
Set rs = Nothing
%> <br>
<%set rs = server.CreateObject("ADODB.Recordset")
set conn = server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath("db.mdb")
strSQL = "select * from ip order by dato DESC"
Set rs = Conn.Execute(strSQL)
do while not rs.EOF%><%=rs("dato")%>&nbsp;- [<%=rs("ip")%>] - <%If rs("navn") <> "" Then
response.write rs("navn")
else%>Annonym<%end if%><br>
<%rs.movenext%><%loop%></p>

<p><font SIZE="1">&nbsp;</p>

<p></font><font face="Tahoma" SIZE="1" color="#000000">&lt;% navn = (&quot;Her skal du
bare skrive din session/variabel eller dit recordset så virker det&quot;) %&gt; </font>