ساخت یک فایل سخنگو
در این تاپیک قصد دارم آموزشی به شما بدهم که بتوانید یک فایل سخنگو بسازید به طوری که وقتی فایل را بازکردید هر چه در آن تایپ کرده اید برای شما می خواند.
این کد بیشتر با Windows 8 و Windows 7 کار می کند.
به start بروید => بر روی Run کلیک کنید => عبارت Notepad را تایپ کنید و Enter بزنید.
بعد از این که برنامه Notepad باز شد کد زیر را درون آن قرار دهید:
کد:
Dim msg, sapi
msg=InputBox("Program Sokhangoo By Mohamad Zangane | Tikbar.ir","Sokhangoo-Tikbar.ir")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
وحال فایل را با پسوند vbs بر روی سیستم خود Save کنید به این گونه :
name.vbs
حال Notepad را ببندید و به مسیری که فایل را Save کرده اید بروید و فایل را اجرا کنید حال در فیلدی که جلوی شما هست حرف ، کلمه و یا جمله خود را بنویسید و Ok کنید و نتیجه را ببینید.
نکات مهم:
-
این فایل تنها عبارات انگلیسی را می خواند.
-
این فایل با Windows 7 و Windows 8 بهتر پشتیبانی می شود.
موفق باشید !
نویسنده : محمد زنگنه یوسف آبادی
