抓取遠程文件[網頁、文檔、圖片等]保存到本地
當前位置:點晴教程→知識管理交流
→『 技術文檔交流 』
[p]公司里的網絡中,大部分機器是無法登錄公眾互聯網的,但是有一些領導的機器可以登錄。為了區分,采用了ip地址和mac地址的方法 ,雖然修改ip和mac地址可以實現登錄訪問互聯網,但是對于很多常用的信息,修改ip也不方便,不如弄到本地來,于是,在可以上公網的機器上架設了小偷程序,實現了很多信息的本地共享。[br]今天討論的是如何將極品時刻表下載到本地。[br][br]<%[br]server.scripttimeout = 300[br]filename="jpskb.rar"[br][br]set fso = server.createobject("scripting.filesystemobject")[br]if not fso.fileexists(server.mappath(filename)) then'判斷文件是否存在,如果不存在下載一次。[br]call saveremotefile(filename,"http://jpskb.com/down/jpskb.rar")[br]response.write "恭喜,獲取成功!
"[br]end if[br][br]action=request.querystring("a")[br] if action="get" then [br] call saveremotefile(filename,"http://jpskb.com/down/jpskb.rar")[br] response.write "恭喜,獲取成功! "[br]end if[br][br]set f = fso.getfile(server.mappath(filename))[br]x=f.datelastmodified [br]response.write read_file[br]response.write " 文件名稱: "&f.name '//-----文件名稱[br]response.write " 文件創建時間: "&f.datecreated '// -----創建時間[br]response.write " 上次修改時間: "&f.datelastmodified '//-----上次修改時間[br]response.write " 文件大小,單位字節: "&f.size '//-----文件大小,單位字節[br][br][br]這就是所謂的抓取遠程文件[網頁、文檔、圖片等]保存到本地函數[br]sub saveremotefile(localfilename,remotefileurl) [br]dim ads,retrieval,getremotedata [br]set retrieval = server.createobject("microsoft.xmlhttp") [br]with retrieval [br].open "get", remotefileurl, false, "", "" [br].send [br]getremotedata = .responsebody [br]end with [br]set retrieval = nothing [br]set ads = server.createobject("adodb.st"&"ream") [br]with ads [br].type = 1 [br].open [br].write getremotedata [br].savetofile server.mappath(localfilename),2 [br].cancel() [br].close() [br]end with [br]set ads=nothing [br]end sub [br]%>[br] [br]右鍵-目標另存為既可下載 下載前請看軟件修改時間,如果您從上面下載的不是最新的,請從這里獲取最新的,重新下載〉〉〉〉[/p] 該文章在 2010/7/22 22:01:49 編輯過 |
關鍵字查詢
相關文章
正在查詢... |