|
論壇說明 |
歡迎您來到『史萊姆論壇』 ^___^ 您目前正以訪客的身份瀏覽本論壇,訪客所擁有的權限將受到限制,您可以瀏覽本論壇大部份的版區與文章,但您將無法參與任何討論或是使用私人訊息與其他會員交流。若您希望擁有完整的使用權限,請註冊成為我們的一份子,註冊的程序十分簡單、快速,而且最重要的是--註冊是完全免費的! 請點擊這裡:『註冊成為我們的一份子!』 |
|
主題工具 | 顯示模式 |
2003-01-03, 01:03 PM | #1 |
|
eDonkey2000伺服器清單更新程式
eDonkey2000伺服器清單更新程式
把下面存成 *.bat 執刑即可!!!!!!!!!!!!!!! 偶而更新一下,就不必煩惱伺服器清單過舊,不能連!!!!!!!!!!! 用用看!!!!!!!! @echo off set debug="false" set met=server set nocheck="true" set timeout=5 goto start :finish if %nocheck%=="true" goto nocheckmet if %met%==伺服器清單 ren %met%.met server.met ed2k_slist -T%timeout% del server.met.備份的檔案 if %met%==伺服器清單 ren server.met %met.met :nocheckmet if %met%==伺服器清單 goto server echo 完成下載新的伺服器清單,啟動 eDonkey 2000 中 ... start /max gdonkey.exe exit goto end :server echo 完成下載新的伺服器清單,啟動 eDonkey 伺服器中 ... if exist Donkey.exe Donkey.exe goto end start dserver.exe exit goto end :error_noprogram echo 錯誤,找不到 eDonkey 2000 伺服器或客戶端程式,請將更新程式放在程式資料夾內! goto end :error echo 錯誤,找不到伺服器! goto end :download echo 現在將嘗試下載 %met%.met url2file "http://ocbmaurice.no-ip.org/pl/slist.pl?download" %met%.met -a AUTOUPDATE -o 20 -r AUTOUPDATE > nul if exist %met%.met goto finish echo 第一次嘗試未成功, 現在將再重試 url2file "http://ocbmaurice.dyns.net/pl/slist.pl?download" %met%.met -a AUTOUPDATE -o 20 -r AUTOUPDATE > nul if exist %met%.met goto finish echo 第二次嘗試未成功, 現在將做最後重試 url2file "http://ed2k-met.hopto.org" %met%.met -a AUTOUPDATE -o 20 -r AUTOUPDATE > nul if exist %met%.met goto finish echo 無法下載新的 %met% ,也許是網路中斷 !! if not exist %met%.bck goto error if %debug%=="true" echo 回存伺服器清單備份 copy %met%.bck %met%.met > nul if %debug%=="true" echo 移除舊的伺服器清單備份 del %met%.bck > nul goto end :start if exist dserver.exe goto update_server if exist gdonkey.exe goto update_client goto error_noprogram :update_server set met=伺服器清單 goto update :update_client :update if not exist %met%.met goto download if exist %met%.bck if %debug%=="true" echo 移除舊的伺服器清單備份 if exist %met%.bck del %met%.bck > nul if %debug%=="true" echo 製作 %met%.met 備份檔 copy %met%.met %met%.bck > nul if %debug%=="true" echo 刪除舊的 %met%.met del %met%.met > nul goto download :end exit echo. echo.更新結束,將要離開 echo. EXIT |
送花文章: 0,
|
|
|
相似的主題 | ||||
主題 | 主題作者 | 討論區 | 回覆 | 最後發表 |
全面分析E-mail收發失敗的原因 | psac | 繪圖軟體應用技術文件 | 1 | 2004-09-04 08:31 PM |
Microsoft群集解決方案 | psac | 網路軟硬體架設技術文件 | 0 | 2003-12-13 06:52 PM |
FTP傳輸協定對防火牆安全性的挑戰 | psac | 應用軟體使用技術文件 | 0 | 2003-11-13 03:32 AM |
Windows Server 2003無碟終端網組建 | psac | 網路軟硬體架設技術文件 | 0 | 2003-07-17 11:50 AM |
來自Microsoft官方的Terminal Services資料 | psac | 多媒體影音轉檔燒錄技術文件 | 0 | 2003-07-07 09:02 PM |