---
title: "Kolla och lagra IP"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/94184-kolla-och-lagra-ip"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "webbSAJTEN"
published: "2004-01-07T18:41:18.000Z"
updated: "2004-01-08T07:56:37.000Z"
replies: 9
views: 359
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/94184-kolla-och-lagra-ip"
---

# Kolla och lagra IP

## #1 — webbSAJTEN, 2004-01-07T18:41Z

Hejsan!
Jag har startat en namninsamling och jag har märkt att det är många som missbrukar den och skickar in en massa onödiga namn.. Jag skulle vilja spara allas IP-nummer i databasen så att jag lätt kan spärra dem..

Hur ska jag bära mig åt??

Permalänk: https://www.webforum.nu/p/94184

## #2 — Sebbe, 2004-01-07T18:52Z

Är det såhär du menar?

```
strIP = Request.ServerVariables("REMOTE_ADDR")
strSQL = "SELECT ip FROM namn WHERE ip = '" & strIP & "'"
Set objRS = objConn.Execute(strSQL)

If objRS.EOF Then
  strSQL = "INSERT INTO namn (namn, ip) VALUES ('" & Replace(Request.Form("namn"), "'", "''") & "', '" & strIP & "')"
  objConn.Execute(strSQL),,128
Else
  Response.Write("Hur många namn har du egentligen?")
End If

Set objRS = Nothing
```

Permalänk: https://www.webforum.nu/p/1245205

## #3 — m_soderlund, 2004-01-07T18:56Z

Du får besökares IP-nummer genom att använda *servervariablerna* i ASP.

```
<%
Dim ipnr
ipnr = Request.ServerVaraibles("REMOTE_ADDR")
%>
```

För att sätta in IP-nummer i databasen använder du en SQL-fråga, med denna syntax:

```
INSERT INTO tabell(ipnr) VALUES('" & ipnr & "')
```

För att kolla om det spammande IP-numret finns i databasen så kan du använda kod liknande denna:

```
'anslut till databasen, skapa en anslutning kallad [i]Cn[/i] och ett recordset-objekt kallat [i]Rs[/i].

Dim strSQL, Rs
strSQL = "SELECT ipnr FROM tabell WHERE ipnr='" & ipnr

Set Rs = Cn.Execute(strSQL)

If Rs.EOF Then
'allt okej
Else
skriv ut meddelande om att användaren inte får besöka sidan, eller dyl.
End If

Rs.Close : Set Rs = Nothing
Cn.Close : Set Cn = Nothing
```

Hoppas du förstår. :D

**/r** Sebbe han före.  :)

Permalänk: https://www.webforum.nu/p/1245208

## #4 — webbSAJTEN, 2004-01-07T18:56Z

Såhär..

Jag vill att när dom skriver sitt namn i insamlingen så ska deras IP-nummer lagras i databasen med deras namn..
Det finns en egen kolumn i databasen som heter IP..

Helst så ska det vara så att dom inte skall kunna skriva in mer än en gång.. Alltså att jag inte skall behöva spärra just deras IP, utan att det ska spärras automatiskt..

Permalänk: https://www.webforum.nu/p/1245209

## #5 — Sebbe, 2004-01-07T18:59Z

Aha, då kan du göra såhär:

```
strIP = Request.ServerVariables("REMOTE_ADDR")
strSQL = "SELECT namn FROM namn ORDER BY namn"
Set objRS = objConn.Execute(strSQL)

blnIP = False

If NOT objRS.EOF Then
  Do Until objRS.EOF
    arrTemp = Split(objRS("namn"), "||")
    strNamnIP = arrTemp(1)

    If strNamnIP = strIP Then
      blnIP = True
      Exit Do
    End If

    objRS.MoveNext
  Loop
End If

If NOT blnIP Then
  strSQL = "INSERT INTO namn (namn) VALUES ('" & Replace(Request.Form("namn"), "'", "''") & "||" & strIP & "')"
  objConn.Execute(strSQL),,128
Else
  Response.Write("Hur många namn har du egentligen?")
End If

Set objRS = Nothing
```

Permalänk: https://www.webforum.nu/p/1245210

## #6 — webbSAJTEN, 2004-01-07T19:16Z

la in..

Jag la in koden på sidan som heter "spara_namn.asp"..
Sidan som tar hand om alla andra namn och sparar dem..
Där IP-nummret ska stå i databsen kommer bara en !´"0"..

Varför det?

Permalänk: https://www.webforum.nu/p/1245212

## #7 — Sebbe, 2004-01-07T19:20Z

Vad skrivs ut av det här på din dator?

```
Response.Write(Request.ServerVariables("REMOTE_ADDR"))
```

Permalänk: https://www.webforum.nu/p/1245214

## #8 — webbSAJTEN, 2004-01-07T19:22Z

inte..

Jag förstår inte vad du menar tyvärr..
Har du MSN så kan du adda mig: <jimmygronwall@hotmail.com>

Permalänk: https://www.webforum.nu/p/1245216

## #9 — m_soderlund, 2004-01-07T19:34Z

Det är bara att skriva in koden som Sebbe gav dig i en ASP-sida, webbSAJTEN, och köra den sidan. Syns något, syns inte något?

Permalänk: https://www.webforum.nu/p/1245222

## #10 — mikul, 2004-01-08T07:56Z

webbSAJTEN: Sebbe menar att du skall testa att skriva 

```
Response.Write(Request.ServerVariables("REMOTE_ADDR"))
```

ensamt nån stans på en ensam liten sida och testa vad du får för utskrift ;)

Permalänk: https://www.webforum.nu/p/1245442

---

Tråden på webben: https://www.webforum.nu/amne/asp/94184-kolla-och-lagra-ip