XSLT - Rediger XML

Data gemt i XML-filer kan redigeres via en internett浏览器.

Åbn, rediger og gem XML

Nu vil vi vise dig, hvordan du åbner, redigerer og gemmer XML-filer, der gemmes på serveren.

Vi vil bruge XSL til at konvertere XML-dokumenter til en HTML-formular. Værdierne af XML-elementer vil blive skrevet til HTML-indtastningsfeltet i formularen. Denne formular er redigerbar. Når den er redigeret, vil dataene blive sendt tilbage til serveren, og XML-filen opdateres (dette udføres af ASP).

XML-filen og XSL-filen

Først, se på den XML-dokument, der bruges ("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>

Se XML-filen.

Dernæst, se på den nedenstående stilskabelon ("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>Verktøjsinformation (rediger):</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>

Se XSL-fil.

Denne XSL-fil vil gennemgå elementerne i XML-filen og oprette en input-felt for hver XML "field"-element. Værdien af id-attributten på field-elementet tilføjes til hver HTML input-felts id- og name-attributter. Værdien af "value"-elementet tilføjes til hver HTML input-felts value-attribut. Resultatet er en redigerbar HTML-formular, der indeholder værdierne fra XML-filen.

Dernæst har vi den anden stil: "tool_updated.xsl". Denne XSL-fil bruges til at vise de opdaterede XML-data. Denne stil uddeler ikke en redigerbar HTML-formular, men en statisk 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>Opdateret værktøjsinformation:</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>

Se XSL-fil.

ASP-fil

I filen "tool.xsl" er værdien af HTML-formens action-attribut "edittool.asp".

"edittool.asp"-siden indeholder to funktioner: loadFile() indlæser og omdanner XML-filen, updateFile() opdaterer XML-filen:

<%
function loadFile(xmlfile,xslfile)
Dim xmlDoc,xslDoc
Indlæs XML-filen
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)
Indlæs XSL fil
set xslDoc = Server.CreateObject("Microsoft.XMLDOM")
xslDoc.async = false
xslDoc.load(xslfile)
Omdan fil
Response.Write(xmlDoc.transformNode(xslDoc))
end function
function updateFile(xmlfile)
Dim xmlDoc,rootEl,f
Dim i
Indlæs XML-filen
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)
Sæt rootEl til at være rod-elementet
Set rootEl = xmlDoc.documentElement
Gennemløb form-samlingen
for i = 1 To Request.Form.Count
   Fjern elementerne i formularen, der er knapper
   if instr(1,Request.Form.Key(i),"btn_")=0 then
   selectSingleNode-metoden kan søge efter en enkelt node i en XML-fil, der matcher en bestemt forespørgsel.
   Denne forespørgsel vil anmode om value-elementet, som er et underelement af field-elementet,
   Dette field-element har en id-attribut, der kan matche det aktuelle key-værdi i formularen.
   Hvis der findes en match, sæt text-attributten til værdien af det aktuelle felt i formularen.
   set f = rootEl.selectSingleNode("field[@id='" & _
   Request.Form.Key(i) & "/value")
   f.Text = Request.Form(i)
   end if
next
Gem den ændrede XML-fil
xmlDoc.save xmlfile
Frigiv alle objektreferencer
set xmlDoc=nothing
set rootEl=nothing
set f=nothing
Lad en stilskabelon indlæse den ændrede XML-fil, så klienten kan se de redigerede oplysninger
loadFile xmlfile,server.MapPath("tool_updated.xsl")
end function
Hvis formularen allerede er blevet indsendt, opdater XML-filen og vis resultaterne, ellers konverter denne XML-fil til redigering
if Request.Form("btn_sub")="" then
loadFile server.MapPath("tool.xml"),server.MapPath("tool.xsl")
else
updateFile server.MapPath("tool.xml")
end if
%>

Tip:Hvis du ikke kender til at skrive ASP, så lær voresASP tutorial》。

Bemærk:Vi konverterer og opdaterer XML-filerne, der er placeret på serveren. Dette er en platformuafhængig løsning. Klienten kan kun få HTML, der returneres fra serveren, og HTML kan køres i enhver browser.