IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB 6 et antérieur Discussion :

Envoi de SMS avec VB6


Sujet :

VB 6 et antérieur

  1. #1
    Candidat au Club
    Inscrit en
    Avril 2008
    Messages
    4
    Détails du profil
    Informations forums :
    Inscription : Avril 2008
    Messages : 4
    Points : 4
    Points
    4
    Par défaut
    Salut les ami(e)s, je voudrai réaliser un démon en VB6 qui se connecte à ma BD et transmet les informations automatiquement à une URL chaque 5 minutes.Sans que l'utilisateur ne se rende compte,que tout se passe en arrière plan.
    J'ai utilisé cette instruction Vb

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
     
    ShellExecute hWnd, "Open", "http://www.monsite.cm/send.php?clientcode=login_du_client&passcode=mot_de_passe_du_client&XMLFlow=Flux", "", App.Path, 1
    cela transmet les infos en ouvra le navigateur à chaque reprise. je voudrai pas que le navigateur s'ouvre.
    Merci d'avance

  2. #2
    Membre actif
    Profil pro
    Inscrit en
    Mars 2007
    Messages
    261
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2007
    Messages : 261
    Points : 216
    Points
    216
    Par défaut
    En gros, si j'ai bien compris tu as besoin d'appeller une URL avec certains paramètres sans passer par le navigateur !

    Essaye d'ajouter le control inet : inet transfer control (microsoft internet transfer controls)

    pour le faire c'est dans le menu projet, composant ...

    ajoute le control sur ton formulaire et

    ensuite fais quelque chose du genre

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    inet1.Execute "http://www.tondomaine/ta_page.asp", "POST", "TEST=TEST"
    ou

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    inet1.Execute "http://www.tondomaine/ta_page.asp", "POST", "TEST=TEST", "Content-Type: application/x-www-form-urlencoded"



    Sinon tu peux essayer ce code si ça peut marcher

    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
     
     
    Utilise l'objet XMLHTTP 
     
    Private Sub Send_HTTP_REquest
         Dim Donnees As String
         Dim objXML As Object
     
     
          'tes paramètres ici
         Donnees = "nom=jean Dupont=Hello World"
         Donnees = replace(Donnees," ", "+")
     
         Set objXML = CreateObject("Microsoft.XMLHTTP")
         objXML.Open("POST", "http://www.tondomaine/ta_page.asp", false)
         objXML.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
         objXML.send Donnees 
    End Sub
    ou lire cet article si ça peut aider

Discussions similaires

  1. application android d'envoi de sms avec smpp
    Par lamydream dans le forum Android
    Réponses: 0
    Dernier message: 20/06/2012, 23h26
  2. envoi de sms avec smpp
    Par lamydream dans le forum Android
    Réponses: 0
    Dernier message: 03/06/2012, 19h17
  3. problème d'envoi des sms avec Linux
    Par ja1985va dans le forum Linux
    Réponses: 20
    Dernier message: 05/08/2011, 15h56
  4. Envoi de mail avec vb6
    Par GodGives dans le forum VB 6 et antérieur
    Réponses: 11
    Dernier message: 30/01/2008, 15h20
  5. [PDA] Envoi de SMS avec OBEX
    Par basnifo dans le forum Périphériques
    Réponses: 1
    Dernier message: 07/06/2006, 10h43

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo