إجعل حاسوبك يتكلم

[jok17]

بسم الله الرحمان الرحيم
إجعل حاسوبك يتكلم

العملية كالتالي إفتح ملف txt وضع فيه السيكريبت التالي

Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

ثم أحفظه بصيغة .vbs يعني مثلا speack.vbs

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

تحياتي جوك jok 17

[الجليد المشتعل]

مشكور
يعطيك العافية

[jok17]

الله يعافيك

[Iraqe Hacker]

هههه حلو بارك الله فيك

[jok17]

و فيك بارك الله

[Trip-loss]

مكشور جميله تابع اخي ..

[jok17]

مشكوور حبيبي عالمرور

[hackerpk]

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

[jok17]

مشكوور حبيبي

[ahmad kh]

مشكور بارك الله فيك

[haker.abode]

مشكوور

تقبل مروري

[jok17]

و فيك بارك الله

- - - تم التحديث - - -


مشكوور

تقبل مروري

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

[جديدعلى الهكر]

والله جميل ،، بارك الله فيك اخي

[jok17]

مشكوور حبيبي عالمرور

[benisafcom]

مشكور بارك الله فيك

[jok17]

و فيك بارك الله

[عبدالله97]

بارك الله ولكن في المكان الخطأ
تم النقل الى تبادل الخبرات
بالتوفيق

[ahlywad]

شكرا اخى طريقه حلوه

[farissi mohssin]

machkor akhi

[nadir_rida]

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

[Mr.Rami]

شششششششششششششكرا

[aLbRa.7]

ههههههههههههه جميل واصل

[قهر اليهود]

بارك الله فيك

[KAMAKO]

بصراحة حلوة ههه

[jok17]

مشكوورين حبايبي عالمرور