Bonjour
Comment obtenir une voix francaise avec "SAPI.Spvoice"?
Bonjour
Comment obtenir une voix francaise avec "SAPI.Spvoice"?
Je crois qu'il faut installer Text-to-Speech en français, vous devez télécharger et exécuter "lhttsfrf.exe" et "agtx040C.exe" dans ce
Lien
Voila un exemple de script :
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39 'Exemple : narrateur en français 'Fichier VBs : ' ' Saisie d'une variable ' Var = testX() ' ' Ouverture du narrateur ' Set oSound = CreateObject("sapi.SPVoice") ' ' Mise en français de la voix du narrateur après téléchargement de RSSolo4FrenchVirginie.exe (seulement en 32 bits) ' oSound.Voice.Category.Default = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Speech\Voices\Tokens\ScanSoftVirginie_Dri40_16kHz" ' ' Volume : maximum = 100 ' oSound.Volume = 100 ' ' Vitesse ' oSound.Rate = 1 ' ' Lecture des mots en sons ' oSound.speak "Bonjour" & Var ' ' Affichage ' wscript.echo "Tu t'appelles : " & Var ' Set oSound = Nothing ' ' ------------------------------------------------ function testX() ' ------------------------------------------------ ' testX = inputbox("Comment t'appelle-tu ?","Sélection") End Function
J'ai téléchargé les 2 "exe" et je les ai exécutés.
J'ai aussi copié le prog ci-dessus; mais la voix est toujours celle d'origine :
avec un accent anglais.![]()
Télécharge la version complète de Microsoft Agent Scripting Helper Version 7.5 et installez-la
Je viens d'installer l'appli; et j'ai démarré "Mash".
J'ai choisi "french/male", mais quand je fais "test voice" : aucun son n'est émis.![]()
un coup d'oeil ici Faire parler Windows en Français
Je te remercie, cela fonctionne avec l'accent français.
Sympa![]()
Partager