用php實(shí)現(xiàn)遠(yuǎn)程網(wǎng)絡(luò)文件下載到服務(wù)器

我要評論 2009/09/14 11:55:39 來源：綠色資源網(wǎng) 編輯：Downcc資源站 [大中小] 評論:0 點(diǎn)擊:520次

本文主要介紹如何用php程序?qū)崿F(xiàn)將遠(yuǎn)程網(wǎng)絡(luò)文件下載到自己的主機(jī)（服務(wù)器、虛擬主機(jī)）上，當(dāng)然也提供asp、asp.net的源碼給大家參考.

最近讓 Lc. 下載《汪洋中的一條船》這部感人的勵志電視劇，為了分享方便，于是我提供一個Godaddy的免費(fèi)FTP.

考慮到穩(wěn)定性和專一性，我想重新開啟一個godaddy的免費(fèi)空間，但是此時已經(jīng)上傳了兩集，一共是400多兆.怎么辦呢？

于是乎我想起了之前轉(zhuǎn)移空間時用到的一個php文件，他可以下載遠(yuǎn)程網(wǎng)絡(luò)文件到服務(wù)器上，也就是只要是可以下載的url，就可以轉(zhuǎn)移到新的服務(wù)器上.

廢話不多說，直接亮出將遠(yuǎn)程網(wǎng)絡(luò)文件下載到服務(wù)器的php源碼（測試通過，很好很強(qiáng)大）.

當(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;
using   System.Net;
using   System.IO;

class   DownloadFile;
      {
        static   void   Main(string[]   args)
            {
                //你的遠(yuǎn)程文件
                string   siteURL="http://www.abc.com/xxx.rar";
                //下載到本地的路徑及文件名
                string   fileName="c:\\xxx.rar";
                //實(shí)例化一個WebClient
                WebClient   client=new   WebClient();
                //調(diào)用WebClient的DownloadFile方法
                client.DownloadFile(siteURL,fileName);
                }
        }