AccessTr.neT
Dış İp Bulma Programı - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Visual Basic 6 (https://accesstr.net/forum-visual-basic-6.html)
+--- Forum: Visual Basic 6 Dersleri (https://accesstr.net/forum-visual-basic-6-dersleri.html)
+--- Konu Başlığı: Dış İp Bulma Programı (/konu-dis-ip-bulma-programi.html)



Dış İp Bulma Programı - gitarc - 04/11/2010

Projenize INET ekleyin bir tane.

Private Sub cmdIPAdresiniz_Click()
Dim Ipim As String
Ipim = Inet1.OpenURL("http://www.whatismyip.org/")
If Left(Ipim, 5) <> "Error" Then
Text1.Text = Ipim
Else
MsgBox "Arka arkaya üç defadan fazla IP sorgulaması yapılmaz" & vbCrLf & _
"Lütfen bir müddet bekleyiniz", vbInformation, "Uyarı"
End If
End Sub






Cvp: Dış İp Bulma Programı - akd - 05/11/2010

Merhaba gitarc,
Bu kodlar vb.net için mi,
INET hangi menü bloğunda ?