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?
Merci de m'aider
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
Partager