Bonjour.
Voici un code que j'ai eu sur le net pour envoyer des sms d'un pc.
Je ne l'ai pas encore testé parce que je n'ai pas "api_id". Où je peux l'avoir ou s'il est déjà connu, quelqu'un peut il me donner la valeur?
Je voudrais aussi comment la valeur de "user-agent" a été choisie et si on peut la changer à n'importe quel moment?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Imports System.Net
Imports System.IO
 
Public Class Form1
    Dim client As New System.Net.WebClient
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Try
            ' Add a user agent header in case the requested URI contains a query. 
            client.Headers.Add("user-agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2; .NET CLR 1.0.3705)")
            client.QueryString.Add("user", "xxxx")
            client.QueryString.Add("password", "xxxxx")
            client.QueryString.Add("api_id", "xxxx")
            client.QueryString.Add("to", "xxxxxxxxxxxx")
            client.QueryString.Add("text", "This is an example message")
            Dim baseurl As String = "http://api.clickatell.com/http/sendmsg"
            Dim data As Stream = client.OpenRead(baseurl)
            Dim reader As StreamReader = New StreamReader(data)
            Dim s As String = reader.ReadToEnd()
            data.Close()
            reader.Close()
        Catch ex As Exception
            MsgBox("Probleme de connection")
        End Try
    End Sub
End Class
Merci de m'aider