[p]公司里的網(wǎng)絡(luò)中，大部分機器是無法登錄公眾互聯(lián)網(wǎng)的，但是有一些領(lǐng)導(dǎo)的機器可以登錄。為了區(qū)分，采用了ip地址和mac地址的方法 ，雖然修改ip和mac地址可以實現(xiàn)登錄訪問互聯(lián)網(wǎng)，但是對于很多常用的信息，修改ip也不方便，不如弄到本地來，于是，在可以上公網(wǎng)的機器上架設(shè)了小偷程序，實現(xiàn)了很多信息的本地共享。[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 "
文件創(chuàng)建時間: "&f.datecreated '// -----創(chuàng)建時間[br]response.write "
上次修改時間: "&f.datelastmodified '//-----上次修改時間[br]response.write "
文件大小，單位字節(jié): "&f.size '//-----文件大小，單位字節(jié)[br][br][br]這就是所謂的抓取遠程文件[網(wǎng)頁、文檔、圖片等]保存到本地函數(shù)[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]