My Name is Kay....

DIY , 먹방 , 개발 , 육아 , 여행 좋아합니다.
AdBlock 사용시 화면이 정상적으로 노출되지 않습니다.
포스팅 관련 문의 및 개발 문의는 Email :

추가 포스팅이 이뤄지지 않는 블로그입니다. 문의는 으로 연락주세요.
조회 수 3132 추천 수 0 댓글 0


Prev이전 문서

Next다음 문서

크게 작게 위로 아래로 댓글로 가기 인쇄


Prev이전 문서

Next다음 문서

크게 작게 위로 아래로 댓글로 가기 인쇄


참고  Url 


		td{vertical-align:top;padding:5px 5px 5px 5px;}
	' change the RSSURL variable to the exact URL of the RSS Feed you want to pull
	RSSURL = ""
	Response.write RSSURL
<TABLE border=1>

	Dim objHTTP ' this object is used to call the RSS Feed remotely
	Dim RSSURL,RSSFeed ' these variables hold the URL and Content for the RSS Feed
	Dim xmlRSSFeed ' this variable hold the XML data in a DOM Object
	Dim objItems,objItem, objChild ' these variables are used to temporarily hold data from the various RSS Items
	Dim title,description,link '  these are local variables that will hold the data to be displayed
	Dim OutputHTML_1,OutputHTML_2,OutputHTML_3 ' these variables will hold the HTML that was converted from the RSS Feed

	' this code requests the raw RSS/XML and saves the response as a string <RSSFeed>
	Set objHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP") "GET",RSSURL,false
	RSSFeed = objHTTP.responseText

	' this code takes the raw RSSFeed and loads it into an XML Object
	Set xmlRSSFeed = Server.CreateObject("MSXML2.DomDocument.4.0")
	xmlRSSFeed.async = false

	' this code disposes of the object we called the feed with
	Set objHTTP = Nothing

	' this is where you determine how to display the content from the RSS Feed

	' this code grabs all the "items" in the RSS Feed
	Set objItems = xmlRSSFeed.getElementsByTagName("item")

	' this code disposes of the XML object that contained the entire feed
	Set xmlRSSFeed = Nothing

	' loop over all the items in the RSS Feed
	For x = 0 to objItems.length - 1
		' this code places the content from the various RSS nodes into local variables
		Set objItem = objItems.item(x)
		For Each objChild in objItem.childNodes
			Select Case LCase(objChild.nodeName)
				Case "title"
					  title = objChild.text
				Case "link"
					  link = objChild.text
				Case "description"
					  description = objChild.text
			End Select
		' Here are some various display samples.
		Response.write"<TR><TD><a href=""" & link & """>" & title & "</a></TD></TR>"
		Response.write"<TR><TD>Content Url :" & link &" Content :  " & description & "</TD></TR>"

  1. 변수 ByRef , ByVal

    Date2015.12.07 Bykay Views1287
    Read More
  2. IIS에서 ASP 날짜 형식 YYYY-MM-DD

    Date2015.08.24 Bykay Views1364
    Read More
  3. ASP 에러 체크

    Date2014.11.20 Bykay Views1819
    Read More
  4. 이미지 사이즈 컴포넌트 "pakImage"

    Date2014.10.20 Bykay Views1450
    Read More
  5. 엑셀 다운로드 시 한글 파일명 깨짐 해결

    Date2014.08.07 Bykay Views2636
    Read More
  6. [펌] Request.Form , Request.QueryString 값 확인하기

    Date2014.06.12 Bykay Views1733
    Read More
  7. response.Cookie Collection , 쿠키 만료일 미지정시 만료일은?

    Date2014.02.20 Bykay Views2937
    Read More
  8. UTF-8 URLDecode 함수

    Date2014.01.28 Bykay Views2881
    Read More
  9. Excel 파일(.xlsx) 읽어서 디비에 넣기

    Date2013.12.08 Bykay Views24885
    Read More
  10. 오늘 본 상품 쿠키로 처리하기

    Date2013.09.13 Bykay Views3964
    Read More
  11. ASP 함수 " HTML 태그 제거하기"

    Date2013.07.31 Bykay Views2467
    Read More
  12. ADODB.Stream + ASP에서 파일 다운로드

    Date2013.06.18 Bykay Views3929
    Read More
  13. ASPFTP - 컴포넌트를 이용한 ASP 에서 FTP 사용하기

    Date2013.06.13 Bykay Views5154
    Read More
  14. ASP 에서 RSS 가져와서 파싱하기

    Date2013.05.22 Bykay Views3132
    Read More
  15. http를 이용한 xml 호출 및 파싱 ( MSXML2.DomDocument )

    Date2013.05.20 Bykay Views3764
    Read More
  16. 문자열 거꾸로 strReverse

    Date2013.05.13 Bykay Views2410
    Read More
  17. asp Json 데이터 받기

    Date2013.04.02 Bykay Views9532
    Read More
  18. 동적 변수 선언 및 프로그래밍 " eval , Execute "

    Date2013.03.29 Bykay Views4748
    Read More
Board Pagination Prev 1 Next
/ 1