Discussion :

[hacker59]

bonjour, j'ai créer un programme pour envoyer des mail et SMS mais voila je voudrais envoyer des SMS en connectant sur mon compte mail.
voici en image:


voici une partie mes codes:

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
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Try
            Dim smtpServer As New SmtpClient()
            Dim mail As New MailMessage
            smtpServer.Credentials = New Net.NetworkCredential(TextBox1.Text & ComboBox1.SelectedItem, TextBox2.Text)
            smtpServer.Port = 587
            smtpServer.Host = ComboBox2.SelectedItem
            smtpServer.EnableSsl = True
            mail.From = New MailAddress(TextBox1.Text & ComboBox1.SelectedItem)
            If RadioButton1.Checked = True Then
                mail.To.Add("33" & TextBox3.Text & "sms@gmailsms.com")
            ElseIf RadioButton2.Checked = True Then
                mail.To.Add(TextBox3.Text)
            End If
            mail.Subject = TextBox4.Text
            mail.Body = TextBox5.Text()
            smtpServer.Send(mail)
            MsgBox("mail a etait envoyer", MsgBoxStyle.OkOnly, "ENVOYER")
        Catch ex As Exception
            MsgBox("Message n'a pas été envoyer" & Err.Description, MsgBoxStyle.OkOnly, "ERREUR")
        End Try
    End Sub

merci,cordialement

[ram-0000]

Et ?
Quel est le problème ?

[hacker59]

le probleme c'est pour envoyer un SMS sur mon mobile en connectant sur mon compte GMAIL.

comment on écrire le code par rapport au site GMAIL avec mon programme : https://gmailsms-com.appspot.com/send

merci,cordialement.

[prologic]

le probleme c'est pour envoyer un SMS sur mon mobile en connectant sur mon compte GMAIL.

comment on écrire le code par rapport au site GMAIL avec mon programme : https://gmailsms-com.appspot.com/send

merci,cordialement.

Je ferais pas confiance à ce site... un truc Gmail sans logo google et avec ce design ?

Sinon > http://support.google.com/chat/bin/a...&answer=106015

[hacker59]

bonjour, j'ai trouver un site qui envois des texto gratuit : http://www.texto-sms-gratuit.com/

voici mes codes:

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
If RadioButton1.Checked = True Then
            Dim request As HttpWebRequest
            Dim response As HttpWebResponse = Nothing
            Dim url As String
            Dim Email As String = TextBox1.Text & ComboBox1.SelectedItem
            Dim host As String = "http://www.texto-sms-gratuit.com/"
            Dim originator As String = TextBox3.Text
            Try
 
                url = host + "/api?action=sendmessage&" _
                         & TextBox1.Text & ComboBox1.SelectedItem & WebUtility.HtmlEncode(Email) _
                         & "&recipient=" + WebUtility.HtmlEncode(TextBox3.Text) _
                         & "&messagetype=SMS:TEXT" _
                         & "&messagedata=" + WebUtility.HtmlEncode(TextBox5.Text) _
                         & "&originator=" + WebUtility.HtmlEncode(TextBox3.Text) _
                         & "&serviceprovider=" _
                         & "&responseformat=html"
 
                request = DirectCast(WebRequest.Create(url), HttpWebRequest)
                response = DirectCast(request.GetResponse(), HttpWebResponse)
                MsgBox("Votre SMS a etait envoyer", MsgBoxStyle.OkOnly, "ENVOYER")
            Catch ex As Exception
                MsgBox("Votre SMS n'a pas été envoyer" & Err.Description, MsgBoxStyle.OkOnly, "ERREUR")
            End Try
        End If

Mais voila il m'afficher msgbox (votre sms n'a pas ete envoyer, car le serveur distant a retourné une erreur : (404) introuvable)
pourais ton corriger mon probleme?
merci,cordialement

[ram-0000]

Où est ce que tu as vu que l'url à utiliser pour envoyer un SMS est :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

http://www.texto-sms-gratuit.com/api?action=sendmessage...

Moi je n'ai rien vu de tel dans la FAQ ni sur le site