Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #57 da revista programar. Faz já o download aqui!

josh

[Resolvido] Ip's

Mensagens Recomendadas

josh    0
josh

Boas,

Estou a tentar contruir uma aplicação que pegue em todas as conexoes a que o pc esta conectado e verifique se esta ligado a um certo ip.

Por exemplo eu estou ligado as paginas hotmail, pap, google. E quero elaborar um programa que me monstre que estou ligado ao google porque um dos ip's que a network esta a usar e o da google.

Drawn:

Google Ip - 1.1.1.1

hotmail Ip - 2.2.2.2

pap IP - 3.3.3.3

O programa tinha que verificar se um dos ip's a que a network estava ligada era esse 1.1.1.1

Espero que tenham entendido :) Desde já um grande obrigado.

Regards~

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
josh    0
josh

Como da para fazer isso obviamente que nao sei...

De qualquer modo outra explicação.

Existem anti virus por exemplo que sabem os ip's a quais a nossa network esta ligada.

Eu quero em vb.net listar todos os ip's que estou a utilizar no momento em que listo. Então como agora estou no pap o programa deveria indiciar o ip do server da pap e assim sucessivamente.

Regards~

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
debliu    0
debliu

Pelo que parece o que ele quer é fazer um netstat mas em vez de ser pelo cmd é por um programa...

No fundo, parece que quer fazer um programa que faça netstat... penso eu!

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
josh    0
josh

Ja resolvi o meu problema :confused: com o netstat agora nao deve e funcionar em outros OS como o linux e assim

Em Win:

Dim Proc As Process = New Process

        Dim text As String

        Proc.StartInfo.FileName = "netstat.exe"

        Proc.StartInfo.UseShellExecute = False

        Proc.StartInfo.RedirectStandardOutput = True

        Proc.StartInfo.CreateNoWindow = True

        Proc.StartInfo.Arguments = "-n"

        Proc.Start()

        ' This redirects the output to the textbox

        text = Proc.StandardOutput.ReadToEnd()

        If text.Contains("O IP QUE QUEREMOS AQUI") Then

            server_lbl.Text = "SERVER"

        End If

        Proc.WaitForExit()

Obrigada por tudo. Se alguem tiver um metodo que work em linux e em windows ou menos complicado agradecia.

REgards~

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita a nossa Política de Privacidade