一鍵啟動所有聊天程序
現(xiàn)在聊天工具軟件非常多，而每次一一啟動這些聊天程序顯得非常麻煩，如何能實現(xiàn)一鍵啟動呢？
新建一個記事本文件，打開該文件并輸入以下命令：
Program1= "C:Program FilesTen centQQQQ.exe"
Program2= "C:Program Files淘寶網(wǎng)淘寶旺旺WangWang.exe"
Program3="C:Program FilesMSN Messengermsnmsgr.exe"
(你還可以在此處添加Program 4……)
Set WshShell=createobject("wscr ipt.shell")
Set oExec=WshShell.Exec(Progra m1)
Set WshShell=createobject("wscr ipt.shell")
Set oExec=WshShell.Exec(Progra m2)
Set WshShell=createobject("wscr ipt.shell")
Set oExec=WshShell.Exec(Progra m3)
上面我們只以三個聊天軟件為例來設(shè)置的，如果你還想讓其他聊天工具也添加到一次性啟動行列中，只要再按照上面的格式分別在上、下兩個部分進行添加即可(只要將這些程序的安裝路徑依次賦值給相應(yīng)的變量，在下面依次添加兩條Set命令語句，并將上面的“Program1、Program2”依次更換為相應(yīng)的變量即可)。然后將該記事本文件格式保存擴展名為“vbs”格式的文件，如：“多程序.vbs”。接下來為該文件創(chuàng)建一個桌面快捷方式，用鼠標右擊它并選擇“屬性”項，在打開的窗口中單擊“快捷方式”選項卡，在“快捷鍵”欄中為它設(shè)置一個相應(yīng)的快捷鍵，如：“F7”，單擊“確定”按鈕。這樣設(shè)置后，你只要按下F7鍵，就可以立刻同時啟動所有的聊天程序了。
讓我的QQ能一鍵登錄
雙擊一個vbs文件就可以讓QQ自動登錄的方法。只需輕輕按一個鍵，就能實現(xiàn)QQ的自動登錄。首先新建一個記事本并輸入：
Dim Program1
Program1= "C:Program FilesTen centQQQQ.exe" 'QQ路徑
Set WshShell=createobject("wscri pt.shell")
Set oExec=WshShell.Exec(Progra m1)
WScript.Sleep 2000
WshShell.AppActivate "Q登錄"
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "123456"'QQ號碼
WScript.Sleep 200
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "123" 'QQ密碼
WScript.Sleep 200
WshShell.SendKeys "{ENTER}"
然后將此文件的后綴名改為“.vbs”，再對著它點擊“右鍵→發(fā)送到→桌面快捷方式”最后對著這個快捷方式點擊“右鍵→屬性”在“快捷鍵”中設(shè)置為F9鍵。要登錄QQ時，只須用手指輕輕點一下F9鍵，就能自動登錄QQ，很方便吧！
本文涉及的代碼可到：http://www.cpcw.com/xz/loginQQ.rar下載，然后用記事本打開按實際情況填寫好QQ路徑、QQ號碼和密碼即可使用。
以上方法會讓我們的桌面增加很多快捷方式，但是我們不能將它們直接刪除，可以在桌面上新建一個文件夾，先取消桌面上所有快捷方式中的快捷鍵設(shè)置，然后將它們放進該文件夾中，再逐一對它們進行重新設(shè)置。
現(xiàn)在，相信你已經(jīng)喜歡上“一鍵操作電腦”的感覺了。其實，還有很多“獨門”的一鍵絕技，如：一鍵分區(qū)、一鍵排版、一鍵收藏等，只是由于文章篇幅有限，在此就不作介紹了。心動不如行動，朋友們還是趕緊親自去體驗一下它所帶來的簡單樂趣吧！
