XSLT - XML Bewerken

Data opgeslagen in XML-bestanden kunnen worden bewerkt via een internetbrowser.

Openen, bewerken en opslaan van XML

Nu zullen we je laten zien hoe je XML-bestanden op de server kunt openen, bewerken en opslaan.

We zullen laten zien hoe je een XML-document kunt converteren naar een HTML-formulier met behulp van XSL. De waarden van XML-elementen worden geschreven naar HTML-inputvelden in het formulier. Dit formulier is bewerkbaar. Na het bewerken worden de gegevens teruggestuurd naar de server en wordt het XML-bestand bijgewerkt (deze taak wordt uitgevoerd door ASP).

XML-bestand en XSL-bestand

Eerst en vooral, zie het te gebruiken XML-document ("tool.xml"):

<?xml version="1.0" encoding="ISO-8859-1"?>
<tool>
  <field id="prodName">
    <value>HAMMER HG2606</value> 
  </field>
  <field id="prodNo">
    <value>32456240</value> 
  </field>
  <field id="price">
    <value>$30.00</value> 
  </field>
</tool>

Bekijk XML-bestand.

Vervolgens, zie onderstaande stijltafel ("tool.xsl"):

<?xml version="1.0" encoding="ISO-8859-1"?>
<xsl:stylesheet version="1.0"
xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:template match="/">
<html>
<body>
<form method="post" action="edittool.asp">
<h2>Tool Information (edit):</h2>
<table border="0">
<xsl:for-each select="tool/field">
<tr>
<td>
<xsl:value-of select="@id"/>
</td>
<td>
<input type="text">
<xsl:attribute name="id">
  <xsl:value-of select="@id" />
</xsl:attribute>
<xsl:attribute name="name">
  <xsl:value-of select="@id" />
</xsl:attribute>
<xsl:attribute name="value">
  <xsl:value-of select="value" />
</xsl:attribute>
</input> 
</td>
</tr>
</xsl:for-each>
</table>
<br />
<input type="submit" id="btn_sub" name="btn_sub" value="Submit" />
<input type="reset" id="btn_res" name="btn_res" value="Reset" />
</form>
</body>
</html>
</xsl:template>
</xsl:stylesheet>

Bekijk het XSL-bestand.

Dit XSL-bestand loopt door de elementen in het XML-bestand en maakt voor elk XML "field"-element een invoerveld aan. De waarde van de id-eigenschap van het field-element wordt toegevoegd aan de id- en name-eigenschappen van elk HTML-invoerveld. De waarde van het "value"-element wordt toegevoegd aan de "value"-eigenschap van elk HTML-invoerveld. Het resultaat is een bewerkbare HTML-formulier met de waarden uit het XML-bestand.

Daarnaast hebben we nog een tweede stijlblad: "tool_updated.xsl". Dit XSL-bestand wordt gebruikt om de bijgewerkte XML-data weer te geven. Dit stijlblad geeft geen bewerkbare HTML-formulieren weer, maar een statische HTML-tabel:

<?xml version="1.0" encoding="ISO-8859-1"?>
<xsl:stylesheet version="1.0"
xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:template match="/">
<html>
<body>
<h2>Geüpdateerde Tool Informatie:</h2>
<table border="1">
<xsl:for-each select="tool/field">
<tr>
<td><xsl:value-of select="@id" /></td>
<td><xsl:value-of select="value" /></td>
</tr>
</xsl:for-each>
</table>
</body>
</html>
</xsl:template>
</xsl:stylesheet>

Bekijk het XSL-bestand.

ASP-bestand

In het "tool.xsl" bestand is de waarde van de action-eigenschap van de HTML-formulier de "edittool.asp".

De "edittool.asp" pagina bevat twee functies: loadFile() om XML-bestanden te laden en te converteren, en de updateFile() functie om XML-bestanden bij te werken:

<%
function loadFile(xmlfile,xslfile)
Dim xmlDoc,xslDoc
Het XML-bestand laden
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)
Het XSL-bestand laden
set xslDoc = Server.CreateObject("Microsoft.XMLDOM")
xslDoc.async = false
xslDoc.load(xslfile)
Het bestand omzetten
Response.Write(xmlDoc.transformNode(xslDoc))
end function
function updateFile(xmlfile)
Dim xmlDoc,rootEl,f
Dim i
Het XML-bestand laden
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)
De variabele rootEl instellen op de root-element
Set rootEl = xmlDoc.documentElement
Het formuliercollectief doorlopen
for i = 1 To Request.Form.Count
   De knoppen in het formulier verwijderen
   if instr(1,Request.Form.Key(i),"btn_")=0 then
   De selectSingleNode-methode kan een enkele knoop in een XML-bestand met een bepaalde query vinden.
   Deze query vraagt om het value-element, dat een onderdeel is van het field-element,
   En deze field-element heeft een id-eigenschap die kan worden overeengekomen met de huidige key-waarde in het formulier.
   Als er een overeenkomst bestaat, stel dan de text-eigenschap in op de waarde van het huidige veld in het formulier.
   set f = rootEl.selectSingleNode("field[@id='" & _
   Request.Form.Key(i) & "]/value")
   f.Text = Request.Form(i)
   end if
next
Het aangepaste XML-bestand opslaan
xmlDoc.save xmlfile
Alleen de objectverwijzingen vrijgeven
set xmlDoc=nothing
set rootEl=nothing
set f=nothing
Door een sjabloon een aangepaste XML-bestand te laden, kan de client de gewijzigde informatie zien
loadFile xmlfile,server.MapPath("tool_updated.xsl")
end function
Als het formulier is ingediend, update dan het XML-bestand en toon de resultaten, als het niet is ingediend, convert dan dit XML-bestand voor het bewerken
if Request.Form("btn_sub")="" then
loadFile server.MapPath("tool.xml"),server.MapPath("tool.xsl")
else
updateFile server.MapPath("tool.xml")
end if
%>

Tip:Als je niet weet hoe je ASP kunt schrijven, leer dan onzeASP Handleiding。】

Opmerking:We zijn bezig met het omzetten en bijwerken van XML-bestanden die zich op de server bevinden. Dit is een cross-platform oplossing. De client kan alleen HTML ontvangen van de server, dat op elke browser kan draaien.