Asp에서 Xml을 동작시키기 위해 세련된 클래스를 작성했습니다. 아래 예시가 있습니다. App.xml로 저장하고 asp 파일과 같은 디렉토리에 넣어주세요!
다음과 같이 코드 코드를 복사합니다.
<?xml 버전=1.0 인코딩=utf-8?>
<루트>
<소개>
<버전>1.0 베타</버전>
<LatestVersion>1.0 베타</LatestVersion>
<저자>저자</저자>
<PubDate>2010/02/20</PubDate>
</정보>
<구성>
<설치>거짓</설치>
<BakPath>_Data</BakPath>
</구성>
</루트>
Asp 클래스와 사용방법은 다음과 같습니다. test.asp로 저장하여 테스트해 보세요.
다음과 같이 코드 코드를 복사합니다.
<%
ClassAppConfig
DimXmlDom
비공개 하위 클래스_Initialize()
XmlDom = Server.createobject(microsoft.xmldom)로 설정
XmlDom.load(Server.mappath(App.xml))
서브 끝
비공개 하위 클래스_Terminate()
XmlDom = 없음으로 설정
서브 끝
함수 GetD(키)
GetD =XmlDom.getElementsByTagName(키)(0).text
기능 종료
함수 SetD(키,발)
XmlDom.getElementsByTagName(key)(0).text = val
XmlDom.save(Server.mappath(App.xml))
기능 종료
함수 AddD(노드,키,발)
newnode=XmlDom.getElementsByTagName(노드)(0).appendchild(XmlDom.createelement(key)) 설정
newnode.text = 발
newnode=아무것도 설정하지 않음
XmlDom.save(Server.mappath(App.xml))
기능 종료
기능 DelD(키)
오류 발생 시 다음 재개
XmlDom.getElementsByTagName(key)(0).parentNode.removechild(XmlDom.getElementsByTagName(key)(0))
XmlDom.save(Server.mappath(App.xml))
기능 종료
수업 종료
구성 설정 = 새 AppConfig
wn Config.GetD(버전)
wn Config.GetD(최신 버전)
wn Config.GetD(저자)
wn Config.GetD(PubDate)
wn Config.GetD(설치됨)
wn Config.GetD(BakPath)
' [추가/편집/삭제] 노드의 효과를 보려면 해당 주석을 제거하십시오.
'Config.AddD(Config,test,test) 호출' 노드 추가
'Call Config.SetD(test,test2)' 노드 편집
'Call Config.DelD(test)' 노드 삭제
하위 wn(str)
응답.쓰기(str)&<br />&vbcrlf
서브 끝
%>
아주 보편적이지는 않지만, 기본적으로 노드를 추가/삭제/수정할 수 있는 상황에서는 충분합니다.