[ تمت الإجابة ]الاكسس الناطق - هل ممكن ان ينطق الاكسس قيمة الفاتورة مثلا ؟

اخي الفاضل

السلام عليكم ورحمة الله وبركاته

نعم بإمكان برنامج الأكسيس ان يحول النصوص الى صوت مسموع ويمكنك ايضا حفظه

قبل ان تقوم بتجربة البرنامج قم بعمل التالي

افتح المسار C:\Program Files\Common Files\Microsoft Shared من جهازك ثم تأكد من المجلد Speech هل هو موجود أم لا

فإن لم يكن موجود فكل ما عليك هو نسخ المجلد المرفق في الملف ووضعه في المسار السابق

وإن كان موجود وبه نقص في الملفات فضع الملفات الناقصة من المجلد المرفق الى ما هو موجود لديك

وبعد ذلك قم بتشغيل قاعدة البيانات

za_TextTospeech2008en.rar

ملاحظة : هذا البرنامج يدعم النص الإنجليزي فقط

ويعمل من خلال محرك الأصوات الخاص بالويندوز

السلام عليكم ورحمة الله وبركاته

شكرا جزيلا

بسم الله الرحمن الرحيم

تمت الإجابة على الموضوع

إدارة الفريق العربي للبرمجة

شكرا لك أخت زهرة ولكن عند الضغط على زر حفظ المفروض أن البرنامج يقوم بحفظ المادة الصوتية في صورة ملف wav في المسار المحدد في الكود

وعند الضغط لا يحفظ وإنما تظهر رسالة الخطأ هذه

فأين الخطأ

أعتقد الصوت الذي سيخرج لرجل فهل يمكن جعله صوت أمرأة

بعد اذن الاستاذة زهره

تفضل اخي mas123 المرفق بعد التعديل

الاخ عبدالعزيز اليوسفي

لقد ذكرت الاخت زهره بان البرنامج يعمل من خلال محرك الاصوات الخاص بالويندوز

اقتباس

ملاحظة : هذا البرنامج يدعم النص الإنجليزي فقط

ويعمل من خلال محرك الأصوات الخاص بالويندوز

وهذا المحرك به صوت رجل تستطيع سماعة من خلال ايقونة الكلام في لوحة التحكم

وساحاول البحث عن ملف اكسس قمت بانزالة منذ فترة يدعم صوت امرأة وتقوم بتحريك الفم ايضا

فان وجدته فسأرفقة لك

za_TextTospeech2008en_UP.rar

شكرا لك أخي enjoy

ولي سؤال ما معنى هذا الجزء من الكود

Name "c:\speek\zahrah.wav" As "c:\speek\zahrah.wav"

@ الأخ ابو عبدالله ( Enjoy )

بارك الله بك على التعديل والإيضاح

@ الأخ محمد صالح

الكود السابق يقوم بوضع او نسخ اسم الملف الى ملف صوتي يتم وضعه في المجلد speek

@ الأخ عبدالعزيز اليوسفي

ستجد الشرح والمثال على هذا الرابط

قراءة النص بصوت امرأه

/index.php?showtopic=149767

za_Smarty_up.rar

شكرا للأخ Enjoy والأخت zahrah على هذا التعب

أنا كنت أقصد المكتبة sapi.dll المرفقة مع الوندوز وليس VText.dll

على كل حال وللأفادة إذا تم أستخدام الأداة VText.dll فما هي الخاصية التي تضبط لتجعل هذه الأداة تنطق بصوت أمرأة:

Dim tts As HTTSLib.TextToSpeech
Set tts = Me.TextToSpeech1.Object
tts.? = ? 
tts.Speak (Me.txtSpeak)

اخي الفاضل عبدالعزيز اليوسفي

هل عمل البرنامج الأخير لديك ام لا

هذا هو كامل الكود في النموذج

Option Compare Database
Dim tts As HTTSLib.TextToSpeech

Private Sub Form_Load()
Set tts = Me.TextToSpeech1.Object
End Sub


Private Sub cmdSpeak_Click()
Dim intEngine As Integer
Dim lngEngine As Long

If Not IsNull(Me.txtSpeak) Then
	tts.Speak (Me.txtSpeak)
Else
   tts.Speak "zah'rah alobdallah."
Me.txtSpeak.SetFocus
End If
End Sub

Private Sub cmdStop_Click()
tts.StopSpeaking
End Sub

وهذا هو عنصر التحكم

هل عمل البرنامج الأخير لديك ام لا

لا لم يعمل ولكن فتح هو وأكواده وأنا لا أريد تشغيله على الأكسس

يمكن إلى الآن لم تصل الفكرة أخت زهرة

فأنا أعرف الدالة TextTospeech وكيفية تطبيقها وليس هذا سؤالي ،فالكود السابق الذي قمت أنت بكتابته لا يوجد به طريقة تغيير الصوت لصوت أمرأة أو رجل

سؤالي الذي كنت أسأله ماهي الخاصية أو التعليمة التي تقوم بتبديل الصوت ذكر أو أنثى

والله المستعان ..