1. Open Notepad.
2. Copy Paste The Below Code in notepad.
Set wshshell = wscript.CreateObject("WScript.Shell")
Wshshell.run "Notepad"
wscript.sleep 400
wshshell.sendkeys "w"
wscript.sleep 100
wshshell.sendkeys "w"
wscript.sleep 120
wshshell.sendkeys "w"
wscript.sleep 200
wshshell.sendkeys "."
wscript.sleep 100
wshshell.sendkeys "B"
wscript.sleep 100
wshshell.sendkeys "e"
wscript.sleep 100
wshshell.sendkeys "i"
wscript.sleep 50
wshshell.sendkeys "n"
wscript.sleep 120
wshshell.sendkeys "g"
wscript.sleep 170
wshshell.sendkeys "T"
wscript.sleep 200
wshshell.sendkeys "e"
wscript.sleep 100
wshshell.sendkeys "c"
wscript.sleep 50
wshshell.sendkeys "h"
wscript.sleep 120
wshshell.sendkeys "."
wscript.sleep 160
wshshell.sendkeys "n"
wscript.sleep 200
wshshell.sendkeys "e"
wscript.sleep 100
wshshell.sendkeys "t"
wscript.sleep 100
wshshell.sendkeys " "
wscript.sleep 100
wshshell.sendkeys "-"
wscript.sleep 100
wshshell.sendkeys " "
wscript.sleep 100
wshshell.sendkeys "E"
wscript.sleep 100
wshshell.sendkeys "n"
wscript.sleep 100
wshshell.sendkeys "j"
wscript.sleep 100
wshshell.sendkeys "o"
wscript.sleep 100
wshshell.sendkeys "y"
wscript.sleep 100
wshshell.sendkeys " "
wscript.sleep 100
wshshell.sendkeys "t"
wscript.sleep 100
wshshell.sendkeys "h"
wscript.sleep 100
wshshell.sendkeys "e"
wscript.sleep 100
wshshell.sendkeys " "
wscript.sleep 100
wshshell.sendkeys "T"
wscript.sleep 100
wshshell.sendkeys "r"
wscript.sleep 100
wshshell.sendkeys "i"
wscript.sleep 100
wshshell.sendkeys "c"
wscript.sleep 100
wshshell.sendkeys "k"
wscript.sleep 100
wshshell.sendkeys "!"
wscript.sleep 1003. Save the Notepad file As " Beingtech.vbs " (Without Quotes )
Note : While saving select Save as type "All files"
4. Now Execute The saved File, You will see "www.BeingTech.net - Enjoy the Trick!" Typed Automatically.
You can edit the Words In the above Code with Whatever you want Notepad to type.
2. Want to know that your computer is “Boy” or “Girl”?
then
1. Open Notepad
2. Copy the following line into notepad:
CreateObject("SAPI.SpVoice").S3. Save the Notepad file As " computer_gender.vbs " (Without Quotes )
Note : While saving select Save as type "All files" 4. Run the file.
If you hear a male voice, your pc is a boy.
If you hear a female voice, your pc is a girl.
3. Make your computer talk what you type !
This is very good and interesting trick which let your computer speaks whatever you type. There is no requirement of any software. Just follow below simple steps.
First open Notepad and copy below codes:
Dim msg, sapi
msg=InputBox("Enter your text for conversion– ","By BeingTech")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msgNote : While saving select Save as type "All files"
Now close the notepad file and open it again.
You will see a window, enter your text in it and click on ok.
_edited.jpg)
.JPG)
_edited.jpg)
