advanced code snippet search

Posted By

goo on 08/09/10


Tagged

VBNet ip public


Versions (?)

Obteniendo IP Publica - VB.NET

 / Published in: VB.NET
 

URL: http://foro.el-hacker.com/f46/obteniendo-ip-publica-vbulletin-net-167504/

Expand | Embed | Plain Text 
  1. Imports System.Net
  2.  
  3. Private Function GETIP() 
  4.    Dim req As HttpWebRequest = WebRequest.Create("http://whatismyip.com/automation/n09230945.asp") 
  5.    Dim res As HttpWebResponse = req.GetResponse() 
  6.    Dim Stream As Stream = res.GetResponseStream() 
  7.    Dim sr As StreamReader = New StreamReader(Stream) Return (sr.ReadToEnd()) 
  8. End Function
  9.  
  10. MsgBox(GETIP())

Report this snippet  

You need to login to post a comment.