XSLT - redigera XML

Data som lagras i XML-filer kan redigeras via en internetwebbläsare.

Öppna, redigera och spara XML

Nu kommer vi att visa hur du öppnar, redigerar och sparar XML-filer som lagras på servern.

Vi kommer att använda XSL för att konvertera en XML-dokument till en HTML-formulär. Värdet för XML-elementen kommer att skrivas till HTML-inmatningsfältet i formuläret. Detta formulär är redigerbart. Efter att det har redigerats kommer data att skickas tillbaka till servern, och XML-filen kommer att uppdateras (denna del utförs av ASP).

XML-filen och XSL-filen

Först, titta på den XML-dokument som kommer att användas ("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>

Visa XML-filen.

Sedan, titta på följande stilark("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>Verktygsinformation (redigera):</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="Skicka" />
<input type="reset" id="btn_res" name="btn_res" value="Återställ" />
</form>
</body>
</html>
</xsl:template>
</xsl:stylesheet>

Visa XSL-fil.

Denna XSL-fil kommer att cykla igenom elementen i XML-filen och skapa en inmatningsfält för varje "field"-element i XML:en. Värdet för id-attributet på field-elementet läggs till i id- och name-attributen för varje HTML-inmatningsfält. Värdet för "value"-elementet läggs till i "value"-attributet för varje HTML-inmatningsfält. Resultatet är en redigerbar HTML-formulär som innehåller värden från XML-filen.

Därefter har vi en andra stil: "tool_updated.xsl". Denna XSL-fil kommer att användas för att visa uppdaterade XML-data. Denna stil skriver inte ut redigerbara HTML-formulär, utan en statisk HTML-tabell:

<?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>Uppdaterad verktygsinformation:</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>

Visa XSL-fil.

ASP-fil

I filen "tool.xsl", HTML-formulärets action-attribut är värdet "edittool.asp".

"edittool.asp"-sida innehåller två funktioner: loadFile() laddar och konverterar XML-fil, updateFile() fungerar uppdaterar XML-fil:

<%
function loadFile(xmlfile,xslfile)
Dim xmlDoc,xslDoc
ladda XML-filen
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)
ladda XSL-fil
set xslDoc = Server.CreateObject("Microsoft.XMLDOM")
xslDoc.async = false
xslDoc.load(xslfile)
översätt fil
Response.Write(xmlDoc.transformNode(xslDoc))
sluta funktion
function updateFile(xmlfile)
Dim xmlDoc,rootEl,f
Dim i
ladda XML-filen
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)
sätt rootEl till varje element
Set rootEl = xmlDoc.documentElement
genomgå form-samlingen
för i = 1 Till Request.Form.Count
   ta bort elementen i formuläret som är knappar
   om instr(1,Request.Form.Key(i),"btn_")=0 då
   selectSingleNode-metoden kan söka efter en specifik nod i en XML-fil som matchar en viss fråga
   denna sökning kommer att begära value-elementet, vilket är ett underelement av field-elementet
   denna field-element har en id-attribut som kan matcha det aktuella key-värdet i formuläret
   om det finns en match, sätt text-attributet till värdet för det aktuella fältet i formuläret
   set f = rootEl.selectSingleNode("field[@id='" & _
   Request.Form.Key(i) & "/value")
   f.Text = Request.Form(i)
   end if
nästa
spara den redigerade XML-filen
xmlDoc.save xmlfile
frigör alla objektreferenser
set xmlDoc=nothing
set rootEl=nothing
set f=nothing
ladda en redigerad XML-fil med en stiltabell, så att klienten kan se de redigerade informationerna
loadFile xmlfile,server.MapPath("tool_updated.xsl")
sluta funktion
om formuläret redan har skickats in, uppdatera XML-filen och visa resultaten, om det inte har skickats in, konvertera denna XML-fil för redigering
om Request.Form("btn_sub")="" då
loadFile server.MapPath("tool.xml"),server.MapPath("tool.xsl")
annan
updateFile server.MapPath("tool.xml")
end if
%>

Tips:Om du inte känner till hur man skriver ASP, lär dig vårASP handledning》。

Kommentar:Vi konverterar och uppdaterar XML-filer som finns på servern. Detta är en plattformsoberoende lösning. Klienten kan endast få HTML som returneras från servern - och HTML kan köras i alla webbläsare.