XSLT - تحرير XML
يمكن تحرير البيانات المخزنة في ملفات XML من مستعرض الإنترنت.
فتح وتحرير وحفظ XML
الآن ، سنعرض كيفية فتح ملف XML المخزن على الخادم وتعديله وحفظه.
سنستخدم XSL لتحويل مستند XML إلى نموذج HTML. ستتم كتابة قيم عناصر XML في حقول إدخال HTML في نموذج HTML. نموذج HTML قابل للتحرير. بعد تحرير البيانات ، سيتم إرسال البيانات مرة أخرى إلى الخادم وسيتم تحديث ملف XML (سنعرض رمزًا لكل من PHP و ASP).
ملف XML وملف XSL
أولاً ، ألق نظرة على مستند XML ("tool.xml"):
<?xml version="1.0" encoding="UTF-8"?>
<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>
ثم ألق نظرة على ورقة الأنماط التالية ("tool.xsl"):
<?xml version="1.0" encoding="UTF-8"?>
<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>
يقوم ملف XSL أعلاه بالحلقات عبر العناصر الموجودة في ملف XML وينشئ حقل إدخال واحدًا لكل عنصر "حقل" XML. تتم إضافة قيمة سمة "معرف" عنصر "حقل" XML إلى كل من سمات "معرف" و "الاسم" لكل حقل إدخال HTML. تتم إضافة قيمة كل عنصر "قيمة" في XML إلى سمة "القيمة" لكل حقل إدخال HTML. والنتيجة هي نموذج HTML قابل للتحرير يحتوي على القيم من ملف XML.
بعد ذلك ، لدينا ورقة أنماط ثانية: "tool_updated.xsl". هذا هو ملف XSL الذي سيتم استخدامه لعرض بيانات XML المحدثة. لن ينتج عن ورقة الأنماط هذه نموذج HTML قابل للتحرير ، بل ينتج عنها جدول HTML ثابت:
<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet version="1.0"
xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:template match="/">
<html>
<body>
<h2>Updated Tool Information:</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>
ملف PHP
في ملف "tool.xsl" أعلاه ، قم بتغيير سمة إجراء نموذج HTML إلى "edittool.php".
تحتوي صفحة "edittool.php" على وظيفتين: تقوم الدالة loadFile () بتحميل وتحويل ملف XML للعرض وتطبق وظيفة updateFile () التغييرات على ملف XML:
<?php
function loadFile($xml, $xsl)
{
$xmlDoc = new DOMDocument();
$xmlDoc->load($xml);
$xslDoc = new DOMDocument();
$xslDoc->load($xsl);
$proc = new XSLTProcessor();
$proc->importStyleSheet($xslDoc);
echo $proc->transformToXML($xmlDoc);
}
function updateFile($xml)
{
$xmlLoad = simplexml_load_file($xml);
$postKeys = array_keys($_POST);
foreach($xmlLoad->children() as $x)
{
foreach($_POST as
$key=>$value)
{
if($key ==
$x->attributes())
{
$x->value = $value;
}
}
}
$xmlLoad->asXML($xml);
loadFile($xml,"tool_updated.xsl");
}
if($_POST["btn_sub"] == "")
{
loadFile("tool.xml", "tool.xsl");
}
else
{
updateFile("tool.xml");
}
?>
نصيحة: إذا كنت لا تعرف كيفية كتابة PHP ، فيرجى دراسة برنامجنا التعليمي PHP .
ملاحظة: نقوم بإجراء التحويل وتطبيق التغييرات على ملف XML على الخادم. هذا حل متعدد المستعرضات. سيحصل العميل فقط على HTML من الخادم - والذي سيعمل في أي متصفح.
ملف ASP
يحتوي نموذج HTML في ملف "tool.xsl" أعلاه على سمة إجراء بقيمة "edittool.asp".
تحتوي صفحة "edittool.asp" على وظيفتين: تقوم الدالة loadFile () بتحميل وتحويل ملف XML للعرض وتطبق الوظيفة updateFile () التغييرات على ملف XML:
<%
function loadFile(xmlfile,xslfile)
Dim xmlDoc,xslDoc
'Load XML and XSL file
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)
set xslDoc = Server.CreateObject("Microsoft.XMLDOM")
xslDoc.async = false
xslDoc.load(xslfile)
'Transform file
Response.Write(xmlDoc.transformNode(xslDoc))
end function
function updateFile(xmlfile)
Dim xmlDoc,rootEl,f
Dim i
'Load XML file
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)
'Set the rootEl variable equal to the root element
Set rootEl = xmlDoc.documentElement
'Loop through the form collection
for i = 1 To Request.Form.Count
'Eliminate button elements in the form
if instr(1,Request.Form.Key(i),"btn_")=0 then
'The selectSingleNode method queries the XML file for a single node
'that matches a query. This query requests the value element that is
'the child of a field element that has an id attribute which matches
'the current key value in the Form Collection. When there is a match -
'set the text property equal to the value of the current field in the
'Form Collection.
set f = rootEl.selectSingleNode("field[@id='" & _
Request.Form.Key(i) & "']/value")
f.Text = Request.Form(i)
end if
next
'Save the modified XML file
xmlDoc.save xmlfile
'Release all object references
set xmlDoc=nothing
set rootEl=nothing
set f=nothing
'Load the modified XML file with a style sheet that
'allows the client to see the edited information
loadFile xmlfile,server.MapPath("tool_updated.xsl")
end function
'If form is submitted, update the XML file and display result
' - if not, transform the XML file for editing
if Request.Form("btn_sub")="" then
loadFile server.MapPath("tool.xml"),server.MapPath("tool.xsl")
else
updateFile server.MapPath("tool.xml")
end if
%>