1. Ce site utilise des cookies. En continuant à utiliser ce site, vous acceptez l'utilisation des cookies. En savoir plus.
  2. Rejeter la notice

Tutoriel [VB.NET] Contrôlé Skype à partir d'une application VB.NET

Discussion dans 'Windows' créé par Westiix, 22 Février 2013.

Statut de la discussion:
N'est pas ouverte pour d'autres réponses.
  1. Westiix

    Westiix Joueurs Call Of Duty // Développeur WEB débutant Premium

    Inscrit:
    5 Octobre 2011
    Messages:
    2 092
    Appréciations:
    674
    Points:
    4 793
    Pour commencer, on importe la DLL SKYPE4COMLib dans le projet :
    - Menu => Projet> Ajouter une référence ... => Select COM => Défilement => Skype4COM Type Library 1.0>

    Ensuite on double clique sur la form1 et on importe la DLL SKYPE4COMLib dans la form1 (Donc le code sera avant le " Public Class " ) :
    Code:
    Imports SKYPE4COMLib
    Ensuite, on va déclaré 4 choses indispensable dans le " Public Class " (je sais pas trop comment sa s'appelle) :
    Code:
    Public WithEvents skype As New SKYPE4COMLib.Skype
    	Dim Skype1 As New Skype 'On pourra appelé SKPE4COMLib quand on écrira "Skype1. "
    	Public oSkype As Skype
    	Public oCall As SKYPE4COMLib.Call
    Ce qui nous donne comme code :
    Code:
    Imports SKYPE4COMLib 'On importe SKYPE4COMLib
     
    Public Class Form1
      Public WithEvents skype As New SKYPE4COMLib.Skype
    	Dim Skype1 As New Skype 'On pourra appelé SKPE4COMLib quand on écrira "Skype1. "
    	Public oSkype As Skype
    	Public oCall As SKYPE4COMLib.Call
    
    Quelques instructions pour commmandé Skype :

    Pour envoyé un message à un utilisateur :
    Code:
    Skype.SendMessage(pseudo.Text, message.text)
    Changer son statut personnel :
    Code:
    Skype.CurrentUserProfile.MoodText = statut.text
    Appelé un utilisateur :
    Code:
    '**********APPELLER**************
    Skype.PlaceCall(pseudo.text)
    R'accroché :
    Code:
    '**********R'ACCROCHER**************
    oSkype = CreateObject("Skype4COM.Skype")
    		oCall.Finish() 'Termine l'appelle
    Envoyé un message à toute la liste d'amis :
    Code:
    For Each a As SKYPE4COMLib.User In skype.Friends
    			skype.SendMessage(a.Handle, messagelstamis.Text)
    		Next
    Voila la vidéo avec un bonus en description >

    Bonjour visiteur, merci de vous inscrire ou de vous connecter pour voir les liens. C'est gratuit en 3 secondes !

    Screen d'un de mes tools (perso)pour Skype :
    [​IMG]
     


  2. Wolf

    Wolf Banni Ancien staff

    Inscrit:
    9 Février 2013
    Messages:
    34 206
    Appréciations:
    19 814
    Points:
    18 780
    Merci je vais test :)
     
  3. ▲ HDN ▲

    ▲ HDN ▲ Graphiste / Codeur Premium

    Inscrit:
    6 Février 2013
    Messages:
    1 141
    Appréciations:
    305
    Points:
    4 483
  4. ROSKO13

    ROSKO13 andro|origin Premium

    Inscrit:
    11 Février 2012
    Messages:
    1 822
    Appréciations:
    552
    Points:
    4 641
    compliqué mais , a test :ok:
     
  5. GaaRaa

    GaaRaa Membre Premium Premium

    Inscrit:
    15 Novembre 2011
    Messages:
    3 670
    Appréciations:
    897
    Points:
    5 038
    Je n'est pas trop bien compris le truc en faite.. x) Tu pourrais faire des screenshots voir s'il te plaît ? :$
     
  6. Westiix

    Westiix Joueurs Call Of Duty // Développeur WEB débutant Premium

    Inscrit:
    5 Octobre 2011
    Messages:
    2 092
    Appréciations:
    674
    Points:
    4 793
    Tu voudrais un screenshot qui montre quoi ? :)
     
  7. GaaRaa

    GaaRaa Membre Premium Premium

    Inscrit:
    15 Novembre 2011
    Messages:
    3 670
    Appréciations:
    897
    Points:
    5 038
    Ah non, j'ai compris.. je me suis relut .. je m'en excuse.. je sais pas comment le dire .. m'expliqué .. mais je vois.. désolé.. si non, merci à toi ! x))
     
  8. Wolf

    Wolf Banni Ancien staff

    Inscrit:
    9 Février 2013
    Messages:
    34 206
    Appréciations:
    19 814
    Points:
    18 780
    Jarrive pas lool pas grave
     
  9. Westiix

    Westiix Joueurs Call Of Duty // Développeur WEB débutant Premium

    Inscrit:
    5 Octobre 2011
    Messages:
    2 092
    Appréciations:
    674
    Points:
    4 793
    Je vais essayer de faire une vidéo aujourd'hui si j'ai le temps (pas très explicatif parce que j'ai pas de micro mais j'essaierai de détaillé) .
     
  10. Wolf

    Wolf Banni Ancien staff

    Inscrit:
    9 Février 2013
    Messages:
    34 206
    Appréciations:
    19 814
    Points:
    18 780
    Ok merci Dark'z
     
Statut de la discussion:
N'est pas ouverte pour d'autres réponses.

Partager cette page

Publicité