|
|
|
|
 |
|
在祐 / 2014-04-02 / 오후 7:47:08 / 61.78.108.65
조회수 : 761
|
| [기타] 웹사이트 내용 긁어오기 |
<%
Session.Codepage=949
Response.Charset="euc-kr"
url = "http://www.chosun.com"
Set xml = server.CreateObject("Microsoft.XMLHTTP") '개체생성
xml.open "get", "" & url & "", false '원하는 url불러오기
xml.send "" '실행
strStatus = xml.Status '실행상태 받아오기
str = xml.responseText '실제 받고자하는 데이터
Set xml = Nothing '개체 소멸
resultStr = split(str, "<br />")
Response.Write resultStr(0)
%>
|
|
|
