<%
set xmlDoc=server.createObject("Microsoft.XMLDOM")
set uusLeht=xmlDoc.createNode("Element", "teated", "")
xmlDoc.appendChild uusLeht
set uusLeht=xmlDoc.createNode(1, "teade", "")
uusLeht.text="Oota 20 minutit" & vbCrLf
xmlDoc.documentElement.appendChild uusleht
set uusLeht=xmlDoc.createNode(1, "teade", "")
uusLeht.text="Oota 10 minutit" & vbCrLf
xmlDoc.documentElement.appendChild uusleht
set uusLeht=xmlDoc.createNode(1, "teade", "")
uusLeht.text="Head lugemist!" & vbCrLf
xmlDoc.documentElement.appendChild uusleht
response.write xmlDoc.xml
%>