[thorchan]

I'm working a DDNS system as my school project.Now I use VB 6.0 TO develop a client and I need to refresh the IP address after the IP is changed. Here are my codes:

Code:

VB Code for my program:
Private Sub form_load()
txtIP.Enabled = False
txtIP.Text = Winsock1.LocalIP
End Sub

Private Sub Timer1_Timer()
main.Refresh
Dim subdomainid As String
Dim ip As String
subdomainid = txtSubid.Text
ip = txtIP.Text
WebBrowser1.Navigate "http://ireiro.com/client_update.php?subid=" & subdomainid & "&a=" & ip
txtIP.Text = Winsock1.LocalIP
End Sub

Can any body give me some idea on this?