كيف تتحكم بجهازك ن طريق الكلام !!! بالفايجوال بيزك

[(li) صقر (li)]

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

السلام عليكم ورحمة الله وبركاته أحبتي في الله ... وبعد

أثناء تجوالي في مواقع البرمجة وجدت هذا الدرس في أحد المنتديات ( أنا مش مشترك فيه والله , هو برامج نت وبس ) فقمت بنسخ الدرس ولصقه هنا .
وللعلم ( لا يلدغ المؤمن من جحر مرتين , كما حدث في موضوع دروس الهتمل )
فالموضوع

منقول

وها هو الدرس :

اولا: يجب ان تثبت في كمبيوترك برنامج Speech Recognition وهو موجود في موقع مايكروسوفت

ثانيا: يجب ان تثبت في كمبيوترك برنامج Microsoft Agent Server

ثالثا: تتبع الخطوات الموجودة في الصورة التالية:-

http://www.arabteam2000.com/picload/pics/14_08_05_07_30_19_1124073019speechcontrol.jpg (http://www.arabteam2000.com/)

رابعأ: إضغط على الفورم مرتين وضع هذا الكود



Private Sub Form_Load()
reco.GrammarFromFile App.Path & "\Words.txt"
reco.Activate

Agent.Characters.Load "Genie", "Genie.acs"
Set Bot = Agent.Characters("Genie")
Bot.Show

Bot.MoveTo 345, 210

Bot.Speak "Hi"
Bot.Speak "How are you?"

End Sub

Private Sub reco_PhraseFinish(ByVal flags As Long, ByVal beginhi As Long, ByVal beginlo As Long, ByVal endhi As Long, ByVal endlo As Long, ByVal Phrase As String, ByVal parsed As String, ByVal results As Long)

Select Case Phrase


Case "Notepad"
Shell "C:\Windows\NOTEPAD.exe", vbNormalFocus

Case "Microsoft Paint"
Shell "C:\Program Files\Accessories\MSPAINT.EXE", vbNormalFocus

Case "Close"
End


End Select
End Sub




خامسا: إنشئ ملف text وسمي هذا الملف باسم Words وضع فيه هذه البيانات


CODE

[Grammer]
type=cfg
[<start>]
<start>=Notepad
<start>=Microsoft Paint
<start>=Close



سادسا: ضع ملف Words في نفس المشروع

وهذه ملحوظة مهمة :
شغل البرنامج وتتكلم

في المثال انا وضعت ثلاث كلمات

1- كلمةNotepad لفتح برنامج Notepad
2-كلمة Microsoft Paint لفتح برنامج Microsoft Paint
3- كلمة Close لإغلاق البرنامج

هذه الصورة توضح ذلك

http://www.arabteam2000.com/picload/pics/20_08_05_02_57_47_1124531867speechcontrol_.jpg (http://www.arabteam2000.com/)






وهذه هي البرامج المطلوبة :
Speech Recognition :

------------------------------------

SAPI SDK 4.exe
من هنا (http://download.microsoft.com/download/speechSDK/Install/4.0a/WIN98/EN-US/SAPI4SDK.exe)

------------------------------------

SAPI SDK 4 Suite.exe
من هنا (http://download.microsoft.com/download/speechSDK/Install/4.0a/WIN98/EN-US/SAPI4SDKSUITE.exe)

------------------------------------

spchapi.EXE
من هنا (http://download.microsoft.com/download/speechSDK/Install/4.0a/WIN98/EN-US/spchapi.EXE)

************

Microsoft Agent Server :
Download the Microsoft Agent SDK ********ation in compiled help (.chm) format (708 kB .zip archive)
من هنا (http://download.microsoft.com/download/2/1/8/2183fc41-9313-4624-9e9e-25d26d0f7e19/docs.zip)

------------------------------------

Download the Microsoft Agent Character Editor (1 MB exe)
من هنا (http://download.microsoft.com/download/d/f/a/dfa1b90c-f879-4b80-a31d-06924121d9c6/ace.exe)

------------------------------------

Download the Microsoft Agent Linguistic Information Sound Editing Tool (6.2 MB exe)
من هنا (http://download.microsoft.com/download/0/5/f/05f09d93-9cf7-4a5d-9f6c-15fa88c3d2a7/liset.exe)





وكل عام وانتم بخير

وشكراً لكم

والسلام...

[(li) صقر (li)]

أرجو أن ينال إعجابكم

[veto_44]

بارك الله فيك اخي العزيز علاء دائما تاتين بكل ما هو جديد ومميز
اشكرك على الشرح الرائع وعلى النقل المبارك دمت برعاية الله .

[الفرعون المحترف]

مشكور اخي الحبيب
شكرا لك وفيت والله شرح رائع
شكرا لك

[ahmed ksnv]

مشكور أخي الصقر

[feky1]

الفين شكر واحترام لــــ ياصقر ـــــــــك

[(li) صقر (li)]

فيكم الخير يا رجالا .
مشكووووورييين على الردود الرائعة

[mma1979]

لا بصراحة اخ صقر انت متميز حتى في النقل بتاعك
جزاك الله كل خير

[(li) صقر (li)]

جزاكم الله كل خير يا إخواني الأعزاء

[مشاعر إنسانه]

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

[doctor1]

بارك الله فيك اخي العزيز
واصل وفقك الله.

[أمير القدس]

مشكووووووووووووووووووووووووور

[hamata00]

بارك الله فيك اخي صقر

[zakimoulayabdellah]

بارك الله فيك اخي صقر

[(li) صقر (li)]

شكراً على الردود يا جماعة الخير

[(li) صقر (li)]

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

يعني مثلاً لو انت قلت في المايك تبع الجاهز "Open Notebad" يفتح برنامج "Notebad"وهكذا
وكل عام وانت بخير
وكل المسلمين وأعضاء البرمجة كمان بخير

[hayalll]

السلام عليكم اخ صقر ...

معلش كنت عاوز استفسر عن حاجه ...

ازاى اثيت البرنامجين اللى انت قولت عليهم وهما

اولا: يجب ان تثبت في كمبيوترك برنامج Speech Recognition


ثانيا: يجب ان تثبت في كمبيوترك برنامج Microsoft Agent Server


ويا ريت تدينى لينك تنزيل البرامج دى ....

انا قليل لما بدخل على هذا المووقع ....

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

no_problem86@hotmail.com

انا اسف على ازعاجك بس اتمنى اان تهتم بالامر

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

[shush]

شكرا اخي الكريم وبارك الله فيك
كيف بدنا ننفذ دوال احنا كاتبينها باوامر صوتيه ؟

[(li) صقر (li)]

شكراً على الردود وجاري وضع اللينكات

[MR_MIDO_LONELY]

مشكور أخى العزيز على الموضوع الراءع

[MMAbsy]

شكرا لكن عند تنفيذ البرنامج تظهر رسالة خطأ
Run-time error"424"
Object required
فماذا تعني هذه الرسالة وهي خاصة بهذا الكود غلما بأن الملف Wordsموجود في نفس الفولدر reco.GrammarFromFile App.Path & "\Words.txt"

[infoyassmedianet]

عفوا اخي يعطيني رسالة خظا وقمت باعادة تسمية Speech Recognition
بي reco ومزالت نفس الرسالة ساعدني ارجوك احتاج هدا الكود وصور فيها المعنى احقيقي للخظاhttp://img243.imageshack.us/img243/737/msgerroryx1.jpg

[fatima_ak]

جزاك الله كل الخير فكرة رائعة ونقل ميمون :)

[(li) صقر (li)]

الطريقة شغالة إخواني الأعزاء وأرجو إرفاق صور حتى أفهم المشكلة أكثر
وشكراً لكم على الردود

[youcefbmi]

مشكور أخي الصقر

[رضا محمد على]

عندى نفس المشكلة يا اخى
شكرا لكن عند تنفيذ البرنامج تظهر رسالة خطأ
Run-time error"424"
Object required
فماذا تعني هذه الرسالة وهي خاصة بهذا الكود غلما بأن الملف Wordsموجود في نفس الفولدر reco.GrammarFromFile App.Path & "\Words.txt"

[سيد جمجمة]

مشكوووووووووووووووووووووور أخي العزيـــــــ(الصقر)ــــــــــز

[سيد جمجمة]

نتمنى المزيد منك

[shush]

ننتظر الروابط يا اخي
بارك الله فيك

[احمد بدوى]

مشكووووووووور

[3dll_man]

مشكورررررررر

[master22]

السلام عليكم
الظاهر اني جيت متاخر شوي بس ما عليه استحملوني
اولا الف شكرا لك اخوي على هذا الدرس الاكثر من رائع
ثانيا الصور ما تظهر عندي
ياريت تعيد الشرح شوي عشاني
و الف شكر لك مقدما

[ahmedfayez]

موضوع رائع شكرا صقر الف شكر

[DRPC]

http://www.servamega.com/img/b176578bb674dde9ec2811ea4e976a73/w6w20050420032528a85d7452%5B1%5D.gif

[(li) صقر (li)]

شكراً لكم إخواني على الردود

[ahmedsalemxp]

مشكوووووووووووووووووووووووووور جدا

[nikolas]

مشكوررررررررررررر اخي

[saifmoh]

http://www.w6w.net/album/35/w6w2005042015240916d134c1.gifhttp://www.w6w.net/album/35/w6w2005042015240916d134c1.gif

[(li) صقر (li)]

شكراً إخواني على الردود الرائعة
وبالنسبة لمشاكل الصور فاتبع الآتي أخي العزيز :

من قائمة أدوات في شريط قوائم الإكسبلورير اختر "خيارات انترنت"
ثم اختر القائمة المنسدلة "خيارات متقدمة"
ثم عدل خصائص الصور

[llldevilll]

مشكورررررر اخى

[mohammad652]

مشكوووووووووووووووووووووور

[dark_monster]

شكرآ علي الشرح الرائع

[(li) صقر (li)]

شكراً على الرد الأكثر من رائع

[ملك الوحــــــــــوش]

جزاك الله عنا ألف خير أخوي على ها المجهود الكبير الي بذلته
والله ايزيدك من علمه

[mass555]

thankssssssssssssssssssssssssssssssssssssss

[الداعية الوسـطي]

مشكور و فقنا الله و إياك

[(li) صقر (li)]

آمين إخواني الأعزاء وشكراً لكم على تفاعلكم

[abdelrazak]

شكرا اخي على الموضوع الجميل لكن هل يمكن ان تضع لينك لبرنامجSpeech Recognition لانني فتشت عليه في موقع ميكروسوفت لكن لم استطع ايجاده وشكرا

[محمد الكميائى]

الف الف شكر ياغالى

[الزعيم مميز]

مششششششششششششششششكور

[(li) صقر (li)]

تم وضع روابط لجميع البرامج اللي أنا شرحتها أخي العزيز

وشكراً إخواني الأأعزاء على هذه الردود الجميلة

[imar]

شكرا جزيلا با اخي صقر

[albasha_bashar]

مشكور على هذه المشاركة

[electroweb]

Merci Bien.

[eagle2010]

بأمانة موضوع مفيد وألف شكر يا باشا ومستنين المزيد
والله من اكتر المواضيع اللى استفدت منها
بس لسه حجربها

[haydar2002]

مشكور أخي الصقر

[milo.mohamed]

بارك الله فيك اخي العزيز علاء

[youssef100]

collllllllllllllll

[ahmedmorocco]

شكرا اخى الكريم
الله يعطيك العافية

[garabe]

مشكور ياغالي
منتظرين كل جديدك
تقبل تحياتي

[thedove75]

مشكور على البرنامج

[القرصان المبتدى]

يعطيك الف الف الف عافية
على الموضوع المتميز
و فى انتضار المزيد
:smailes60:
:smailes60: :smailes60:
:smailes60: :smailes60: :smailes60:
:smailes60: :smailes60: :smailes60: :smailes60:

[al_gharem3000]

العلم نور والجهل ضلام قرة عين منتدى برامج نت واعضائه بك يا اخي العزيز والله انك ماهر بعلمك واسلوبك ............. رعاك الله ..وامدك بالعلم والمعرفة ............ اخوك al_gharem3000

[mxxxm_0x0]

`·.¸¸.·¯`··._.· (السلام عليكم ورحمة الله وبركاته) `·.¸¸.·¯`··._.·

~*¤ô§ô¤*~الــــــف شكر لـك على الموضوع الرائع~*¤ô§ô¤*~ :smailes21: :smailes60:

¨°o.O (مزيد من التقدم) O.o°¨ :smailes95: :smailes80:

{}{}{}{}{دمــــت في خــــــــير}{}{}{}{}
:smailes9:

•·.·°¯`·.·• (و جزاااك الله كل خــــــــــيــــــــر) •·.·°¯`·.·•

[LiOn_HEArT]

مشكـــــــــــــور
http://img341.imageshack.us/img341/3247/3ed0c4e9ebds1ff6pw2.gif (http://imageshack.us)

[xtobi]

السلام عليكم
شكرا على كل شيء والدرس الرائع
بس صارت معي مشكله بسيطه
بعد ما نفذت كل شيء صحيح ظهرتلي هذي :smailes88: شوف الصوره

http://www.graaam.com/up/p6ic/e5332d9849.jpg

أنا أظنه يقصد أن الملف Words.txt مش موجود بس انا عملته وصحيح طبعا وفي قرص E يمكن لم يتعرف عليه بس ما عرفت كيف أحددله المكان عشان يعرف البرنامج مساره بالضبط فأرجوا التوضيح ... :smailes41:

بإنتظار ردودكم

:smailes32:

[ashrafweb]

ممتاااااااااز

[brave heart1983]

مشكور اخى و الله يعطيك العافيه

[حمدىمحمد]

مشكور اخــــــــــى

[MastaMinds]

That is good man

[mdjamal]

الله يعطيك العافيه اخوي و جزاكم الله كل خي

[mena619]

اشكرك بجد افتنا كلنا يارب يذيد اعمالك

[ميدو_هاكرز]

جزاك الله خيرا على المعلومات الرائعه

[ملك القلوب الحزينة]

الشكر الجزيل لك وحياك الله

[g4ea]

شكرا بس انا ماحب هالسوالف

[dastounizer]

achkourr
I FOUND THE SAME HERE :D
http://www.startimes2.com/f.aspx?t=3265282

[إسلام مقدادي]

بارك الله بك

[Aboud Aboud]

بارك الله بك اخي

[wegdee07]

شــــــــــــــــــــــــــــــــــتكر

[qqwwqw2]

مشكور على الجهد

[khaled_s3lim]

والله انت مبدع يا أخي وصريح جداَ

[bo7seen]

مشكور صقر كفيت و وفيت

[swl kml th]

دى تريقة عمل فيرس

[aloshe]

مشكور جزاك الله خيرا

[HGAHUV]

نعم يجب من كل عضو ان يكون فعال ومفيد للمنتدى
يعطيك الف عافية

[mksa-egypt]

الف شكر جزاك اللة خيرا

[mass555]

thankssssssssssssssssss

[m.boudra]

مشكور أخوي على الموضوع

[taibouch16]

جزاك الله خيرا لقد أفدتنا ... أخوك محمد من المغرب

[muhammed_snake2000]

مشكور على هذا الموضوع الرائع

[jaouad_arabi]

جزاك الله خيرا، مواضيعك و الله شيقة و كثير مبتكرة