코드 사본은 다음과 같습니다.
<%
ifsavefile ( "/htm/list.htm", "http://www.xxx.com/asp/list.asp")
Response.write "생성"
또 다른
응답. "생성되지 않음".
endif
functionsavefile (localfilename, implefileurl)
Dimads, 검색, GetRemotedata
onerrorresumenext
setRetRieval = server.createObject ( "microso"& "ft.xm"& "lhttp")
retrieval
. "get", ormotefileurl, false, ",", ",", ",", "", ""
.보내다
getRemotedata = .ResponseBody
끝
setretrieval = 아무것도
setads = server.createobject ( "ado"& "db.str"& "eam")
Withads
.type = 1
.열려 있는
.writeGetRemotedata
.Savetofileserver.mappath (localfilename), 2
.취소()
.닫다()
끝
setads = 아무것도
iferr <> 0then
savefile = false
err.clear
또 다른
savefile = true
endif
최종 기능 장애
%>