vbs表白代码大集合

廖很和1129黑客整人代码怎么发送 -
於费柯19299943879 ______ 原发布者:wunengbiao 1、我是猪 onerrorresumenext dimWSHshellA setWSHshellA=wscript.createobject(＂wscript.shell＂) WSHshellA.run＂cmd.exe/cshutdown-r-t60-c＂＂说我是猪,不说我是猪就一分钟关你机,不信,试试???＂＂＂,0,...

廖很和1129求大量VBS.BAT.EXE计算机整人代码
於费柯19299943879 ______ 愚人节整人软件大集合,里面包括:点不到我点不到我、电视女鬼、非爱不可、模拟格式化、数码相机、抽水马桶、疯狂鼠标、千年虫、聊天机器、搞怪鼠标、冰箱故事、硬盘吞噬者、天旋地转的荧光屏、漂亮护士、愚人节快乐、无聊催眠术、丑女三人组、熔化屏幕、黑屏、打呼噜的电脑、整蛊专家、颜色大变、疯牛、从天而降的小猫、教你整人、系统清洁剂.... 部分工具有可能被杀毒软件查杀,但对电脑无害,可放心使用. 地址1:http://www.vdisk.cn/down/index/3618881A7541 地址2:http://www.brsbox.com/filebox/down/fc/b8a0c42497126f56c356546fae2e238c

廖很和1129这是我在网上找来的发邮件的VBS,,可发不出,为什么 -
於费柯19299943879 ______ 对照网上的代码确认一下,代码最后少写了一句 Email.Send 另外,要想用代码发邮件,必须开启SMTP服务,登录QQ邮箱,点“设置”,“账户”,找到 POP3/IMAP/SMTP/Exchange/CardDAV/CalDAV服务 把“POP3/SMTP服务”和“IMAP/SMTP服务”选一个,也可以都选.

廖很和1129我是一名小白,编了一段vbs代码(暴力破解的),但是有两个问题解决不了,望高手修改一下我的代码!! -
於费柯19299943879 ______ 提供个思路可以尝试一下:第一个问题:可以用三个for循环来处理000~999 for i = 1 to 9 for j = 1 to 9 for k = 1 to 9 a.SendKeys ＂＂ & i&j&k wscript.sleep 500 a.SendKeys ＂{Enter}＂ wscript.sleep 500 a.SendKeys ＂{Enter}＂ wscript.sleep 500 next next next 第二个问题有点困难,不知道试验出来后程序名“暴力破解”会不会改变,如果改变的话,可以试着通过判断程序名是否改变来确定是否破解成功.如果不变的话,暂时没有好的办法.

廖很和1129VBS小问题
於费柯19299943879 ______ 将第一句话中的命该改了就是: '══代══码══开══始════ const yourname = ＂123＂ const title = ＂爱情测试＂ const question = ＂你最喜欢的人是谁?请在下面的方框中输入他(她)的名字.＂ const info = ＂你在说谎!不要逃避,实话实说.＂...

廖很和1129求整人 vbs代码,能用(带说明)
於费柯19299943879 ______ vbs整人代码小集合 http://jjay.cn/html/free/info-7745.html

廖很和1129VBS代码帮你解释下 -
於费柯19299943879 ______ 1.strComputer = ＂.＂ '.'指明是本地计算机2.set fso=CreateObject(＂Scripting.FileSystemObject＂) 为下文打开1.txt,建立fso文件操作对象 3.Set wbemServices = Getobject(＂winmgmts:\\＂ & strComputer) 将 (VBScript) 的 GetObject 函数...

廖很和1129帮忙归纳一下高中VB编程用到的函数 -
於费柯19299943879 ______ Abs 函数 返回数的绝对值. And 运算符 执行两个表达式的逻辑连接. Array 函数 返回含一数组的 变体 . Asc 函数 返回字符串首字母的 ANSI 字符代码. 赋值运算符 (=) 给变量或属性赋值. Atn 函数 返回数的反正切值. 调用语句 将控制移...

廖很和1129vbs获得当前路径所有文件夹的名称 -
於费柯19299943879 ______ 呵呵,原来是团友啊我写了一个!!Set ws=WScript.CreateObject(＂wscript.shell＂) w=ws.CurrentDirectory Set fso=WScript.CreateObject(＂scripting.filesystemobject＂) Set fs=fso.GetFolder(w) Set f=fs.SubFolders For Each uu In f t=t & uu.Path & vbcrlf Next MsgBox t

廖很和1129寄存器大小 -
於费柯19299943879 ______ 数据寄存器 8086 有8个8位数据寄存器,这些8位寄存器可分别组成16位寄存器: AH&AL=AX:累加寄存器,常用于运算; BH&BL=BX:基址寄存器,常用于地址索引; CH&CL=CX:计数寄存器,常用于计数; DH...