öncelikle Project>Components yolunu izleyerek açılan pencerenin Controls bölümünden Microsoft Winsock Controls 6.0 (SP6) yi araç kutusuna ekleyin
Forma buton ve winsock nesnesini ekleyin.
Aşağıdaki kodları yazın
öncelikle Project>Components yolunu izleyerek açılan pencerenin Controls bölümünden Microsoft Winsock Controls 6.0 (SP6) yi araç kutusuna ekleyin
Forma buton ve winsock nesnesini ekleyin.
Aşağıdaki kodları yazın
Kod:
Private Sub Command1_Click()
ip = Winsock1.LocalIP
MsgBox ip
End Sub
20****mrcplus****04
Private Sub Command1_Click()
ip = Winsock1.LocalIP
MsgBox ip
End Sub
Çerezler küçük bilgi verici metinlerdir, bizim veya iş ortaklarımızın tarayıcınız aracılığıyla size ulaşmamızı sağlar.
Tarayıcınızdaki ayarları değiştirerek istediğiniz zaman çerez kullanımını engelleyebilirsiniz.
Genel Veri Koruma Yönetmeliği ile uyumlu aşağıdaki çerezleri kullanıyoruz:
- Temel çerezler: Web sitesinin tam olarak işlevsel olması için kesinlikle gereklidir.
- Opsiyonel Çerezler: İsteğe bağlı çerezlerdir ve web sitesini geliştirmemize yardımcı olur, ör. sizi kişisel olarak tanımlamadan web sitesindeki kullanım davranışınızın analiz edilmesi gibi.
Gizlilik politikamızdan daha fazla bilgiye ulaşabilirsiniz.