案例: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
footerstyle-font-size="9pt"
32
footerstyle-font-italic="True">
33
34
<HeaderTemplate>
35
My CD Catalog
36
</HeaderTemplate>
37
38
<ItemTemplate>
39
"<%#Container.DataItem("title")%>" of <%#Container.DataItem("artist")%>  - $<%#Container.DataItem("price")%>
40
</ItemTemplate>
41
42
<FooterTemplate>
43
Copy Right W3xue.com
44
</FooterTemplate>
45
46
</asp:DataList>
47
</form>
48