xmlreader2.aspx

来自「asp入门到精通的源代码」· ASPX 代码 · 共 36 行

ASPX

36 行

<%@ Import Namespace="System.Xml" %>

<script language="VB" runat=server>
   sub Page_Load(obj as object, e as eventargs)
      dim reader as XMLTextReader
      dim i as integer
      dim curPrice as Decimal
      
      try
         reader = new XMLTextReader(Server.MapPath("books.xml"))
         
         While reader.Read()
            Select Case reader.NodeType
               Case XMLNodeType.Element
                  if reader.HasAttributes then
                     for i = 0 to reader.AttributeCount - 1
                        Response.Write(reader.GetAttribute(i) & " ")
                     next
                     Response.Write("<br>")
                  end if
               Case XMLNodeType.Text
                  Response.Write(reader.Value & "<br>")
            End Select
         End While
      catch ex as Exception
         Response.Write("Error accessing XML file")
      finally
         reader.close
      end try
   
   end sub
</script>

<html><body>

</body></html>

xmlreader2.aspx - 源码说明

本页面展示了「asp入门到精通的源代码」中的 xmlreader2.aspx 源码文件，采用 ASPX 编程语言编写，共 36 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与ASP相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?