<%
 '1. view.asp 의 hidden 필드의 seq값 읽기
  seq = request.Form("seq")

  Dim DOMDoc
  Dim searchPath
  Dim board
  Dim boardlist

 '2. board.xml 문서 로드
  Set DOMDoc = server.CreateObject("Msxml2.DOMDocument")
  DOMDoc.async = False
  DOMDoc.load(server.mapPath("board.xml"))

 '3.루트 엘리먼트(boardlist) 읽기 : DOMDoc.documentElement
  Set boardlist = DOMDoc.documentElement
 
 '4.xml문서의 seq 속성의 값이 넘어온 seq 값과 같은 board 노드 읽기 : DOMDoc.selectSingleNode("//board[@seq=3]")
searchPath = "//board[@seq='"&Trim(seq)&"']"
Set boardNode = DOMDoc.selectSingleNode(searchPath)

'5.boardlist에서 해당 board 노드 삭제하기 :부모노드.removeChild(삭제하려는 노드)
boardlist.removeChild(boardNode)
'6.board.xml 문서 저장하기 :DOMDoc.save()
DOMDoc.save(server.mapPath("board.xml"))
%>
<script language="javascript">
<!--
 alert("삭제되었습니다.")
 location.href="list.asp";
//-->
</script>