一键启动你要的全部程序

一键启动你要的全部程序(2)

Program1 = "C:\Program Files\Tencent\QQ\QQ.exe"

Program2 = "C:\Program Files\MSN Messenger\msnmsgr.exe"

Program3 = "C:\Program Files\Outlook Express\msimn.exe"

Program4 = "C:\Program Files\Microsoft Office\Office12\EXCEL.EXE"

……

输完以后，再根据你上面输入的行数继续输入下面命令。

Set WshShell=createobject("wscript.shell")

Set oExec=WshShell.Exec(Program1)

Set WshShell=createobject("wscript.shell")

Set oExec=WshShell.Exec(Program2)

Set WshShell=createobject("wscript.shell")

Set oExec=WshShell.Exec(Program3)

Set WshShell=createobject("wscript.shell")

Set oExec=WshShell.Exec(Program4)

……

然后将此文件保存在任一目录下，并将扩展名改为VBs，再点右键，选“发送到→桌面快捷方式”。最后到桌面上找到这个快捷方式，点右键选“属性”在“快捷键”中设置一个快捷键（如F9）。