史萊姆論壇

返回   史萊姆論壇 > 專業主討論區 > 程式語言討論區
忘記密碼?
論壇說明

歡迎您來到『史萊姆論壇』 ^___^

您目前正以訪客的身份瀏覽本論壇,訪客所擁有的權限將受到限制,您可以瀏覽本論壇大部份的版區與文章,但您將無法參與任何討論或是使用私人訊息與其他會員交流。若您希望擁有完整的使用權限,請註冊成為我們的一份子,註冊的程序十分簡單、快速,而且最重要的是--註冊是完全免費的!

請點擊這裡:『註冊成為我們的一份子!』

Google 提供的廣告


發文 回覆
 
主題工具 顯示模式
舊 2010-07-12, 10:16 AM   #1 (permalink)
註冊會員
榮譽勳章

勳章總數
UID - 340556
在線等級: 級別:0 | 在線時長:4小時 | 升級還需:1小時
註冊日期: 2010-06-24
文章: 14
精華: 0
現金: 35 金幣
資產: 35 金幣
預設

引用:
作者: pedrowong 查看文章
該不會是 perl 吧?
perl------>請問這個是什麼@@?
888888 目前離線  
送花文章: 34, 收花文章: 3 篇, 收花: 3 次
回覆時引用此帖
舊 2010-07-12, 01:07 PM   #2 (permalink)
長老會員
 
cwvdavid 的頭像
榮譽勳章
UID - 476
在線等級: 級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時
註冊日期: 2002-12-06
住址: 天與地的夾縫
文章: 3106
精華: 0
現金: 5256 金幣
資產: 2034465 金幣
預設

perl 也是一種腳本(指令)
==========================
回正題, AutoIT 所編譯完的執行檔...就是執行檔, 那是不能改的,
你只能把.au3的檔案, 修改完之後, 再用AutoIT 重新編譯成執行檔


如果真的那麼不想用AutoIT, 然後又想要用FireFox的話...
那....

把下列文字存成 xxx.vbs
(底下的寫法跟AutoIT差不多, 但運作模式完全相同)

註:FireFox不提供程式碼直接控制的功能,
所以只能請電腦。。。把 "人 的操作步驟",執行出來


語法:
Set wshshell=CreateObject("wscript.shell")
wshshell.Run "firefox.exe about:blank" '執行Firefox(並預設一個空白頁, 以便使用)


WScript.Sleep 2000 '等待2秒鐘, 確定FireFox已開啟

'wshshell.AppActivate "Mozilla Firefox" '指定目前正在看的是 視窗標題為 "Mozilla Firefox"的視窗
'(上面這一行雖然可以讓焦點出現在FireFox, 但在控制時, 似乎會沒有效) 反而是不指定會比較好
'另外, 當網頁開始瀏覽之後, 視窗的Title 會變成 【xxxxx ooooo - Mozilla Firefox】
'例如:
' 【iGoogle - Mozilla Firefox】
' 【史萊姆論壇 - Mozilla Firefox】
' 【公告 - 被列管會員緊急通知 (所有會員必先觀看) - 史萊姆論壇 - Mozilla Firefox】
'當標題變更後, 要執行  wshshell.AppActivate 時, 就必須跟著改後面的文字....@_@
'因此, 在執行FireFox.exe時, 加上about:blank, 可以確保一開始的標題是 【Mozilla Firefox】


wshshell.SendKeys "^l" 'Ctrl + L (切換到網址列)
WScript.Sleep 100 '等0.1秒, 確保焦點在網址列(否則還來不及切換到網址列, 底下的字母可能已經打完了...)
wshshell.SendKeys "http://tw.yahoo.com{enter}" '按下鍵盤的英文字母, 再按下Enter

WScript.Sleep 500 '等0.5秒...準備開下一個分頁...

'按下ALT+F, 再按下T ...(如同Ctrl + T, 但 " Ctrl + T " 不一定會開出新的分頁...所以使用Ctrl+T要小心...)
WScript.Sleep 500 '等0.5秒...
wshshell.SendKeys "%f" 'ALT + F
WScript.Sleep 100 '等0.1秒...
wshshell.SendKeys "t"

'開出新的分頁之後...指定網址...

wshshell.SendKeys "^l" 'Ctrl + L (切換到網址列)
WScript.Sleep 500 '等0.5秒, 確保焦點在網址列
wshshell.SendKeys "http://www.seed.net.tw" '按下鍵盤的英文字母
wshshell.SendKeys "{enter}" '按下鍵盤的Enter

WScript.Sleep 500 '等0.5秒, 再開一個視窗
wshshell.SendKeys "^t" 'Ctrl + T (叫出FireFox的分頁視窗, )

WScript.Sleep 500 '等0.5秒
wshshell.SendKeys "^l" 'Ctrl + L (切換到網址列)

WScript.Sleep 100 '等0.1秒, 再輸入網址...
wshshell.SendKeys "http://www.hinet.net"
wshshell.SendKeys "{enter}"

WScript.Sleep 300

msgbox("執行完畢")
__________________
姜太公釣魚~ 願者上鉤
cwvdavid 目前離線  
送花文章: 4036, 收花文章: 2466 篇, 收花: 10141 次
回覆時引用此帖
有 2 位會員向 cwvdavid 送花:
888888 (2010-07-16),a471 (2010-07-12)
感謝您發表一篇好文章
舊 2010-07-12, 08:57 PM   #3 (permalink)
長老會員
 
cwvdavid 的頭像
榮譽勳章
UID - 476
在線等級: 級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時
註冊日期: 2002-12-06
住址: 天與地的夾縫
文章: 3106
精華: 0
現金: 5256 金幣
資產: 2034465 金幣
預設

更簡易的寫法...
(利用FireFox的特性來連開....)

上面的一堆麻煩事都可以省了...



===將下列文字存成 xxx.vbs==================
Set wshshell=CreateObject("wscript.shell")
wshshell.Run "firefox.exe about:blank" '執行Firefox(並預設一個空白頁, 以便使用)
WScript.Sleep 10000 '等待10秒鐘, 確定FireFox已出現(從來沒開啟過的時候會需要比較久)

wshshell.Run "firefox.exe http://tw.yahoo.com" '執行Firefox(直接給網址)
WScript.Sleep 1000
wshshell.Run "firefox.exe http://www.seed.net.tw"
WScript.Sleep 1000
wshshell.Run "firefox.exe http://forum.slime.com.tw"
WScript.Sleep 1000
wshshell.Run "firefox.exe http://www.pchome.com.tw"
===將以上文字存成 xxx.vbs==================
cwvdavid 目前離線  
送花文章: 4036, 收花文章: 2466 篇, 收花: 10141 次
回覆時引用此帖
向 cwvdavid 送花的會員:
888888 (2010-07-16)
感謝您發表一篇好文章
舊 2010-07-17, 12:06 AM   #4 (permalink)
註冊會員
榮譽勳章

勳章總數
UID - 340556
在線等級: 級別:0 | 在線時長:4小時 | 升級還需:1小時
註冊日期: 2010-06-24
文章: 14
精華: 0
現金: 35 金幣
資產: 35 金幣
預設

更簡易的寫法...
(利用FireFox的特性來連開....)

上面的一堆麻煩事都可以省了...



===將下列文字存成 xxx.vbs==================
Set wshshell=CreateObject("wscript.shell")
wshshell.Run "firefox.exe about:blank" '執行Firefox(並預設一個空白頁, 以便使用)
WScript.Sleep 10000 '等待10秒鐘, 確定FireFox已出現(從來沒開啟過的時候會需要比較久)

wshshell.Run "firefox.exe http://tw.yahoo.com" '執行Firefox(直接給網址)
WScript.Sleep 1000
wshshell.Run "firefox.exe http://www.seed.net.tw"
WScript.Sleep 1000
wshshell.Run "firefox.exe http://forum.slime.com.tw"
WScript.Sleep 1000
wshshell.Run "firefox.exe http://www.pchome.com.tw"
===將以上文字存成 xxx.vbs==================

如果使用FireFox就無法用像跑IE的方式去跑網址嗎?
分頁開很多,FireFox的記憶體會佔很大~~
888888 目前離線  
送花文章: 34, 收花文章: 3 篇, 收花: 3 次
回覆時引用此帖
舊 2010-07-17, 12:17 AM   #5 (permalink)
註冊會員
榮譽勳章

勳章總數
UID - 340556
在線等級: 級別:0 | 在線時長:4小時 | 升級還需:1小時
註冊日期: 2010-06-24
文章: 14
精華: 0
現金: 35 金幣
資產: 35 金幣
預設

引用:
作者: cwvdavid 查看文章
perl 也是一種腳本(指令)
==========================
回正題, AutoIT 所編譯完的執行檔...就是執行檔, 那是不能改的,
你只能把.au3的檔案, 修改完之後, 再用AutoIT 重新編譯成執行檔


如果真的那麼不想用AutoIT, 然後又想要用FireFox的話...
那....

把下列文字存成 xxx.vbs
(底下的寫法跟AutoIT差不多, 但運作模式完全相同)

註:FireFox不提供程式碼直接控制的功能,
所以只能請電腦。。。把 "人 的操作步驟",執行出來


語法:
Set wshshell=CreateObject("wscript.shell")
wshshell.Run "firefox.exe about:blank" '執行Firefox(並預設一個空白頁, 以便使用)


WScript.Sleep 2000 '等待2秒鐘, 確定FireFox已開啟

'wshshell.AppActivate "Mozilla Firefox" '指定目前正在看的是 視窗標題為 "Mozilla Firefox"的視窗
'(上面這一行雖然可以讓焦點出現在FireFox, 但在控制時, 似乎會沒有效) 反而是不指定會比較好
'另外, 當網頁開始瀏覽之後, 視窗的Title 會變成 【xxxxx ooooo - Mozilla Firefox】
'例如:
' 【iGoogle - Mozilla Firefox】
' 【史萊姆論壇 - Mozilla Firefox】
' 【公告 - 被列管會員緊急通知 (所有會員必先觀看) - 史萊姆論壇 - Mozilla Firefox】
'當標題變更後, 要執行  wshshell.AppActivate 時, 就必須跟著改後面的文字....@_@
'因此, 在執行FireFox.exe時, 加上about:blank, 可以確保一開始的標題是 【Mozilla Firefox】


wshshell.SendKeys "^l" 'Ctrl + L (切換到網址列)
WScript.Sleep 100 '等0.1秒, 確保焦點在網址列(否則還來不及切換到網址列, 底下的字母可能已經打完了...)
wshshell.SendKeys "http://tw.yahoo.com{enter}" '按下鍵盤的英文字母, 再按下Enter

WScript.Sleep 500 '等0.5秒...準備開下一個分頁...

'按下ALT+F, 再按下T ...(如同Ctrl + T, 但 " Ctrl + T " 不一定會開出新的分頁...所以使用Ctrl+T要小心...)
WScript.Sleep 500 '等0.5秒...
wshshell.SendKeys "%f" 'ALT + F
WScript.Sleep 100 '等0.1秒...
wshshell.SendKeys "t"

'開出新的分頁之後...指定網址...

wshshell.SendKeys "^l" 'Ctrl + L (切換到網址列)
WScript.Sleep 500 '等0.5秒, 確保焦點在網址列
wshshell.SendKeys "http://www.seed.net.tw" '按下鍵盤的英文字母
wshshell.SendKeys "{enter}" '按下鍵盤的Enter

WScript.Sleep 500 '等0.5秒, 再開一個視窗
wshshell.SendKeys "^t" 'Ctrl + T (叫出FireFox的分頁視窗, )

WScript.Sleep 500 '等0.5秒
wshshell.SendKeys "^l" 'Ctrl + L (切換到網址列)

WScript.Sleep 100 '等0.1秒, 再輸入網址...
wshshell.SendKeys "http://www.hinet.net"
wshshell.SendKeys "{enter}"

WScript.Sleep 300

msgbox("執行完畢")


這樣如果是設定注音輸入法,就不會順利執行了@@"
分頁開很多,記憶體會當掉= =+

此帖於 2010-07-17 01:04 AM 被 888888 編輯.
888888 目前離線  
送花文章: 34, 收花文章: 3 篇, 收花: 3 次
回覆時引用此帖
舊 2010-07-17, 01:22 AM   #6 (permalink)
長老會員
 
cwvdavid 的頭像
榮譽勳章
UID - 476
在線等級: 級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時級別:46 | 在線時長:2395小時 | 升級還需:2小時
註冊日期: 2002-12-06
住址: 天與地的夾縫
文章: 3106
精華: 0
現金: 5256 金幣
資產: 2034465 金幣
預設

很遺憾~ 有一好沒兩好...

再不然就得靠 html的 javascript, 動態的一個一個載入你想連的頁面,
最後再手動將那個頁面關掉....

(題外話......有那麼多的朋友需要你幫忙點那些連結嗎????)
cwvdavid 目前離線  
送花文章: 4036, 收花文章: 2466 篇, 收花: 10141 次
回覆時引用此帖
向 cwvdavid 送花的會員:
888888 (2010-07-18)
感謝您發表一篇好文章
舊 2010-07-18, 12:01 PM   #7 (permalink)
註冊會員
榮譽勳章

勳章總數
UID - 340556
在線等級: 級別:0 | 在線時長:4小時 | 升級還需:1小時
註冊日期: 2010-06-24
文章: 14
精華: 0
現金: 35 金幣
資產: 35 金幣
預設

引用:
作者: cwvdavid 查看文章
很遺憾~ 有一好沒兩好...

再不然就得靠 html的 javascript, 動態的一個一個載入你想連的頁面,
最後再手動將那個頁面關掉....

(題外話......有那麼多的朋友需要你幫忙點那些連結嗎????)

嗯,不知您是否知道"地圖日記"。
加入後,裡面有一個叫做"種菜農場"的東西,去別人的農場一次,就能帶給該農場主人物品。
888888 目前離線  
送花文章: 34, 收花文章: 3 篇, 收花: 3 次
回覆時引用此帖
發文 回覆



發表規則
不可以發文
不可以回覆主題
不可以上傳附加檔案
不可以編輯您的文章

論壇啟用 BB 語法
論壇啟用 表情符號
論壇啟用 [IMG] 語法
論壇禁用 HTML 語法
Trackbacks are 禁用
Pingbacks are 禁用
Refbacks are 禁用


所有時間均為台北時間。現在的時間是 11:16 PM


Powered by vBulletin® 版本 3.6.8
版權所有 ©2000 - 2025, Jelsoft Enterprises Ltd.


SEO by vBSEO 3.6.1