<!-- Collection of code snippets by Arne Vajhøj -->
<!-- posted to eksperten.dk, usenet and other places (2002-now) -->
<%
Set doc = Server.CreateObject("Microsoft.XMLDOM")
doc.Async = False
doc.Load(Server.MapPath("gallery.xml")) 
doc.Save(Response)
Response.Write doc.SelectSingleNode("//gallery/pic7/@name").Text
doc.SelectSingleNode("//gallery/pic7/@name").Text = "noget andet"
doc.Save(Response)
%>