AccueilCodesTutorielsForumsEmploiLivresConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2008 12 03 09:48:52
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

ETAT VOLUME WINDOWS - MODIFIER LE VOLUME, LE MUTE, ET OBTENIR DES INFORMATIONS SUR LA CARTE SON [MODULE DE CLASSE]


Information sur la source

Catégorie :Modules Classé sous : mixerGetLineControls, mixerSetControlDetails, volume, class, afck Niveau : Débutant Date de création : 27/08/2008 Date de mise à jour : 27/08/2008 02:02:47 Vu / téléchargé: 2 452 / 228
Auteur : PCPT Ecrire un message privé
Ce membre participe au partage de revenus publicitaires
Note :
10 / 10 - par 4 personnes
10,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Commentaire sur cette source (13)
Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale
bonjour, ici une classe toute simple permettant de consulter et modifier le MASTER VOLUME

cette source répond à une demande sur le forum :
http://www.vbfrance.com/infomsg_VERIFIER-SON-TOUCHE_1193189.aspx


cette classe n'a rien de transcendant mais c'est apparemment un sujet difficile à retrouver et ici très facile d'emploi.
de plus vous y trouverez dans la description différents liens utiles

espérant que çà puisse vous servir
 

Source

  • Private Sub Command1_Click()
  • Dim AfVol As New AfCls_MasterVolume
  • With AfVol
  • MsgBox "NOM CARTE = '" & .GetActiveDeviceName & "', Mute coché : " & .Mute
  • AfVol.Percent = 75
  • End With
  • Set AfVol = Nothing
  • End Sub
Private Sub Command1_Click()
    Dim AfVol As New AfCls_MasterVolume
    With AfVol
        MsgBox "NOM CARTE = '" & .GetActiveDeviceName & "', Mute coché : " & .Mute
        AfVol.Percent = 75
    End With
    Set AfVol = Nothing
End Sub

Conclusion

testée sous Windows 2000 SP4
pas de bug connu, ne sera logiquement pas mise à jour
 

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

Historique

27 août 2008 01:54:29 :
zip
27 août 2008 02:02:47 :
un fichier en trop

Commentaires et avis

signaler à un administrateur
Commentaire de MadM@tt le 27/08/2008 02:57:10 10/10

On ne peut plus simple d'utilisation !

signaler à un administrateur
Commentaire de Exploreur le 27/08/2008 19:07:08

Salut,

Cool comme petite source...toujours aussi clair que limpide la lisibilité du code...j'aime toujours autant ^^

Mais...pourquoi cet inversement de sens du volume par rapport à celui de windows ?

@+
Exploreur

signaler à un administrateur
Commentaire de PCPT le 27/08/2008 19:23:46 administrateur CS

merci pour vos comms

si le slider avait été horizontal, quelle aurait été la question? ^^

le slider fourni en exemple part juste de 0 à 100 (du haut vers le bas)
celui dans le systray n'est pas le même, et part du bas vers le haut...

la valeur est bien la même?

çà me rassure sur le code en tout cas, j'avais peur qu'il ne fonctionne pas sous XP :)

signaler à un administrateur
Commentaire de Sechaud le 28/08/2008 14:58:22 10/10

Super ce code, il va me servir dans mon TéléInternet car lorsque j'utilise VLC MédiaPlayer, je n'ai pas de réglage de volume, contrairement au MediaPlayer.
   C'est vrai que moi aussi j'aurais aimé le 0 en bas.
Avec le slider en vertical on a bien le 0 à gauche par contre.
Je n'ai pas trouvé comment inverser si on le met vertical.

signaler à un administrateur
Commentaire de Exploreur le 28/08/2008 15:13:23

Sechaud >> pour vlc tu peux essayer avec les touches :

Ctrl et flèche du haut pour monter ou flèvhe du bas pour descendre le son...à essayer ^^

@+
Exploreur

signaler à un administrateur
Commentaire de PCPT le 28/08/2008 15:54:44 administrateur CS

pour inverser le sens il suffit juste de faire
lors du scroll :
AfVolume.Percent = 100 - Sld_Volume.Value

lors du tick timer :
Sld_Volume.Value = 100 - iVal


mais le tooltip n'afficherait pas la bonne valeur
de toute façon qui utilise ce slider moche à souhait... ^^

(j'commence à me poser des questions sur les sources que je dépose, le code concerne la class, on s'en fiche un peu du slider vb en exemple, non? :) )

signaler à un administrateur
Commentaire de candyraton le 28/08/2008 23:19:11

oui, c pas important;
bonjour,
J'ai cherché ça un jour, j'ai pas trouvé;
Je m'étais satisfait de Shell ("sndvol32 /t")
merci

signaler à un administrateur
Commentaire de Sechaud le 29/08/2008 08:47:44

EXPLORER, merci pour la combinaison des touches.
J'ai essayé, mais chez moi sous XP, cela ne marche pas alors que la class de PCPT permet le contrôle du volume sous VLC.
Merci PCPT pour le zéro en bas, ta solution fonctionne, mais comme tu le dis, le Tooltip est incorrect. On gardera le zéro en haut.L'essentiel c'est de pouvoir régler le volume.

signaler à un administrateur
Commentaire de Exploreur le 29/08/2008 09:32:17 10/10

Re,

Oui me suis trompé, cela fontionne que quand tu visualises avec Vlc ^^

@+
Exploreur

signaler à un administrateur
Commentaire de jmc70 le 01/09/2008 20:50:38 10/10

Bonne source qui me sera utile. Très claire, bien commentée et facilement réutilisable. Merci.

signaler à un administrateur
Commentaire de Sechaud le 02/09/2008 09:43:45

En implantant le contrôle de volume dans mon TéléInternet, j'ai constaté qu'en quittant mon programme
le volume général de Windows se mettait à la valeur du slider, ce qui ne me plaisait pas. Je voulais retrouver le volume présent au lancement de mon programme.
J'ai donc ajouté les lignes suivantes:
Au début de mon source --->
Dim Niv As Integer 'Niveau du volume au lancement
Dans le Load  --->
Niv = AfVolume.Percent
Dans le Unload  --->
AfVolume.Percent = Niv
et là on retrouve le réglage initial du volume de Windows à la sortie.
Voilà, si cela peut servir.

signaler à un administrateur
Commentaire de Souplyne le 10/09/2008 15:00:01

Voila le genre de petite source sympa, pratique et facilement réutilisable.

signaler à un administrateur
Commentaire de Tidauph le 13/10/2008 19:42:05

J'ai essayé de comprendre mais je n'ai pas trouvé la ligne que je cherche (si elle existe). Peut-on récupérer le son de droite et gauche séparément afin d'en faire un vumètre gauche/droite. Je cherche désespérement mais je ne trouve rien..
Merci

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Mixage simple... [ par holger ] Voila j'aurai simplement souhaiter obtenir la liste des contrôles complet que la dll winmm.dll nous apporte.Car j'ai récuperé un code sur le site de m plantage intempestif VB et directx7 [ par ze_bat ] Hello,j'ai développé un petit jeux en directx7 et VB6. J'ai créer une classe missile: qui instancie une frame et un visual dedans (le missile) au clas réglage de volume mp3 [ par Thugs ] je voudrais augmenter ou diminuer independamment le volume de 2 Mp3 lancer en même temps.Est-ce possible? !!! Controler le volume sonore pendant un enregistrement de wave ???? [ par vince ] Salut a tous les developpeurs VB,Je souhaiterais pouvoir piloter sous VB la table de mixage Windows non pas en lecture mais en enregistrement (dans la Web Class [ par CK ] Salut,j'ai du mal à assimiler la notion des web class et leurs manières d'utilisation.si quelqu'un peut me donner quelques explications je le serai re Chargement dynamique [ par couriousous ] Hello!! QQn sait comment charger un controle (Winsock dans mon cas) sans passer par la commande Load(nom(index)) car cela serait pour l'utiliser sur u Débutant cherhce à manipuler TEMPS ET VOLUME SONORE... [ par Sam ] Y-a-t-il une autre façon (si possible plus précise) que les contrôles Timer pour manipuler le temps?D'autre part, j'utilise des fichiers wave (actuell pb requête SQL [ par Evangelion ] J'ai une base de données Access avec une table T_Volume contenant les champs : N°Contrat, Annee, Mois et Volume.ds un formulaire, j'effectue le requêt


Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,468 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.