04-09-2013, 09:00 AM
External IP
vb.net
php
vb.net
Code:
Public ExternalIP As String
Private Sub GetIp()
Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("http://www.brandonsoft.com/ip.php")
Dim response As System.Net.HttpWebResponse = request.GetResponse
Dim sr As System.IO.StreamReader = New System.IO.StreamReader(response.GetResponseStream())
Dim regsource As String = sr.ReadToEnd
ExternalIP = regsource
End Sub
php
Code:
<?php
$ip_address = $_SERVER['REMOTE_ADDR'];
echo "$ip_address";
Website: <!-- m --><a class="postlink" href="http://www.PBAProductions.com">http://www.PBAProductions.com</a><!-- m -->
E-Mail: <!-- e --><a href="mailtoatrick@AriSystems.Org">Patrick@AriSystems.Org</a><!-- e -->
Skype: Qwaxer
Youtube: Qwaxer
E-Mail: <!-- e --><a href="mailtoatrick@AriSystems.Org">Patrick@AriSystems.Org</a><!-- e -->
Skype: Qwaxer
Youtube: Qwaxer