XSLT - XMLの編集

XMLファイルに保存されたデータはインターネットブラウザで編集できます。

XMLを開き、編集し、保存する

今、サーバーに保存されているXMLファイルを開き、編集し、保存する方法をお見せします。

私たちはXSLを使用してXMLドキュメントをHTMLフォームに変換します。XML要素の値はHTMLフォームのHTML入力フィールドに書き込まれます。このフォームは編集可能です。編集が完了すると、データがサーバーに送信され、XMLファイルが更新されます（これらはASPで実行されます）。

XML ファイルと XSL ファイル

まず、使用される XML 文書（"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>

XML ファイルを確認

次に、以下のスタイルシート（"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>ツール情報（編集）：</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="提出" />
<input type="reset" id="btn_res" name="btn_res" value="リセット" />
</form>
</body>
</html>
</xsl:template>
</xsl:stylesheet>

XSL ファイルの確認

この XSL ファイルは XML ファイル内の要素をループして巡回し、各 XML "field" 要素にインプットフィールドを作成します。field 要素の id 属性の値が各 HTML インプットフィールドの id と name 属性に追加されます。"value" 要素の値が各 HTML インプットフィールドの "value" 属性に追加されます。結果として、XML ファイル内の値を含む編集可能な HTML フォームを取得できます。

次に、第2つのスタイルシートがあります：「tool_updated.xsl」。この XSL ファイルは更新された XML データを表示するために使用されます。このスタイルシートは編集可能な HTML フォームを出力せず、静的な HTML テーブルを出力します。

<?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>更新されたツール情報：</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>

XSL ファイルの確認

ASP ファイル

「tool.xsl」ファイルでは、HTML フォームの action 属性の値が「edittool.asp」です。

"edittool.asp" ページには 2つの関数が含まれています：loadFile() は XML ファイルを読み込みおよび変換し、updateFile() は XML ファイルを更新します：

<%
function loadFile(xmlfile,xslfile)
Dim xmlDoc,xslDoc
「XMLファイルをロードします」
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)
XSL ファイルの読み込み
set xslDoc = Server.CreateObject("Microsoft.XMLDOM")
xslDoc.async = false
xslDoc.load(xslfile)
ファイル変換
Response.Write(xmlDoc.transformNode(xslDoc))
end function
function updateFile(xmlfile)
Dim xmlDoc,rootEl,f
Dim i
「XMLファイルをロードします」
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)
「rootEl変数を根要素に設定します」
Set rootEl = xmlDoc.documentElement
「フォームセットをループします」
for i = 1 To Request.Form.Count
   「フォーム内のボタン要素を除きます」
   if instr(1,Request.Form.Key(i),"btn_")=0 then
   「selectSingleNodeメソッドは、特定のクエリに一致するXMLファイル内の単一のノードをクエリします」
   「このクエリはvalue要素を要求し、value要素はfield要素の子要素です」
   「このfield要素はフォームセット内の現在のkey値と一致するid属性を持っています」
   「一致する場合がある場合、text属性をフォームセット内の現在のフィールドの値に設定します」
   set f = rootEl.selectSingleNode("field[@id='" & _
   Request.Form.Key(i) & "/value")
   f.Text = Request.Form(i)
   end if
next
「修正されたXMLファイルを保存します」
xmlDoc.save xmlfile
「すべてのオブジェクトの参照を解放します」
set xmlDoc=nothing
set rootEl=nothing
set f=nothing
「修正されたXMLファイルをスタイルシートで読み込んで、クライアントが編集した情報を確認できるようにします」
loadFile xmlfile,server.MapPath("tool_updated.xsl")
end function
「もしフォームが既に送信された場合、XMLファイルを更新して結果を表示します。送信されていない場合、編集用にこのXMLファイルを変換します」
if Request.Form("btn_sub")="" then
loadFile server.MapPath("tool.xml"),server.MapPath("tool.xsl")
else
updateFile server.MapPath("tool.xml")
end if
%>

ヒント：ASPを書く方法がわからない場合は、私たちの「ASP 教程》。

注記：サーバー上に存在するXMLファイルを変換および更新しています。これはプラットフォームに依存しないソリューションです。クライアントはサーバーから返されるHTMLのみを取得できますが、HTMLはどんなブラウザでも動作します。