View Your Public Ip In VB

hi

here is code to view your public ip :
Add Microsoft Internet Transfer Control 6 And add Inet1
And One text Box Called txtIp

Code:

---

Dim strName As String
Private Sub Form_Load()
txtIP = (Inet1.OpenURL("http://iqhaacker.6te.net/ip.php"))
strName = Replace(txtIP, "", "")
txtIP.Text = strName
End Sub

---

And Here is the php File If u like To Upload It to Ur Site And Link The Program
to Ur Site

Code:

---

<?php
$ip=$_SERVER['REMOTE_ADDR'];
echo $ip
?>

---

And If You User it Change The Link From The Program To Your Link.

Code:

---

http://iqhaacker.6te.net/ip.php

---

Change it To Your Link

Code:

---

http://xxxxx/ip.php

---

And Have A Nice Day
:afrog: :wave: :afrog: