 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
在 http://www.asptoday.com/articles/20000724.htm 有异常好的例子，是关于 使用 xsl 对 xml 文档进行动态排序，分页显示的。 主要使用三个文件： default.asp 把 xml, xsl 文件串起来 getxml.asp 对 default 来说相称于 xml sample.xsl 主要的格式编排工作在这里做 =================================================== 我们可以再进一步拓展这个巨酷的例子： 1。把 getxml.asp 写好。但我们的真正工作不在 asp 里做。我们用 vb。 这样一会我们就可以把这个贴子一稿多投到 VB 论坛。 形如： <%@ Language=VBScript %> 2。 在 VB 中我们使用 SQL 2000 的 for XML 来得到所需的 XML String。 Public Function GetData() As Variant Dim oConn As ADODB.Connection Dim oCmd As Command Dim oRS As ADODB.Recordset Dim myStream As ADODB.Stream \\'Dim strConn As String Dim strXML As String Set oConn = New ADODB.Connection oConn.Open (GetConnectionString) Set oCmd = New ADODB.Command oCmd.ActiveConnection = oConn Set myStream = New ADODB.Stream myStream.Open oCmd.Properties("Output Stream") = myStream oCmd.CommandText = "SELECT EmployeeID, LastName, FirstName, BirthDate, Notes " & _ "FROM Employees FOR XML auto" oCmd.Execute , , adExecuteStream myStream.Position = 0 strXML = myStream.ReadText strXML = " GetData = strXML Set oCmd = Nothing oConn.Close Set oConn = Nothing End Function ============================= 有两点要注重，一是 sql for xml auto 比较土，我们需要自己加上个 root。 二是我使用 GetConnectionString 获得 sql conn str 是因为把该 str 放在了 COM+ Construction string 里。这样一会我们就可以把这个贴子一稿多投到 COM 论坛和多层结构论坛，还有安全性论坛，当然还有 SQL 论坛。 我们只需要对 sample.xsl 稍作修改就可以显示我们的数据了。 返回类别: 教程 上一教程: 把数据转变成XML格式的好处 下一教程: 使用XML DOM生成XML(1) 您可以阅读与"使用 xsl 对 xml 文档进行动态排序，分页显示的扩展"相关的教程: · 使用XSL将XML文档中的CDATA注释输出为HTML文本 · 用XSL显示XML · 数据排序及如何动态排序 · XSLT的简朴使用[XML-->HTML] · 利用XSL和ASP实现XML文档在线编辑 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
