controllo IP

[rinosan_76]

Ciao a tutti... che voi sappiate esiste una funzione già fatta e testata per il controllo degli indirizzi ip?
Per controllo intendo al login se l'ip utente rispetta le reglole di accesso messe nella funzione di controllo IP allora si può logare...
Ciao
Rino

[heroes3]

if Request.ServerVariables("REMOTE_ADDR")= "ipchevuoitu" then
else
response.redirect "mandalodovevuoitu.asp"
end if

[rinosan_76]

Ok non sono così nubbio!
Io intendevo una classe o funzione che dati degli ip (magari potendo separare le classi o dando dei range e degli ip fissi) mi dicesse se potevo o no logarmi... sull'IP unico è semplice, ma sui range è più complesso, e se ne esiste una già funzionante io ne approfitto volentieri!

[rinosan_76]

up

[cavicchiandrea]

Non credo sia possibile, ameno che uno non abbia un ip fisso, l'alternetiva sono i cookie.

[99eros9]

No, non é possibile e non c´é modo di avere la sicurezza in ogni occasione.

[rinosan_76]

... be non è sicuro al 100% ma cmq se io devo fare una intranet e so gli ip che devono entrare posso bloccare gli altri, unico problema che non posso scriverli uno ad uno, quindi cercavo una classe che li gestisse come fa (ad esempio) ZoneAlarm

[Fichico]

ma intendi intranet dove possono loggarsi solo i pc della intranet o anche da internet?

Se è una intranet metti un ciclo sull'ultima terzina dell'ip da 1 a 255

[br1]

Se non hai un db d'appoggio puoi prendere spunto da questo:

<%

Function banned(wip)
	banned = (ip2lng(wip) >= ip2lng("192.168.21.140") And ip2lng(wip) <= ip2lng("192.168.114.71"))
End Function

Function permit(wip)
	permit = (ip2lng(wip) >= ip2lng("192.168.7.4") And ip2lng(wip) <= ip2lng("192.168.7.16"))
End Function

Function ip2lng(wip)
	dim IP0
	IP0 = split(wip, ".")
	ip2lng = Cint(IP0(0))*16777216+Cint(IP0(1))*65536+Cint(IP0(2))*256+Cint(IP0(3))
End Function

%>

ciao

[BeatPull]

io ho appena sviluppato questo

'##########		CONTROLLO CHE L'IP NON SIA PRESENTE NELLA BLACKLIST
IpUser = Request.ServerVariables("REMOTE_ADDR")
SplitIP = split(IpUser,".")
set RecIP = conn.execute("select ip1, ip2 from tbip where inizio < '"&giorno&"' and fine > '"&giorno&"' and attivo = 1")
if not RecIP.eof then
	while not RecIP.eof
	Ip1 = split(RecIP("ip1"),".")
	Ip2 = split(RecIP("ip2"),".")
	if cint(SplitIP(0)) >= cint(Ip1(0)) and cint(SplitIP(0)) <= cint(Ip2(0)) then
		if cint(SplitIP(1)) >= cint(Ip1(1)) and cint(SplitIP(1)) <= cint(Ip2(1)) then
			if cint(SplitIP(2)) >= cint(Ip1(2)) and cint(SplitIP(2)) <= cint(Ip2(2)) then
				if cint(SplitIP(3)) >= cint(Ip1(3)) and cint(SplitIP(3)) <= cint(Ip2(3)) then
					response.write "non puoi passare"
					response.end
				end if
			end if
		end if
	end if
	RecIP.movenext
	wend
end if

e si appoggia ad un db con i seguenti campi:
ip1 = inizio del range ip (es. 127.0.0.1) compreso
ip2 = fine del range ip (es. 127.0.0.9) compreso
inizio = data di inizio del blocco
fine = data di fine del blocco
attivo = (1/0) controlla su quella riga se il valore e' 1

in questo modo puoi bloccare l'accesso al sito ad un singolo ip o una serie di ip anche per un solo giorno, io lo tengo nelle inclusioni ad inizio pagina, in questo modo l'accesso al sito viene totalmente bloccato