Şimdi Ara

VB 6.0 IP Değiştirme Yardım !

Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
2 Misafir - 2 Masaüstü
5 sn
7
Cevap
0
Favori
275
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
Öne Çıkar
0 oy
Sayfa: 1
Giriş
Mesaj


  • Herkese Merhaba

    Ben VB 6.0 da IP değiştirme programı yapmak istiyorum.

    2 adet text olacak
    1.text= İp
    2.text= Port

    Bu bilgiler girilip butona basildığında PC nin ip si değişecek.


    Nasıl yapabilirim azcık ipucu verebilirmisiniz veya daha önce yapan varsa kodlarını gönderebilir mi ?

    Teşekkürler


    < Bu ileti mobil sürüm kullanılarak atıldı >



    _____________________________
  • Pc nin ip derken yerel ip mi ?

    < Bu ileti mini sürüm kullanılarak atıldı >
    _____________________________
  • Programın içindeki webbrowser da Bir web sitesine girdigimde ip min değişik görünmesini istiyorum.

    < Bu ileti mobil sürüm kullanılarak atıldı >
    _____________________________
  • Öyle çalışmıyor o işler.
    _____________________________
    Donanım ve çevre birimlerinde gaming ibaresine ayar olan insan.
  • Nasıl yani ?

    < Bu ileti mobil sürüm kullanılarak atıldı >
    _____________________________
  • Yani kafana göre bir external IP adresi alamazsın. ISP tarafından verilir ve müdahale edemezsin.
    _____________________________
    Donanım ve çevre birimlerinde gaming ibaresine ayar olan insan.
  • Bi kod buldum sizce işe yarar mı?

    Private Sub Command1_Click()
    WebBrowser1.Silent = True
    WriteToRegistry "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Internet Settings\ProxyServer", "127.0.0.1:80"
    WriteToRegistry "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Internet Settings\ProxyEnable", 1, "REG_DWORD"
    WebBrowser1.Navigate2 "www.google.com"
    End Sub

    Private Sub WriteToRegistry(strFolder As String, strString, Optional strRegType As String = "REG_SZ")
    On Error Resume Next
    Dim b As Object
    Set b = CreateObject("wscript.shell")
    b.RegWrite strFolder, strString, strRegType
    End Sub

    < Bu ileti mobil sürüm kullanılarak atıldı >
    _____________________________
  • Yapay Zeka’dan İlgili Konular
    2.0 aktif öneri
    3 yıl önce açıldı
    Daha Fazla Göster
    
Sayfa: 1
- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.