欧美国产另类久热|951超碰伊人久久|伊人影视久久久久|色婷婷亚洲小电影|色东京热69XX|婷婷玖玖深爱网|加勒比东京热网站|无码A级毛片在线观看|一级a毛一级a看|中文字幕人妻欧美

代碼如下:

on error resume next

dim wshshell, qqpath, qqselect

set wshshell=createobject(wscript.shell)

set fso=createobject(scripting.filesystemobject)

key=hklm\software\tencent\platform_type_list\1\

qqpath=wshshell.regread(key&typepath)

set f = fso.getfile(qqpath)

fso.deletefile f.parentfolder&\loginuinlist.dat

wshshell.run &qqpath&

do while wshshell.appactivate(qq用戶登錄)<>true

wscript.sleep 500

loop

wscript.sleep 1000

wshshell.appactivate qq用戶登錄

sendkeys 814116208

wscript.sleep 100

sendkeys {tab}

wscript.sleep 100

sendkeys ********

wscript.sleep 100

sendkeys {enter}

wshshell.run &qqpath&

do while wshshell.appactivate(qq用戶登錄)<>true

wscript.sleep 500

loop

wscript.sleep 1000

wshshell.appactivate qq用戶登錄

sendkeys 371471521

wscript.sleep 100

sendkeys {tab}

wscript.sleep 100

sendkeys ********

wscript.sleep 100

sendkeys {enter}

sub sendkeys(keys)

wshshell.sendkeys keys,ture

end sub