Nie podpowiem Ci jakby to wyglądało w VB. Podam Ci natomiast kod w C#, a są one dosyć podobne i może dasz sobie radę:
To jest pobieranie adresu ip komputera (sęk w tym, że przynajmniej mi podaje adres w sieci lokalnej, a nie ten "na wyjściu"):
System.Net.Dns.GetHostAddresses(System.Net.Dns.GetHostName())
Kiedyś, kiedyś, sto lat temu napisałem coś takiego:
private string CheckIp()
{
try
{
HttpWebRequest zapytanie = (HttpWebRequest)WebRequest.Create("http://automation.whatismyip.com/n09230945.asp");
HttpWebResponse odpowiedz;
StreamReader odpowiedzSTR;
String DaneOdebrane;
zapytanie.Method = "GET";
zapytanie.UserAgent = "Mozilla/5.0 (Windows; U; Windows NT 5.1; pl; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3 (.NET CLR 3.5.30729)";
zapytanie.ContentType = "application/x-www-form-urlencoded";
zapytanie.KeepAlive = true;
zapytanie.Accept = "text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8";
zapytanie.AllowAutoRedirect = true;
zapytanie.Timeout = 1000;
odpowiedz = (HttpWebResponse)zapytanie.GetResponse();
odpowiedzSTR = new StreamReader(odpowiedz.GetResponseStream());
DaneOdebrane = odpowiedzSTR.ReadToEnd();
return DaneOdebrane;
}
catch { return ""; }
}
W zasadach whatismyip.com można wyczytać, że sprawdzać ip w ten sposób można co jakiś czas (5 minut chyba) - w praktyce działa to za każdym razem, no ale zasady to zasady, prawda? :D
Co do informacji o systemie/maszynie to klasa System.Enviroment i WMI.