close

Trust Me!! Trust You!!


  • Blog
  • Local Log
  • Tag Cloud
  • Key Log
  • Guestbook
  • RSS Feed
  • Write a Post
  • Admin

혹시 블로그 스킨이 깨져 보이시나요? 최신버전의 Internet Explorer(Windows용), Opera, Firefox를 사용해보세요.

ASP 페이지 자동 html파일저장 함수

웹 프로그래밍
2010/06/16 18:36
 
Function Make_UrlToFile(ori_url,save_url,save_filename)
 
  server.ScriptTimeOut=12000
 
  'ori_url(페이지든,이미지경로든 상관없음)
  if save_url = "" then save_url = "/"
  path = Server.MapPath(save_url) '현재페이지
 
  'url경로의 페이지를 통으로 바이너리 데이터로 읽어드림
  Set xh = CreateObject("MSXML2.ServerXMLHTTP")
  xh.Open "GET", ori_url, false
  lResolve = 5 * 1000
  lConnect = 5 * 1000
  lSend = 15 * 10000
  lReceive = 15 * 10000
  xh.setTimeouts lResolve,lConnect,lSend,lReceive
  xh.Send()
  strData = xh.ResponseBody
  Set  xh = Nothing

  save_root = path & "\"&save_filename  '저정될 총경로
  Set FSO = CreateObject("Scripting.FileSystemObject")
  if (FSO.FileExists(save_root)) then
   old_root = path& "\"&mid(save_filename,1,instrrev(save_filename,".")-1)&"_old"&mid(save_filename,instrrev(save_filename,"."))
   FSO.CopyFile save_root,old_root,true '원본파일을 구파일로 복사(aa.htm -> aa_old.htm)
   FSO.DeleteFile(save_root)    '원본 파일 삭제
  end if
  Set FSO = Nothing

  '바이너리 파일 저장
  Set s = CreateObject("ADODB.Stream")
  s.open()
  s.type = 1
  s.Write strData
  s.SaveToFile save_root,2 'aa.htm 생성
  Set s = Nothing
 
  '바이너리 출력
  Response.BinaryWrite strData
 End Function
' Response.Redirect return_url

[출처] ASP 페이지 자동 html파일저장 함수|작성자 파란천사

이올린에 북마크하기
No received trackback. / Comment 10

Trackback Address :: http://viper150.cafe24.com/trackback/120

You can also say.

Prev 1 ... 180 181 182 183 184 185 186 187 188 ... 298 Next
블로그 이미지
이것저것 불펌금지도 퍼다가 담습니다. 외부에 비공개된 페이지 입니다. By. 어른왕자

카테고리

  • 전체 (298)
    • 사는 이야기 (115)
    • 웹 프로그래밍 (102)
    • App 프로그래밍 (22)
    • IT 뉴스&기타 (22)
    • 박한별 (4)
    • 역사&기타지식 (9)

태그목록

  • 울트라에디터
  • 전쟁
  • api 한글화
  • api
  • 제이퀴리
  • 만들기
  • 唐田
  • C언어
  • 게임중독
  • 의자
  • 잃은것
  • 국가통계포털
  • 그래픽카드
  • 미국의료
  • 텔레비젼
  • 수나라
  • XSS
  • DB2 procedure
  • 짱난다DB2
  • 김희선
  • RedirectAttributes
  • 이중성향
  • 명품지갑
  • 주차
  • CGI
  • 착각
  • 오픈오피스
  • 육이오
  • 피로
  • A4용지

최근에 올라온 글

  • 보험사의 조정신청 대응방법.
  • 어느 천재의 앞선 시선.
  • [병맛더빙] 누구게..... (1)
  • 韓경제 `회색 코뿔소` 상황...
  • SVN Connector 설치 URL.
  • 군대를 가지 않는 서울대생.
  • “운은 하늘의 귀여움 받는...
  • 목장에서 알바하다가 캐스...
  • [펌]믿고 거르는 관상.
  • 하루에 1세트씩 하면 좋다...

최근에 달린 댓글

  • <p><img src="https://i.imgur... 브레드 01/22
  • <p><img src="https://i.imgur... 브레드 01/22
  • <p><img src="https://i.imgur... 브레드 01/22
  • <p><img src="https://i.imgur... 브레드 01/22
  • <p><img src="https://i.imgur... 브레드 01/22

최근에 받은 트랙백

  • công ty may đồng phục. công ty may đồng phục 01/08
  • Israelnightclub`s recent blo... Israelnightclub`s recent blo.. 01/06
  • Suggested Browsing. Suggested Browsing 01/06
  • similar site. similar site 01/06
  • לאתר הבית שלנו. לאתר הבית שלנו 01/06

글 보관함

  • 2019/03 (1)
  • 2018/12 (1)
  • 2018/09 (1)
  • 2018/08 (1)
  • 2018/02 (1)

달력

«   2021/01   »
일 월 화 수 목 금 토
          1 2
3 4 5 6 7 8 9
10 11 12 13 14 15 16
17 18 19 20 21 22 23
24 25 26 27 28 29 30
31            

링크

  • Total : 262085
  • Today : 21
  • Yesterday : 51
Tattertools
Eolin
rss

어른왕자's blog is powered byTattertools1.1.2.2 : Animato