本文目录一览:
关于登陆QQ的VBS
Dim strPrgpth
strPrgpth = "D:\Program Files\Tencent\QQ\qq.exe" '如果QQ安装路径不同,在此处修改
Set wshshell = CreateObject("wscript.shell")
Set oexec = wshshell.exec(strPrgpth)
wscript.sleep 3000 '如果脚本无法工作,可以适当延长这部分的时间值
wshshell.AppActivate "QQ用户登录"
wshshell.Sendkeys "{TAB}"
wshshell.Sendkeys "12345678" '换成你自己的QQ号
wscript.Sleep 1000
wshshell.Sendkeys "{TAB}"
wscript.Sleep 1000
wshshell.Sendkeys "password" '换成你的QQ号密码
wscript.Sleep 1000
wshshell.Sendkeys "{ENTER}"
wscript.Quit
vbs QQ整人代码 怎么用?
打开一个记事本,把代码输入进去,然后把格式改成VBS。
然后一保存,OK啦!(样子是中间有一个蓝色卷轴。)
接着,只要把这个做好的VBS文件发给他,就可以了,不用
再动别的,只要静静等待他被整!
例外话:我劝你还是别发这些,有点缺德的那种感
觉,给人不好的感受。
记住上面这句话!
VBS关于QQ登录的代码问题
WshShell.AppActivate "QQ2010"
是激活 窗口标题为 QQ2010 开头的窗口
Set oExec=WshShell.Exec(Program1)这里相当于WshShell.run chr(34) Program1 chr(34)
即运行QQ程序
下面是 windows 脚本技术 里 exec 的参考
exec 用正则表达式模式在字符串中运行查找,并返回包含该查找结果的一个数组。
rgExp.exec(str)
参数
rgExp
必选项。包含正则表达式模式和可用标志的正则表达式对象。
str
必选项。要在其中执行查找的 String 对象或字符串文字。
说明
如果 exec 方法没有找到匹配,则它返回 null。如果它找到匹配,则 exec 方法返回一个数组,并且更新全局 RegExp 对象的属性,以反映匹配结果。数组的0元素包含了完整的匹配,而第1到n元素中包含的是匹配中出现的任意一个子匹配。这相当于没有设置全局标志 (g) 的 match 方法。
如果为正则表达式设置了全局标志,exec 从以 lastIndex 的值指示的位置开始查找。如果没有设置全局标志,exec 忽略 lastIndex 的值,从字符串的起始位置开始搜索。
exec 方法返回的数组有三个属性,分别是 input、index 和 lastIndex。Input 属性包含了整个被查找的字符串。Index 属性中包含了整个被查找字符串中被匹配的子字符串的位置。LastIndex 属性中包含了匹配中最后一个字符的下一个位置。
示例
下面的例子举例说明了 exec 方法的用法:
function RegExpTest(){
var ver = Number(ScriptEngineMajorVersion() + "." + ScriptEngineMinorVersion())
if (ver = 5.5){ // 测试 JScript 的版本。
var src = "The rain in Spain falls mainly in the plain.";
var re = /\w+/g; // 创建正则表达式模式。
var arr;
while ((arr = re.exec(src)) != null)
document.write(arr.index + "-" + arr.lastIndex + "\t" + arr);
}
else{
alert("请使用 JScript 的更新版本");
}
}
c:\windows\ie.vbs为什么显示是盗号木马?
是中了VBS病毒了。
这种情况,一般你开机按F8,选择用安全模式启动,然后再安全模式下用杀毒软件,或者手动一般也能删除一些删不掉的文件
如果自己有比较好的杀毒软件,那就直接查杀。
卡巴就可以。这是脚本病毒。
如果杀完重复出现,那就只能系统还原了。这个病毒感染的可能是你的IE。要修复的话,很麻烦。不如还原或者重做系统。