I am using the Active Users MOD and when I look at who is active it displays their IP, and so what? It is just an IP which does not make me much wiser. So I changed it to a clickable link which opens a new window and does a WhoIs on all-nettools.com This is how I did it in active_users.asp I have commented out the original source. I am sure this can be done better and more graceful, but at least it gives you an idea about using this showing of IP for something more useful than just showing it
Around line 177
if bolAUIP then
' Arne change IP start
AFIPstreng ="http://www.all-nettools.com/cgi-bin/sw.cgi?&'"
AFIPstreng = AFIPstreng + rsAM("AU_IP") + """"
response.write " <td bgcolor=""" & CColor & """ align=center valign=middle nowrap><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strDefaultFontColor & """>" & "<a href=" & """" & AFIPstreng & " target=""_blank"">" & rsAM("AU_IP") & "</a>" & "</font></td>" & VBNewLine
'response.write " <td bgcolor=""" & CColor & """ align=center valign=middle nowrap><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strDefaultFontColor & """>" & WhatPage(rsAM("AU_LASTPAGE"),rsAM("AU_QUERYSTRING")) & "</font></td>" & VBNewLine
' Arne change IP end
end if
And around line 224
if bolAUIP then
' Arne change IP start
AFIPstreng ="http://www.all-nettools.com/cgi-bin/sw.cgi?&'"
AFIPstreng = AFIPstreng + rsAG("AU_IP") + """"
response.write " <td bgcolor=""" & CColor & """ align=center valign=middle nowrap><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strDefaultFontColor & """>" & "<a href=" & """" & AFIPstreng & " target=""_blank"">" & rsAG("AU_IP") & "</a>" & "</font></td>" & VBNewLine
' response.write " <td bgcolor=""" & CColor & """ align=center valign=middle nowrap><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strDefaultFontColor & """>" & rsAG("AU_IP") & "</font></td>" & VBNewLine
' Arne change IP end
end if