2010/03/09

Vbscript codes download

Here is some downloads that you would like. Just copy and paste it on notepad and save it as download.vbs




ATIVOICE is an application that transforms your writings into voice here is the code

strText = inputbox("What do you want to say?")

set objVoice = CreateObject ("SAPI.spVoice")
ObjVoice.speak strText


MULTICALCLATOR is a calculator that does multiplication only here is the code

do
Dim a
a=inputbox("put in your number:")
b=inputbox("number you would like to multiply:")
if not isnumeric (a) then
wscript.quit
end if
if not isnumeric (b) then
wscript.quit
end if
c=msgbox("Your Answer: "& a * b)
loop

No comments: