IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Sommaire > Réseau
        Comment obtenir les adresses IP d'un ordinateur
        Comment envoyer un mail par SMTP ?
        Comment télécharger et afficher le contenu d'une page web ?
        Comment savoir si mon PC est connecté à internet ?

        


Comment obtenir les adresses IP d'un ordinateur
auteur : abelman
Pour obtenir les adresses IP d'un ordinateur on utilise la fonction Resolve de la Classe System.Net.Dns
Voici une petite fonction qui le fait. Pour avoir les adresses IP de l'ordinateur local il suffit de l'appeler sans paramètre.

Imports System.Net Function GetIPaddresses(Optional ByVal computername As String = "localhost") As String() Dim saddr() As String Dim addr() As IPAddress = Dns.Resolve(computername).AddressList() Dim i As Integer If addr.Length > 0 Then saddr = New String(addr.Length - 1) {} For i = 0 To addr.Length - 1 saddr(i) = addr(i).ToString Next End If Return saddr End Function
lien :  System.Net.Dns

Comment envoyer un mail par SMTP ?
auteur : abelman
Il faut ajouter à son projet la référence System.Web.Mail (qui aurait dû s'appeler System.Net.Mail à mon avis).
Ensuite ça se fait tout seul. Exemple:

Shared Sub Main(ByVal args As String()) Dim msg As MailMessage = New MailMessage msg.From = "expediteur@free.f" msg.To = "atoi@free.fr;alui@free.fr" msg.Cc = "encoreatoi@free.fr" msg.Body = "Bonjour" & Convert.ToChar(10) & "" + "Ceci est le contenu du mail" & Convert.ToChar(10) & "" + "A bientôt" msg.Attachments.Add(New MailAttachment("c:\fichierjoint.txt", MailEncoding.UUEncode)) SmtpMail.SmtpServer = "smtp.nerim.fr" SmtpMail.Send(msg) End Sub
J'attire votre attention sur un point : Les exceptions levées par la fonction SmtpMail.Send en cas d'échec, ne sont pas toujours très explicites!!
N'hésiter pas à consulter MSDN sur la classe System.Web.Mail.MailMessage. Elle dispose de nombreuses autres propriétés.
Il y a aussi l'excellent  article de Webman

lien :  System.Web.Mail

Comment télécharger et afficher le contenu d'une page web ?
auteur : abelman
On utilise les classes HttpWebRequest, HttpWebResponse qui encapsulent la communication socket du protocole HTTP. On utilise ensuite la classe StreamReader pour lire le flux de la réponse

Namespaces à utiliser

Imports System.Net Imports System.IO
Le code suivant utilise une Form avec un contrôle TexBox nommé textBox1, un contrôle RichTextBox nommé richTextBox1 et un contrôle Button nommé button1.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _ Handles Button1.Click Dim HttpWResponse As HttpWebResponse = Nothing Dim sr As StreamReader = Nothing Try Dim HttpWRequest As HttpWebRequest = CType(WebRequest.Create(textBox1.Text), HttpWebRequest) HttpWResponse = CType(HttpWRequest.GetResponse, HttpWebResponse) sr = New StreamReader(HttpWResponse.GetResponseStream) richTextBox1.Text = sr.ReadToEnd Catch ex As Exception MessageBox.Show(ex.Message) Finally If Not (HttpWResponse Is Nothing) Then HttpWResponse.Close End If If Not (sr Is Nothing) Then sr.Close End If End Try End Sub
lien :  HttpWebRequest
lien :  HttpWebResponse
lien :  StreamReader

Comment savoir si mon PC est connecté à internet ?
auteur : abelman
On se sert de la fonction InternetGetConnectedState de la dll win32 wininet.dll

using System.Runtime.InteropServices; ' Déclaration de l'API Private Declare Function InternetGetConnectedState Lib "wininet.dll" ( _ ByRef lpdwFlags As Integer, _ ByVal dwReserved As Integer) As Boolean ' Utilisation de l'API public Function IsConnected() as Boolean { Dim Desc As Integer return InternetGetConnectedState(Desc, 0) }
lien :  A propos de WinInet
lien :  InternetGetConnectedState

        

Consultez les autres F.A.Q's

Les sources présentées sur cette page sont libres de droits et vous pouvez les utiliser à votre convenance. Par contre, la page de présentation constitue une œuvre intellectuelle protégée par les droits d'auteur. Copyright © 2005 Abel Mandengue Developpez LLC. Tous droits réservés Developpez LLC. Aucune reproduction, même partielle, ne peut être faite de ce site ni de l'ensemble de son contenu : textes, documents et images sans l'autorisation expresse de Developpez LLC. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.