用php實(shí)現(xiàn)遠(yuǎn)程網(wǎng)絡(luò)文件下載到服務(wù)器
本文主要介紹如何用php程序?qū)崿F(xiàn)將遠(yuǎn)程網(wǎng)絡(luò)文件下載到自己的主機(jī)(服務(wù)器、虛擬主機(jī))上,當(dāng)然也提供asp、asp.net的源碼給大家參考.
最近讓 Lc. 下載《汪洋中的一條船》這部感人的勵(lì)志電視劇,為了分享方便,于是我提供一個(gè)Godaddy的免費(fèi)FTP.
考慮到穩(wěn)定性和專一性,我想重新開啟一個(gè)godaddy的免費(fèi)空間,但是此時(shí)已經(jīng)上傳了兩集,一共是400多兆.怎么辦呢?
于是乎我想起了之前轉(zhuǎn)移空間時(shí)用到的一個(gè)php文件,他可以下載遠(yuǎn)程網(wǎng)絡(luò)文件到服務(wù)器上,也就是只要是可以下載的url,就可以轉(zhuǎn)移到新的服務(wù)器上.
廢話不多說,直接亮出將遠(yuǎn)程網(wǎng)絡(luò)文件下載到服務(wù)器的php源碼(測試通過,很好很強(qiáng)大).
<form method="post"> <input name="url" size="50" /> <input name="submit" type="submit" /> </form> < ?php // maximum execution time in seconds set_time_limit (24 * 60 * 60); if (!isset($_POST['submit'])) die(); // folder to save downloaded files to. must end with slash $destination_folder = 'temp/'; $url = $_POST['url']; $newfname = $destination_folder . basename($url); $file = fopen ($url, "rb"); if ($file) { $newf = fopen ($newfname, "wb"); if ($newf) while(!feof($file)) { fwrite($newf, fread($file, 1024 * 8 ), 1024 * 8 ); } } if ($file) { fclose($file); } if ($newf) { fclose($newf); } ?> |
當(dāng)然還需要展示下asp版本的源碼(未測試)
< % function downfilea(d_target, s_target) On Error Resume Next dim myhttp, objstream set myhttp = server.createobject( "MSXML2.XMLHTTP ") myhttp.open "GET ", d_target, false myhttp.send() set objstream = Server.CreateObject( "adodb.stream ") objstream.Type = 1 objstream.Mode = 3 objstream.Open objstream.Write myhttp.responseBody objstream.SaveToFile s_target, 2 if err.number <> 0 then err.Clear end function downfilea "http://www.abc.com/xxx.rar ", Server.MapPath( "down/xxx.rar ") Response.write "ok " %> 還有asp.net版本的源碼(未測試) using System; |
注意事項(xiàng):
1.相關(guān)的目錄可能需要建立,具體請看源碼.比如temp/、down/.
2.其中php版本的源碼是支持自定義url的,但asp、asp.net版本的并沒有提供自定義.
3.在拷貝大文件時(shí),國內(nèi)估計(jì)支持欠佳.因?yàn)榭紤]到程序的超時(shí)時(shí)間,但在國外支持很好.
比如Blinux將一個(gè)近300M的文件轉(zhuǎn)移到另一個(gè)服務(wù)器上耗費(fèi)時(shí)間是28秒.這是國內(nèi)無法想象的.
最后希望大家反饋下使用效果.
關(guān)鍵詞:php,服務(wù)器
閱讀本文后您有什么感想? 已有 人給出評價(jià)!
- 1
- 2
- 1
- 1
- 1
- 1