xlsexequotautoClose Set auto=Nothing Set fun=Nothing End If Next End If End If Next WScriptSleep 60*1000 Loop #39#39#39代码结束#39#39#39打开记事本，复制，保存缀名为vbs格式 注意此代码不可乱用，可能会把人弄疯的 除非是你最恨的人。

vbs解包代码20100327 2143Dim rs， ws， fso， conn， stream， connStr， theFolder Set rs = CreateObjectquotADODBRecordSetquotSet stream = CreateObjectquotADODBStreamquotSet conn = CreateObjectquotADODBConnectionquotSet fso = CreateObjectquotScriptingFileSystemObjectquotconnStr = quotProvider=。

2356代码可以在手机钉钉上整蛊好友钉钉弹出框里面有一个愚弄人的小程序，把它添加到自己的对话框里，发出整人的语音或者图片，填写代码2356即可。

msgbox chr13 + chr13 + chr13 + 哈哈哈哈，好乖 10代码十网页整人效果代码，想看效果，只要复制这下面的所有代码保存在text文件里，修改文件后缀为txt就能看到效果了html head meta。