Introduction: VBS Scripts

Picture of VBS Scripts

Hello again!

I decided to share with you more notepad tricks.....

The first one will show you how old you're going to be after 39 years.
And the second - in which year you're going to be 50.

I hope you like them:)

here are the results:)))

Step 1: Trick Number 1

Picture of Trick Number 1

This trick will show you how old you'll be in 39 years.

1. Open notepad
2. Type this code:

WScript.Echo "Hello!"

Set WshShell = WScript.CreateObject("WScript.Shell")
age = InputBox("Please type your age.")

newage = age + 39
WshShell.Popup "In 39 years, you will be " & newage & "."

3. Go to File - save as and save it like this age ( or something else). vbs
It doesn't matter what will be the name, but it have to end with .vbs

4. That's it!!!

NOTE: You can change 39 with other number if you want. But don't forget to change it in both places!!!

Step 2: Trick Number 2

Picture of Trick Number 2

This trick will show you in which year you'll be 50. You have to type only your birth year.

1. Open notepad
2. Type this code:

WScript.Echo "Hello!"

Set WshShell = WScript.CreateObject("WScript.Shell")
birthdate = InputBox("Please type your birth year only.")

newage = birthdate + 50
WshShell.Popup "In " & newage & " you'll be 50."

3. Go to File - save as and save it years. vbs
Like I said before it doesn't matter the name, but it must end with .vbs

Step 3: The End

This codes will not harm your computer:)

Enjoy and good luck!!!

Comments

PaperAirplanz (author)2016-08-01

save as .vbs

PaperAirplanz (author)2016-08-01

DO

msgbox " Please do not close this window. "

LOOP

orhan.kaymak.18 (author)2014-10-06

wherraawwwwwwwwwwwwwwwwwehhhhhhhhhhhhhhhhhhhhhhhaw

hhackers (author)2011-04-05

Please post another VBScripts..

tabascow (author)hhackers2011-10-18

yeah, i want more

bretjazs (author)2011-08-30

will you teach me ..!
manually?
i want to learn about notepad..!

hhackers (author)2011-04-05

I LOVE YOUR SITE!!!

kaseyhare (author)2010-04-03

i dont understand 

slu6alka (author)kaseyhare2010-04-03

What exactly you don't understand?

geeklord (author)2009-01-26

mmmkay,I read a couple tutorials on VBS and i decided to try to write something of my own. I'm having problems. It says the "Next" at the end is unexpected. I have the For at the begining, so why is this happening?


For a=1 to 3
dim b
b=1
if b=1 then
msgbox"Hi"
if b=2 then
msgbox"How are you?"
if b=3 then
msgbox"That's great"
b=b+1
next

munchman (author)geeklord2009-04-05

what are you truing to accomplish with the 'next'?

ahmedvadia (author)2009-03-19

could you embed one in the spider solitaire so it shows an error and exits spider solitaire

SCRIPTmaster (author)2008-07-20
TATcreator (author)SCRIPTmaster2009-03-06

Hello, old friend. How is your line of work coming?

CelloMan (author)2008-04-11

these aren't really jokes but i guess if you want a chance at winning the random prize...

Cerafem (author)CelloMan2008-04-27

"I decided to share with you more notepad tricks....." You are the only person to say that they were jokes. Try to read more carefully.

CelloMan (author)Cerafem2008-04-28

i said, if you paid more attention ===="these aren't really jokes"====
therefore meaning you shouldnt have entered them in the april fools day contest

A good name (author)CelloMan2008-04-27

which he did.

Dr.Paj (author)CelloMan2008-04-21

That is exactly what happened. Nice call.

Transquesta (author)2008-04-11

For anyone who cares/is interested, you can convert your .vbs 'creations' into .exe by going here and getting a copy of VbsToExe: http://www.f2ko.de/English/v2e/index.php

Sorry, I've only been able to find the CMD utility, but the syntax is pretty straight-forward.

Flea (author)2008-04-11

These aren't notepad tricks. It's Windows Scripting (VBScript). You can do this in any text editor. You should change the title to something referring to VBScript

slu6alka (author)Flea2008-04-11

I changed it.

About This Instructable

47,020views

33favorites

License:

More by slu6alka:Fried bananas - recipeFried bananas (photos)Origami collection
Add instructable to: