Problème ActiveX SAPI.SpVoice

Salut à Tous ! :P
J'ai un petit problème quand je teste ce script sur Windows XP SP3

Code:

---

1 2	set voix = createobject("SAPI.Spvoice") voix.speak "salut developpez.com !"

---

je crois le problème vient au niveau du système puisque en jetant un coup d'œil sur le panneau de configuration il n' y a pas l'applet Voix "propriétés de la reconnaissance vocale Microsoft SAM".
Donc ce qui explique bien l'absence de l'ActiveX dans ce script.

Code:

---

Erreur Un composant ActiveX ne peut pas créer un objet :'SAPI.Spvoice'

---

Donc ma question : comment résoudre ce problème d'installation d'ActiveX ?
Merci !
Cordialement

salut,
http://www.microsoft.com/downloads/e...displaylang=en
tu risques d'être déçu, il n'y a pas de localisation en français :aie:

Hello, pour une vocalisation en français, il y a la voix de Virginie
http://rapidshare.com/#!download|211...inie.exe|24496

En suivant le lien donné par omen999, j'ai installé sans problème et fait un essai avec la voix sensuelle (et surtout francaise) de Virginie. C'est nickel !

Il faut déclarer Microsoft Speech Object Library dans références.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Option Explicit   Private mV As SpeechLib.SpVoice   Public Function Vocalisation(strText) On Error GoTo Fin Set mV = New SpVoice mV.Speak strText, SVSFIsXML   Fin: Set mV = Nothing End Function

---

Citation:

---

Envoyé par omen999

salut,
http://www.microsoft.com/downloads/e...displaylang=en
tu risques d'être déçu, il n'y a pas de localisation en français :aie:

---

Citation:

---

Envoyé par Fifi69

En suivant le lien donné par omen999, j'ai installé sans problème et fait un essai avec la voix sensuelle (et surtout francaise) de Virginie. C'est nickel !

Il faut déclarer Microsoft Speech Object Library dans références.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Option Explicit   Private mV As SpeechLib.SpVoice   Public Function Vocalisation(strText) On Error GoTo Fin Set mV = New SpVoice mV.Speak strText, SVSFIsXML   Fin: Set mV = Nothing End Function

---

---

Merci Bien ;) le problème est :resolu: :ccool:

Sorry de remonter un sujet relativement vieux et déjà résolu mais comment est-ce qu'on choisit la voix ?

Perso, ça n'utilise que la voix anglaise d'un type qui a l'air peu recommandable. Je voudrais bien entendre virginie ^^

Par VBA , je n'ai pas cherché.
Sous windows il suffit d'aller :panneau de configuration /voix

Panneau de configuration >> Voix >> Virginie

Pour la sélection auto, je ne sais pas...:oops:

[Edit] grillé par Fifi :aie:

Citation:

---

Envoyé par griftou

Sorry de remonter un sujet relativement vieux et déjà résolu mais comment est-ce qu'on choisit la voix ?
Perso, ça n'utilise que la voix anglaise d'un type qui a l'air peu recommandable. Je voudrais bien entendre virginie ^^

---

:salut:
Un coup d'oeil sur cette Discussion puis si tu veux changer la voix par script il suffit de mette ce code pour charger le TextToSpeech en Français de Viriginie :

Code:

---

Merlin.TTSModeID = "{0879A4E0-A92C-11D1-B17B-0020AFED142E}" ' TextToSpeech en Français de Viriginie

---

Ok pour la config dans le control pannel mais je ne me vois pas aller faire ça sur chaque poste où l'application se trouvera ^^.

Pour la réponse de hackoofr, je ne vais pas installer merlin non plus ^^

Sinon, pour le moment, j'ai reussi en ajoutant une ligne à la méthode de Fifi.
Ce qui donne le code ci-dessous.

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Public Sub Vocalisation(ByVal strText As String) On Error GoTo Fin mV = New SpeechLib.SpVoice mV.Voice = mV.GetVoices("gender = female").Item(2)   mV.Speak(strText, SpeechLib.SpeechVoiceSpeakFlags.SVSFIsXML)   Fin: mV = Nothing End Sub

---

Ce n'est probablement valable que tant que je n'ai que les voix actuelles installées. Mais je n'ai pas encore trouver comme faire autrement.
J'ai chopé le fichier d'aide (.chm) de sapi mais quand je l'ouvre, j'ai bien les différents "paragraphe" qui s'affiche mais je n'obtiens aucun contenu....

Etant tombé sur cette discussion via google, je viens seulement de réaliser que je suis dans la partie vbscript XD

En fait je code en vb.net ^^.