Cherche infos connexion PC / Internet ???

Bonjour,

Je cherche infos PC liaison Internet sous Vista :

' - ?tat connexion : actif ou inactif (pour calcul dur?e)

' - adresse IP local PC

' - nom utilisteur PC

' - SSID nom r?seau wifi

' - Vitesse de d?bit



Si vous avez une id?e, m?me plusieurs ???



Merci, cordialement ;o)


-
Logiciels, romans, contacts : http://irolog.free.fr
_______________________
.
.

Bonjour Le Troll,Alors, à priori, pour savoir si tu es connecté sur internet,

Bonjour Le Troll,

Alors, à priori, pour savoir si tu es connecté sur internet, si ce n'est pas
ton PC qui est connecté en direct sur internet, la seule solution que je
pense est 1 simple ping sur 1 adresse internet, à moins que tu puisses
communiquer avec le périphérique qui fournit internet (et encore, ca doit
pas être évident).

Tu peux en avoir 1 par carte réseau, et quand il y en a plusieurs, c'est pas
forcément la 1ère carte qui possède les informations souhaitées.

J'ai trouvé quand même ca via Google :
http://faqvbnet.developpez.com/?page=netw#netw_testcnx
http://faqvbnet.developpez.com/?page=netw#netw_ipaddr
http://faqvbnet.developpez.com/?page=netw#netw_AllIPMachine
http://faqvbnet.developpez.com/?page=netw#netw_PingMachine


F623F3C0-2C16-4EAE-9C94-C844A01EA54D@microsoft.com...

Bonjour LE TROLLJ'ai ceci qui fonctionneIf My.Computer.Network.

Bonjour LE TROLL
J'ai ceci qui fonctionne

If My.Computer.Network.IsAvailable Then
Me.LabelConnecter.Text = "Oui"
Else
Me.LabelConnecter.Text = "Non"
End If

Imports System.Net

Dim varHostEntry As IPHostEntry
varHostEntry =
Dns.GetHostByName(System.Net.Dns.GetHostName.ToString)
Dim varAnAddress As System.Net.IPAddress
For Each varAnAddress In varHostEntry.AddressList
Me.LabelAdrIP.Text = varAnAddress.ToString
Next


Me.LabelNomUtilisateur.Text = Environment.UserName

Cordialement
Jo

Merci :o) Cordialement ;o)-Logiciels, romans, contacts : http://irolog.free.

Merci :o)  Cordialement ;o)
-
Logiciels, romans, contacts : http://irolog.free.fr
_______________________
.
.

Bonjour Jo,Merci, ?

Bonjour Jo,

Merci, ?a avance, y a qu'un truc qui ne marche pas, j'ai fait :

Imports System.Net

Public Class Form1

' - SSID nom r,seau wifi + ' - Vitesse de d,bit

Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles MyBase.Load

Dim t(9) As String

Dim varHostEntry As IPHostEntry varHostEntry =
Dns.GetHostByName(System.Net.Dns.GetHostName.ToString)

Dim varAnAddress As System.Net.IPAddress

For Each varAnAddress In varHostEntry.AddressList

t(6) = varAnAddress.ToString & vbCrLf

Next


Ces deux lignes l? ne fonctionnent pas :

Dim varHostEntry As IPHostEntry varHostEntry =
Dns.GetHostByName(System.Net.Dns.GetHostName.ToString)
Dim varAnAddress As System.Net.IPAddress


Premier plantage sur :
varHostEntry = Dns.GetHostByName(System.Net.Dns.GetHostName.ToString)

Qui dit :  Fin d'instruction attendue

Second plantage sur :

varHostEntry.AddressList

Qui dit le nom " varHostEntry.AddressList" n'est pas d?clar?

-------------------------

Reste aussi deux questions :
- Vitesse de transfert
- SSID nom r,seau wifi

---------- Voici tout le code --------------

' cle3Gusb form1

Option Explicit On

Imports System.Net.NetworkInformation

Imports System.Net

Imports System.Math



Public Class Form1

' IL ME MANQUE 5 ELEMENTS

' - adresse IP local PC

' - nom utilisteur PC

' - SSID nom r,seau wifi

' - Vitesse de d,bit

Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles MyBase.Load

Dim Statistics As IPv4InterfaceStatistics

Dim t(9) As String

Dim p(9)

Dim varHostEntry As IPHostEntry varHostEntry =
Dns.GetHostByName(System.Net.Dns.GetHostName.ToString)

Dim varAnAddress As System.Net.IPAddress

For Each varAnAddress In varHostEntry.AddressList

t(6) = varAnAddress.ToString & vbCrLf

Next

'

For Each NetInterface As NetworkInterface In

Bonsoir LE TROLLpeut etre le copier coller s'?

Bonsoir LE TROLL

peut etre le copier coller s'?crit  sur 2 lignes d'ou l'erreur fin
d'instruction et suis le non d?clar?
Dim varHostEntry As IPHostEntry ' Fournit une classe conteneur pour les
informations sur l'adresse de l'h?te Internet
varHostEntry =  Dns.GetHostByName(System.Net.Dns.GetHostName.ToString)


voir:
http://msdn.microsoft.com/fr-fr/library/system.net.iphostentry_members.aspx

???

pour le wifi il y a un exemple
http://www.vbfrance.com/codes/WIFI-MANAGE-WLANAPI-VB-NET_48758.aspx

Cordialement
Jo

Bonjour,Merci toujours...L'instruction :varHostEntry = Dns.

Bonjour,

Merci toujours...

L'instruction :
varHostEntry = Dns.GetHostByName(System.Net.Dns.GetHostName.ToString)

A :
Dns.GetHostByName



Est dite obsol?te.... et demande d'utiliser "goEntry"

Mais quan j'utilise "GoEntry"
Il me donne un tas de valeurs hexa, sans que j'y retrouve mon ip :
varHostEntry = Dns.GetHostEntry(System.Net.Dns.GetHostName.ToString)


???

Cordialement ;o)
-
Logiciels, romans, contacts : http://irolog.free.fr
_______________________
.
.

Bonjour LE TROLLJe sais il dit obsol?te mais fonctionnant tr?

Bonjour LE TROLL

Je sais il dit obsol?te mais fonctionnant tr?s bien je ne me suis pas plus
pencher la dessus

Cordialement
Jo

discussion : 3B3B258A-81B3-4509-9843-B34DD9DD58FA@microsoft.com...