SnippetGood

Question

1

I'm just curious if there's a snippet for returning your IP address, for the classic "Your IP address is ___" gimmick.

Is there something out there?

Thanks.

edited Oct 17 at 16:02

miss snippet♦♦
189●8

asked Oct 1 at 4:43

Code Newb
149●6

rockinthesixstring · Accepted Answer · 2009-10-11 23:57:54Z UTC

2

Since I don't have enough reputation to up vote, I'm going to "up vote" binky. That function above is far too much overkill for a simple need.

If you want to take it one step further, you can use a function

Public Shared Function GetUserIP() as string
     Return HttpContext.Current.Request.ServerVariables("remote_addr"))
End Function

Then you can just call your function

Response.Write(GetUserIP)

This is especially if you decide you want to pull the users IP address in multiple locations.

answered Oct 11 at 23:57

rockinthesixstring
81●2

	Looking at the History of this question, binky edited the question WAY WAY far away from the original. The original question was how to return domain name availability... not return the users IP address. I don't think I'm willing to be apart of a website where moderators completely rewrite questions. As per the original question, why don't you look at... articles.sitepoint.com/article/… – rockinthesixstring Oct 12 at 1:22
	Hi Rockinthesixstring, Thanks for the great answer and welcome to snippetgood.com! Since this site is less than two weeks old, we stocked it with some test questions from people we know - after our testing stuff out, we edited some test questions to make them better snippets. Complete rewrites aren't normal practice :) – binky♦ Oct 12 at 2:33
	I think it was actually me that editted it too haha – Code Newb Oct 12 at 14:33

Snipper · Answer 2 · 2009-10-01 04:50:51Z UTC

This will return your IP.

Public Function GetExternalIP(ByVal Provider As String) As String
        Dim WebReq As HttpWebRequest = HttpWebRequest.Create(Provider)
        Dim WebRes As HttpWebResponse = WebReq.GetResponse()

        Dim ResStream As System.IO.Stream = WebRes.GetResponseStream
        Dim ResStreamReader As New StreamReader(ResStream, Encoding.UTF8)

        Dim IP As String = ResStreamReader.ReadToEnd

        ResStream.Close()
        WebRes.Close()

        Return IP
    End Function

binky · Answer 3 · 2009-10-10 02:33:59Z UTC

1

<%Response.Write(Request.ServerVariables("remote_addr"))%>

answered Oct 10 at 2:33

binky♦♦
500●8

Can I use .NET to return an IP?

3 Answers