Jump to content
Notícia
  • Adquira já o seu VIP!

Search the Community

Showing results for tags 'captura de ip'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • Anunciantes
    • Advertise here
    • silvaBR Cheats
    • Velozhost
  • ################## WEB CHEATS ##################
  • Anúncios/Eventos
    • Regras
    • Anúncios
    • Eventos do fórum
  • Feedback & Suporte
    • Tutoriais WC
    • Suporte
    • Sugestões
    • Denúncias e Reclamações
    • Depósito
  • Shooter Zone
    • Counter Strike
    • Valorant
    • Rainbow Six Siege
    • Outros Shooters em Geral
    • Shooter Zone - Lixão
  • Battle Royale
    • COD Warzone
    • Free Fire
    • PUBG - Playerunknown's Battlegrounds
    • Fortnite
    • Outros Jogos Battle Royale
  • MMO Zone
  • Outros Games Zone
  • Design Zone
  • Info Zone
  • ################## WEB CHEATS ##################
  • Entretenimento & Diversão
  • MarketPlace
  • Old WC's Bate Papo
  • 【FREE FIRE】▄︻┻┳═一's Fórum do Clube
  • Anticomunismo's Tópicos
  • Tópicos Importantes !'s Tópicos

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Discord


Idade

 
or  

Found 1 result

  1. Olá pessoal, recentemente comecei a entrar no mundo da programação, mais isso não vem ao caso. Hoje vou ensina-lós passa-a-passo á como fazer um capturador de IP de sites! Bom, primeiramente faça a sua Form1 do seu jeito, caso tenha dúvidas de como fazer siga a imagem abaixo. Agora vamos fazer a codificação! Let's Go Girls and Boys. No botão Capturar IP, você vai clicar duas vezes nele e de um CTRL+A e cole o código abaixo. Imports System.Net.Dns Imports System.Net Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim Hostname As IPHostEntry = Dns.GetHostByName(TextBox1.Text) Dim Ip As IPAddress() = Hostname.AddressList TextBox2.Text = Ip(0).ToString End Sub End Class Depois disso no botão, limpa tudo clique duas vezes, e coloque o seguinte código: TextBox1.Text = "" TextBox2.Text = "" Feito isso, de um Start no seu projeto e veja como ficou! Observação no Visual Basic 2013/2010/2008 ele detecta um erro, porém um falso erro. Esse erro não vai causar nenhum mal funcionamento no Capturador. Foi apenas isso pessoal até mais, Atenciosamente Wil~*
×
×
  • Create New...