---
title: "IP inom viss range"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/121422-ip-inom-viss-range"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Erik Juhlin"
published: "2005-01-31T18:52:11.000Z"
updated: "2005-01-31T18:52:11.000Z"
replies: 0
views: 5323
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/121422-ip-inom-viss-range"
---

# IP inom viss range

## #1 — Erik Juhlin, 2005-01-31T18:52Z

En liten funktion som kan säga om ett IP är inom en viss range.

```
Function CheckIP(ByVal sIP, ByVal sFirstRangeIP, ByVal sLastRangeIP)
	Dim vTmp, lIP, lFirstIP, lLastIP
	vTmp = Split(sIP, ".")
	lIP = vTmp(0) * 1000000000 + vTmp(1) * 1000000 + vTmp(2) * 1000 + vTmp(3)
	vTmp = Split(sFirstRangeIP, ".")
	lFirstIP = vTmp(0) * 1000000000 + vTmp(1) * 1000000 + vTmp(2) * 1000 + vTmp(3)
	vTmp = Split(sLastRangeIP, ".")
	lLastIP = vTmp(0) * 1000000000 + vTmp(1) * 1000000 + vTmp(2) * 1000 + vTmp(3)
	
	CheckIP = (lIP >= lFirstIP And lIP <= lLastIP)
End Function
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/121422-ip-inom-viss-range