كيف تجعل حاسوبك يرحب بك ؟

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

سوف نتعرف على طريقة كيفية جعل حاسوبك يرحب بك

باسمك او اي جملة تريدها عندما تقوم بتشغيله عبر كود صغير فقط

 

اولا

تقوم بفتح المفكرة

notepad 

ثم تضع الكود

 

Dim speaks, speech 

speaks="abdo, Welcome to your Computer"; 

Set speech=CreateObject("sapi.spvoice") 

speech.Speak speaks

 

وتحفظه بيصغة

vbs

يمكنك وضع اي جملة مكان

(abdo, Welcome to your Computer)

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

بعد حفظ الكود بصيغة

 vbs 

تنقل الملف الى المسار التالي 

c:\documents and settings\all users\start menu\programs\startup