计算机科学论坛--显示贴子

以文本方式查看主题

-  计算机科学论坛  (http://bbs.xml.org.cn/index.asp)
--  『 XML基础』  (http://bbs.xml.org.cn/list.asp?boardid=1)
----  请问如何在asp.net+xml作的电子商务网站上加入超级链接？  (http://bbs.xml.org.cn/dispbbs.asp?boardid=1&rootid=&id=6592)

--  作者：marilyn
--  发布时间：4/9/2004 10:19:00 AM

--  请问如何在asp.net+xml作的电子商务网站上加入超级链接？
各位大侠，请问如何在asp.net+xml作的网站上加入超级链接？
在那个文件中加呢？
以下是个实验的例子：
123.xsl

<?xml version="1.0" encoding="GB2312"?>
<xsl:stylesheet xmlns:xsl="http://www.w3.org/TR/WD-xsl"
xmlns="http://www.w3.org/TR/REC-html40"
result-ns="">
<xsl:template><xsl:apply-templates/></xsl:template>

<xsl:template match = "/">
    <HTML>
    <HEAD>
        <TITLE>F网上书店书目</TITLE>
    </HEAD>
    <BODY>
        <xsl:apply-templates select="goods"/>
    </BODY>
    </HTML>
</xsl:template>

<xsl:template match = "goods">
    <xsl:for-each select="books">
        <UL>
        <LI><xsl:value-of select="bookname"/></a></LI>
        <UL>
            <LI>书号:<xsl:value-of select="bookno"/></LI>
            <LI>价格: <xsl:value-of select="bookprice"/></LI>
            <LI>点基人数: <xsl:value-of select="click"/></LI>
            <LI>购买人数: <xsl:value-of select="buy"/></LI>
        </UL>
        </UL>
    </xsl:for-each>
</xsl:template>
</xsl:stylesheet>

xml.aspx

<%@Import Namespace="System.Data"%>
<%@Import Namespace="System.Data.OleDb"%>

<Script Language="VB"  Debug="true" Runat="Server">
sub page_load(sender as Object,e as EventArgs)
dim myConnection as OleDbConnection
dim MyDataReader as OleDbDataReader
myConnection=new OleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;Data Source=c:\aspxtemp\webtemp.mdb")
myConnection.Open()
Dim myCommand As OleDbCommand
Dim ds as DataSet
myCommand = New OleDbCommand( "select * from [book]", myConnection )
MyDataReader=myCommand.ExecuteReader()
Response.Write ("<?xml version=""1.0"" encoding=""GB2312"" standalone=""yes""?>" )
Response.Write(vbcrlf)
Response.Write ("")
Response.Write(vbcrlf)
Response.Write("<?xml-stylesheet type=""text/xsl"" href=""123.xsl""?>")
Response.Write(vbcrlf)
Response.Write ("<goods>")
Response.Write(vbcrlf)
do while MyDataReader.Read()
  Response.Write ("<books>")
Response.Write(vbcrlf)
  Response.Write ("<bookno>")
  Response.Write (MyDataReader("ID1"))
  Response.Write ("</bookno>")
Response.Write(vbcrlf)
  Response.Write ("<bookname>")
  Response.Write (MyDataReader("book_name"))
  Response.Write ("</bookname>")
Response.Write(vbcrlf)
  Response.Write ("<bookprice>")
  Response.Write (MyDataReader("price"))
  Response.Write ("</bookprice>")
Response.Write(vbcrlf)
  Response.Write ("<click>")
  Response.Write (MyDataReader("click"))
  Response.Write ("</click>")
Response.Write(vbcrlf)
  Response.Write ("<buy>")
  Response.Write (MyDataReader("buy"))
  Response.Write ("</buy>")
Response.Write(vbcrlf)
  Response.Write ("</books>")
Response.Write(vbcrlf)
loop
Response.Write ("</goods>")

end sub

</script>

--  作者：小鞋子
--  发布时间：4/9/2004 12:03:00 PM

--
<LI>书号:<a target="_blank"><xsl:attribute name="href">
http://www.xxx.com/<xsl:value-of
select="bookno"/>.aspx?id= <xsl:value-of select="click"/></xsl:attribute><xsl:value-of select="bookno"/></a>
</LI>
            <LI>价格: <xsl:value-of select="bookprice"/></LI>
            <LI>点基人数: <xsl:value-of select="click"/></LI>
            <LI>购买人数: <xsl:value-of select="buy"/></LI>

--  作者：孤独
--  发布时间：4/9/2004 12:13:00 PM

--
<LI>书号:<a target="_blank" href="http://www.xxx.com/{bookno}.aspx?id={click}"><xsl:value-of select="bookno"/></a>
</LI>
            <LI>价格: <xsl:value-of select="bookprice"/></LI>
            <LI>点基人数: <xsl:value-of select="click"/></LI>
            <LI>购买人数: <xsl:value-of select="buy"/></LI>

--  作者：marilyn
--  发布时间：4/9/2004 1:05:00 PM

--
谢谢各位,正在努力研究中~~~~~~~~

W 3 C h i n a ( since 2003 ) 旗下站点
苏ICP备05006046号《全国人大常委会关于维护互联网安全的决定》《计算机信息网络国际联网安全保护管理办法》

79.102ms