2个XML节点，1个xslt [英] 2 XML nodes, 1 xslt
问题描述
我可以从2个XML源中绘制，结构与包含在1 xslt中的数据完全相同，使用数学来添加一些结构，并显示
其他作为节点1和节点2？这个数据是来自梭子鱼垃圾邮件服务器的XML
已经增长到2.
这是我抽签的剪辑。
进口系统
进口System.IO
进口System.Net
进口System.Xml
Imports System.Xml.Xsl
Imports System.Xml.XPath
Partial Class _Default
继承System.Web。 UI.Page
受保护的子Page_Load（ByVal发送者为对象，ByVal e As
System.EventArgs）处理Me.Load
Dim xslSetting As New Xsl.XsltSettings（False，True）
Dim xmldoc As XmlDocument = New XmlDocument（）
Dim xsldoc As XslCompiledTransform = New Xsl。 XslCompiledTransform（）
''Dim xmlUsername As String =""
''Dim xmlPassword As String =""
Dim outString As String =""
Dim cudaServer As String =
" http：//xxx.xxx.xxx.xxxx/cgi-bin/stats.cgi ？"
Dim xslServer As String =" cstats.xslt"
Dim _webRequest As WebRequest
Dim _webResponse As WebResponse
Dim _streamRead As StreamReader
Dim _streamReceived As Stream
Dim _streamEncoding As Encoding
Dim _pageResponse As String
尝试
_pageResponse =""
_webRequest = System.Net.WebRequest.Create（cudaServer）
' '_webRequest.Timeout = 500 * 1000''默认5分钟
_webResponse = _webRequest.GetResponse
_streamReceived = _webResponse.GetResponseStream
_streamEncoding = System .Text.Encoding.GetEncoding（" utf-8"）
_streamRead = New System.IO.StreamReader（_streamReceived，
_streamEncoding）
_pageResponse = _streamRead.ReadToEnd（）
如果_pageResponse.Length 0那么
outString = _pageResponse
xmldoc.LoadXml（_pageResponse）
xsldoc.Load（Server.MapPath（xslServer））''，xslSetting，New
XmlUrlResolver）
Xml1.DocumentContent = xmldoc.InnerXml
Xml1.TransformSource = Server.MapPath（xslServer）
结束如果
如果不是_webResponse什么都没有呢
_webResponse.Close（）
结束如果
Catch ex As Exception
扔出去
结束尝试
结束子
结束课
谢谢
杰夫
Can I draw from 2 XML sources, the structure is exactly the same execpt for
data contained into 1 xslt using math to add some structrure, and displaying
others as node 1 and node 2? This data is XML from a Barracuda Spam server
that has grown to 2.
Here is a snip from my form draw.
Imports System
Imports System.IO
Imports System.Net
Imports System.Xml
Imports System.Xml.Xsl
Imports System.Xml.XPath
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load
Dim xslSetting As New Xsl.XsltSettings(False, True)
Dim xmldoc As XmlDocument = New XmlDocument()
Dim xsldoc As XslCompiledTransform = New Xsl.XslCompiledTransform()
''Dim xmlUsername As String = ""
''Dim xmlPassword As String = ""
Dim outString As String = ""
Dim cudaServer As String =
"http://xxx.xxx.xxx.xxxx/cgi-bin/stats.cgi?"
Dim xslServer As String = "cstats.xslt"
Dim _webRequest As WebRequest
Dim _webResponse As WebResponse
Dim _streamRead As StreamReader
Dim _streamReceived As Stream
Dim _streamEncoding As Encoding
Dim _pageResponse As String
Try
_pageResponse = ""
_webRequest = System.Net.WebRequest.Create(cudaServer)
''_webRequest.Timeout = 500 * 1000 ''Default 5 minutes
_webResponse = _webRequest.GetResponse
_streamReceived = _webResponse.GetResponseStream
_streamEncoding = System.Text.Encoding.GetEncoding("utf-8")
_streamRead = New System.IO.StreamReader(_streamReceived,
_streamEncoding)
_pageResponse = _streamRead.ReadToEnd()
If _pageResponse.Length 0 Then
outString = _pageResponse
xmldoc.LoadXml(_pageResponse)
xsldoc.Load(Server.MapPath(xslServer)) '', xslSetting, New
XmlUrlResolver)
Xml1.DocumentContent = xmldoc.InnerXml
Xml1.TransformSource = Server.MapPath(xslServer)
End If
If Not _webResponse Is Nothing Then
_webResponse.Close()
End If
Catch ex As Exception
Throw ex
End Try
End Sub
End Class
Thanks
Jeff
推荐答案
我看到我使用了节点表达得很厉害。我有2张单独的XML表格
来自2个不同的服务器。对不起。 XML greenhorn在这里。
" Jeff Uchtman" < uc ***** @ megavision.com写信息
news：u5 **************** @ TK2MSFTNGP04.phx.gbl ...
I see I used the "node" expression incorretly. I have 2 seperate XML sheets
coming from 2 different servers. Sorry for that. XML greenhorn here.
"Jeff Uchtman" <uc*****@megavision.comwrote in message
news:u5****************@TK2MSFTNGP04.phx.gbl...
我可以从2个XML源绘制，结构与execpt完全相同
包含在1 xslt中的数据使用数学来添加一些结构，和
将其他人显示为节点1和节点2？这个数据是来自Barracuda
垃圾邮件服务器的XML，已经增长到2.
这是我抽签的剪辑。
进口系统
进口System.IO
进口System.Net
进口System.Xml
Imports System.Xml.Xsl
Imports System.Xml.XPath
Partial Class _Default
继承System.Web。 UI.Page
受保护的子Page_Load（ByVal发送者为对象，ByVal e As
System.EventArgs）处理Me.Load
Dim xslSetting As New Xsl.XsltSettings（False，True）
Dim xmldoc As XmlDocument = New XmlDocument（）
Dim xsldoc As XslCompiledTransform = New Xsl。 XslCompiledTransform（）
''Dim xmlUsername As String =""
''Dim xmlPassword As String =""
Dim outString As String =""
Dim cudaServer As String =
" ; http：//xxx.xxx.xxx.xxxx/cgi-bin/stats.cgi？"
Dim xslServer As String =" cstats.xslt"
Dim _webRequest As WebRequest
Dim _webResponse As WebResponse
Dim _streamRead As StreamReader
Dim _streamReceived As Stream
Dim _streamEncoding As Encoding
Dim _pageResponse As String
尝试
_pageResponse =""
_webRequest = System.Net.WebRequest.Create（cudaServer）
''_ webRequest.Timeout = 500 * 1000''默认5分钟
_webResponse = _webRequest.GetResponse
_streamReceived = _webResponse.GetResponseStream
_streamEncoding = System.Text.Encoding.GetEncoding（" utf-8"）
_streamRead =新的System.IO.StreamReader（_streamReceived，
_streamEncoding）
_pageResponse = _streamRead.ReadToEnd（）
如果_pageResponse.Length 0那么
outString = _pageResponse
xmldoc.LoadXml（_pageResponse）
xsldoc.Load（Server.MapPath（xslServer））''，xslSetting，New
XmlUrlResolver ）
Xml1.DocumentContent = xmldoc.InnerXml
Xml1.TransformSource = Server.MapPath（xslServer）
结束如果
如果不_webResponse什么都没有那么
_webResponse.Close（）
结束如果
Catch ex As Exception
抛出ex
结束尝试
结束子
结束班
谢谢
杰夫
Can I draw from 2 XML sources, the structure is exactly the same execpt
for data contained into 1 xslt using math to add some structrure, and
displaying others as node 1 and node 2? This data is XML from a Barracuda
Spam server that has grown to 2.
Here is a snip from my form draw.
Imports System
Imports System.IO
Imports System.Net
Imports System.Xml
Imports System.Xml.Xsl
Imports System.Xml.XPath
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load
Dim xslSetting As New Xsl.XsltSettings(False, True)
Dim xmldoc As XmlDocument = New XmlDocument()
Dim xsldoc As XslCompiledTransform = New Xsl.XslCompiledTransform()
''Dim xmlUsername As String = ""
''Dim xmlPassword As String = ""
Dim outString As String = ""
Dim cudaServer As String =
"http://xxx.xxx.xxx.xxxx/cgi-bin/stats.cgi?"
Dim xslServer As String = "cstats.xslt"
Dim _webRequest As WebRequest
Dim _webResponse As WebResponse
Dim _streamRead As StreamReader
Dim _streamReceived As Stream
Dim _streamEncoding As Encoding
Dim _pageResponse As String
Try
_pageResponse = ""
_webRequest = System.Net.WebRequest.Create(cudaServer)
''_webRequest.Timeout = 500 * 1000 ''Default 5 minutes
_webResponse = _webRequest.GetResponse
_streamReceived = _webResponse.GetResponseStream
_streamEncoding = System.Text.Encoding.GetEncoding("utf-8")
_streamRead = New System.IO.StreamReader(_streamReceived,
_streamEncoding)
_pageResponse = _streamRead.ReadToEnd()
If _pageResponse.Length 0 Then
outString = _pageResponse
xmldoc.LoadXml(_pageResponse)
xsldoc.Load(Server.MapPath(xslServer)) '', xslSetting, New
XmlUrlResolver)
Xml1.DocumentContent = xmldoc.InnerXml
Xml1.TransformSource = Server.MapPath(xslServer)
End If
If Not _webResponse Is Nothing Then
_webResponse.Close()
End If
Catch ex As Exception
Throw ex
End Try
End Sub
End Class
Thanks
Jeff
你有什么问题吗？ br />
干杯，
Dimitre Nov atchev
" Jeff Uchtman" < uc ***** @ megavision.com写信息
新闻：u5 **************** @ TK2MSFTNGP03.phx.gbl ...
So do you have any question at all?
Cheers,
Dimitre Novatchev
"Jeff Uchtman" <uc*****@megavision.comwrote in message
news:u5****************@TK2MSFTNGP03.phx.gbl...
>我看到我使用了节点表达得很厉害。我有来自2个不同服务器的2张单独的XML
表。对不起。 XML greenhorn
这里。
" Jeff Uchtman" < uc ***** @ megavision.com写信息
news：u5 **************** @ TK2MSFTNGP04.phx.gbl ...
>I see I used the "node" expression incorretly. I have 2 seperate XML
sheets coming from 2 different servers. Sorry for that. XML greenhorn
here.
"Jeff Uchtman" <uc*****@megavision.comwrote in message
news:u5****************@TK2MSFTNGP04.phx.gbl...
>我可以从2个XML源中获取，结构与1 xslt中包含的数据完全相同的execpt使用数学来添加一些结构，并将其他人显示为节点1和节点2？这个数据是来自Barracuda垃圾邮件服务器的XML，已经增长到2.
这是我的表格抽奖。
进口系统
进口System.IO
进口System.Net
进口System.Xml
进口System.Xml.Xsl
进口System.Xml.XPath
部分类_Default
继承System.Web.UI.Page
受保护的子Page_Load（ByVal sender As Object，ByVal e As
System.EventArgs）处理Me.Load
Dim xslSetting As New Xsl.XsltSettings（False，True）
Dim xmldoc As XmlDocument = New XmlDocument（）
Dim xsldoc As XslCompiledTransform = New
Xsl.XslCompiledTransform（）
''Dim xmlUsername As String =""
''Dim xmlPassword As String =""
Dim outString As String =""
Dim cudaServer As String =
" ;http：//xxx.xxx.xxx.xxxx/cgi-bin/stats.cgi？"
Dim xslServer As String =" cstats.xslt"
Dim _webRequest As WebRequest
Dim _webResponse As WebResponse
Dim _streamRead As StreamReader
Dim _streamReceived As Stream
Dim _streamEncoding as Encoding
Dim _pageResponse As String
尝试
_pageResponse =""
_webRequest = System.Net.WebRequest.Create（cudaServer）
''_ webRequest.Timeout = 500 * 1000''默认5分钟
_webResponse = _webRequest.GetResponse
_streamReceived = _webResponse.GetResponseStream
_streamEncoding = System.Text.Encoding.GetEncoding（" utf-8"）
_streamRead = New System.IO.StreamReader（_streamReceived，
_streamEncoding）
_pageResponse = _streamRead.ReadToEnd（）
如果_pageResponse.Length 0那么
outString = _pageResponse
xmldoc.LoadXml（_pageResponse）
xsldoc.Load（Server.MapPath（xslServer））''，xslSetting，New
XmlUrlResolver）
Xml1.DocumentContent = xmldoc.InnerXml
Xml1.TransformSource = Server.MapPath（xslServer）
结束如果
如果不_webResponse什么都没有那么
_webResponse.Close（）
结束如果
Catch ex As Exception
Throw ex
结束尝试
结束子
结束课
谢谢
杰夫
>Can I draw from 2 XML sources, the structure is exactly the same execpt
for data contained into 1 xslt using math to add some structrure, and
displaying others as node 1 and node 2? This data is XML from a
Barracuda Spam server that has grown to 2.
Here is a snip from my form draw.
Imports System
Imports System.IO
Imports System.Net
Imports System.Xml
Imports System.Xml.Xsl
Imports System.Xml.XPath
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load
Dim xslSetting As New Xsl.XsltSettings(False, True)
Dim xmldoc As XmlDocument = New XmlDocument()
Dim xsldoc As XslCompiledTransform = New
Xsl.XslCompiledTransform()
''Dim xmlUsername As String = ""
''Dim xmlPassword As String = ""
Dim outString As String = ""
Dim cudaServer As String =
"http://xxx.xxx.xxx.xxxx/cgi-bin/stats.cgi?"
Dim xslServer As String = "cstats.xslt"
Dim _webRequest As WebRequest
Dim _webResponse As WebResponse
Dim _streamRead As StreamReader
Dim _streamReceived As Stream
Dim _streamEncoding As Encoding
Dim _pageResponse As String
Try
_pageResponse = ""
_webRequest = System.Net.WebRequest.Create(cudaServer)
''_webRequest.Timeout = 500 * 1000 ''Default 5 minutes
_webResponse = _webRequest.GetResponse
_streamReceived = _webResponse.GetResponseStream
_streamEncoding = System.Text.Encoding.GetEncoding("utf-8")
_streamRead = New System.IO.StreamReader(_streamReceived,
_streamEncoding)
_pageResponse = _streamRead.ReadToEnd()
If _pageResponse.Length 0 Then
outString = _pageResponse
xmldoc.LoadXml(_pageResponse)
xsldoc.Load(Server.MapPath(xslServer)) '', xslSetting, New
XmlUrlResolver)
Xml1.DocumentContent = xmldoc.InnerXml
Xml1.TransformSource = Server.MapPath(xslServer)
End If
If Not _webResponse Is Nothing Then
_webResponse.Close()
End If
Catch ex As Exception
Throw ex
End Try
End Sub
End Class
Thanks
Jeff
嗯，是的。我可以从2个不同的，但相同的布局，XML表中绘制？我有一个我的XSLT绘图，但需要一些来自另一个的indvidule数据，
以及将两张纸合并为其他纸张的能力。再次，这个
是从梭子鱼垃圾邮件防火墙创建的数据。数据总是
更改，工作表布局保持不变。
谢谢
Jeff
" Dimitre Novatchev" < di ****** @ tpg.com.auwrote in message
news：45 ********************** *@authen.yellow.readf reenews.net ...
Um, yes. Can I draw from 2 different, but the same layout, XML sheets? I
have my XSLT drawing from one, but need some indvidule data from the other,
and the ability to combine both sheets into a total on others. Again, this
is data created from a Barracuda Spam Firewall. The data is allways
changing, the sheet layout stays the same.
Thanks
Jeff
"Dimitre Novatchev" <di******@tpg.com.auwrote in message
news:45***********************@authen.yellow.readf reenews.net...
所以你有任何疑问吗？
干杯，
Dimitre Novatchev
" Jeff Uchtman" < uc ***** @ megavision.com写信息
新闻：u5 **************** @ TK2MSFTNGP03.phx.gbl ...
So do you have any question at all?
Cheers,
Dimitre Novatchev
"Jeff Uchtman" <uc*****@megavision.comwrote in message
news:u5****************@TK2MSFTNGP03.phx.gbl...
>>我看到我使用了节点表达得很厉害。我有来自2个不同服务器的2张单独的XML
表。对不起。 XML greenhorn
这里。
" Jeff Uchtman" < uc ***** @ megavision.com写信息
新闻：u5 **************** @ TK2MSFTNGP04.phx.gbl ...
>>I see I used the "node" expression incorretly. I have 2 seperate XML
sheets coming from 2 different servers. Sorry for that. XML greenhorn
here.
"Jeff Uchtman" <uc*****@megavision.comwrote in message
news:u5****************@TK2MSFTNGP04.phx.gbl...
>>我可以从2个XML源绘制，结构与1 xslt中包含的数据完全相同，使用数学来添加一些结构，并且
将其他人显示为节点1和节点2？这个数据是来自Barracuda垃圾邮件服务器的XML，已经增长到2.
这是我的表格抽奖。
进口系统
进口System.IO
进口System.Net
进口System.Xml
进口System.Xml.Xsl
进口System.Xml.XPath
部分类_Default
继承System.Web.UI.Page
受保护的子Page_Load（ByVal sender As Object，ByVal e As
System.EventArgs）处理Me.Load
Dim xslSetting As New Xsl.XsltSettings（False，True）
Dim xmldoc As XmlDocument = New XmlDocument（）
Dim xsldoc As XslCompiledTransform = New
Xsl.XslCompiledTransform（）
''Dim xmlUsername As String =""
''Dim xmlPassword As String =""
Dim outString As String =""
Dim cudaServer As String =
" ;http：//xxx.xxx.xxx.xxxx/cgi-bin/stats.cgi？"
Dim xslServer As String =" cstats.xslt"
Dim _webRequest As WebRequest
Dim _webResponse As WebResponse
Dim _streamRead As StreamReader
Dim _streamReceived As Stream
Dim _streamEncoding as Encoding
Dim _pageResponse As String
尝试
_pageResponse =""
_webRequest = System.Net.WebRequest.Create（cudaServer）
''_ webRequest.Timeout = 500 * 1000''默认5分钟
_webResponse = _webRequest.GetResponse
_streamReceived = _webResponse.GetResponseStream
_streamEncoding = System.Text.Encoding.GetEncoding（" utf-8"）
_streamRead = New System.IO.StreamReader（_streamReceived，
_streamEncoding）
_pageResponse = _streamRead.ReadToEnd（）
如果_pageResponse.Length 0那么
outString = _pageResponse
xmldoc.LoadXml（_pageResponse）
xsldoc.Load（Server.MapPath（xslServer））''，xslSetting，
新的XmlUrlResolver）
Xml1.DocumentContent = xmldoc.InnerXml
Xml1.TransformSource = Server.MapPath（xslServer）
结束如果
如果不_webResponse什么都没有那么
_webResponse.Close（）
结束如果
Catch ex As Exception
Throw ex
结束尝试
结束子
结束课
谢谢
杰夫
>>Can I draw from 2 XML sources, the structure is exactly the same execpt
for data contained into 1 xslt using math to add some structrure, and
displaying others as node 1 and node 2? This data is XML from a
Barracuda Spam server that has grown to 2.
Here is a snip from my form draw.
Imports System
Imports System.IO
Imports System.Net
Imports System.Xml
Imports System.Xml.Xsl
Imports System.Xml.XPath
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load
Dim xslSetting As New Xsl.XsltSettings(False, True)
Dim xmldoc As XmlDocument = New XmlDocument()
Dim xsldoc As XslCompiledTransform = New
Xsl.XslCompiledTransform()
''Dim xmlUsername As String = ""
''Dim xmlPassword As String = ""
Dim outString As String = ""
Dim cudaServer As String =
"http://xxx.xxx.xxx.xxxx/cgi-bin/stats.cgi?"
Dim xslServer As String = "cstats.xslt"
Dim _webRequest As WebRequest
Dim _webResponse As WebResponse
Dim _streamRead As StreamReader
Dim _streamReceived As Stream
Dim _streamEncoding As Encoding
Dim _pageResponse As String
Try
_pageResponse = ""
_webRequest = System.Net.WebRequest.Create(cudaServer)
''_webRequest.Timeout = 500 * 1000 ''Default 5 minutes
_webResponse = _webRequest.GetResponse
_streamReceived = _webResponse.GetResponseStream
_streamEncoding = System.Text.Encoding.GetEncoding("utf-8")
_streamRead = New System.IO.StreamReader(_streamReceived,
_streamEncoding)
_pageResponse = _streamRead.ReadToEnd()
If _pageResponse.Length 0 Then
outString = _pageResponse
xmldoc.LoadXml(_pageResponse)
xsldoc.Load(Server.MapPath(xslServer)) '', xslSetting,
New XmlUrlResolver)
Xml1.DocumentContent = xmldoc.InnerXml
Xml1.TransformSource = Server.MapPath(xslServer)
End If
If Not _webResponse Is Nothing Then
_webResponse.Close()
End If
Catch ex As Exception
Throw ex
End Try
End Sub
End Class
Thanks
Jeff
这篇关于2个XML节点，1个xslt的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！
