ASP로 XML페이지 만들기

이번에 rtTour라는 프로그램을 만들면서
구글맵모바일(GMM)에 kml파일로 정보를 전달해 줘야할 일이 생겼다.

그래서 인터넷으로 이곳저곳을 돌아다니며
ASP로 XML페이지 만드는 법을 찾아보았다.

역시 한군데에서 쉽게 얻어지지는 않았다.

물론 지금 이 글 역시
다른 환경의 다른 사람에게는 속시원하게 한번에 설명이 되지는 않을것 이지만

아무튼
내가 성공한 방법을 이곳에 정리해 보도록 한다.

=====================================================================================
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> '-->자신의 페이지 설정에 맞게
<%
response.charset = "utf-8" '--->자신의 페이지 설정에 맞게

'XML-DOM 프로젝트선언
dim XMLObj
set XMLObj = Server.CreateObject("Microsoft.XMLDOM")

'각 노드와 Attribute 수만큼 변수선언
dim nRoot, nRid, nFst

'<Root>라는 노드 정의
set nRoot = XMLObj.CreateElement("Root")

'<Root>라는 노드를 최상위 노드로 생성
'최상위 노드는 하나만 생성해야 함.
XMLObj.AppendChild(nRoot)

'<Root>라는 노드에 id="horangi" 라는 Attribute를 정의 --><Root id="horangi">.....</Root>
set nRid = XMLObj.createAttribute("id")
nRid.text = "horangi"

'id Attribute를 Root노드에 삽입
nRoot.setAttributeNode nRid

'<first>라는 노드 정의
set nFst = XMLObj.CreateElement("first")

'<first>라는 노드에 내용 정의 --><first>주저리주저리</first>
nFst.text = "주저리주저리"

'<first>노드를 <Root>안에 삽입.
nRoot.AppendChild(nFst)


'본격적으로 위에 정의한 내용을 xml페이지로 작성
response.contentType = "text/xml"

response.write "<?xml version=""1.0"" encoding=""utf-8""?>"
response.write XMLObj.xml
%>
==============================================================================

위처럼 작성하여 xxx.asp로 저장한뒤 서버에 올려놓고 접속을 하면
(예 - http://xxx.com/xxx.asp)
다음과같이 정상적으로 XML페이지로 표기가 된다.

<?xml version="1.0" encoding="utf-8" ?> - - <Root id="horangi">       <first>주저리주저리</first>   </Root>