案例:ASP.net案例     状态:不可编辑再运行    进入竖版
 运行结果 
x
 
1
<%@ Import Namespace="System.Data" %>
2
3
<script  runat="server">
4
sub Page_Load
5
if Not Page.IsPostBack then
6
   dim mycdcatalog=New DataSet
7
   mycdcatalog.ReadXml(MapPath("cdcatalog.xml"))
8
   cdcatalog.DataSource=mycdcatalog
9
   cdcatalog.DataBind()
10
end if
11
end sub
12
</script>
13
14
<html>
15
<body>
16
17
<form runat="server">
18
<asp:DataList id="cdcatalog"
19
runat="server"
20
cellpadding="2"
21
cellspacing="2"
22
borderstyle="inset"
23
backcolor="#e8e8e8"
24
width="100%"
25
headerstyle-font-name="Verdana"
26
headerstyle-font-size="12pt"
27
headerstyle-horizontalalign="center"
28
headerstyle-font-bold="True"
29
itemstyle-backcolor="#778899"
30
itemstyle-forecolor="#ffffff"
31
alternatingitemstyle-backcolor="#e8e8e8"
32
alternatingitemstyle-forecolor="#000000"
33
footerstyle-font-size="9pt"
34
footerstyle-font-italic="True">
35
36
<HeaderTemplate>
37
My CD Catalog
38
</HeaderTemplate>
39
40
<ItemTemplate>
41
"<%#Container.DataItem("title")%>" of <%#Container.DataItem("artist")%>  - $<%#Container.DataItem("price")%>
42
</ItemTemplate>
43
44
<AlternatingItemTemplate>
45
"<%#Container.DataItem("title")%>" of <%#Container.DataItem("artist")%>  - $<%#Container.DataItem("price")%>
46
</AlternatingItemTemplate>
47
48
<FooterTemplate>