huzi525 当前离线
上等兵
Dim ObjShell Set ObjShell = CreateObject("Wscript.Shell") ObjShell.Run "http://www.bathome.net/",1 ObjShell.sendkeys "{enter}" Set ObjShell=Nothing 复制代码
TOP
发表于 2010-4-4 00:05
|