首页>教程>ASP.NET教程>ASP.NET Web Forms 范例

需要支持?

如果通过文档没办法解决您的问题,请提交工单获取我们的支持!

ASP.NET Web Forms 范例

内容纲要

本章列出了一些 ASP.NET Web Forms 范例,你可以点击链接查看结果

ASP.NET HTML 控件

HTML Anchor

  1. <script runat="server">
  2. Sub Page_Load
  3. link1.HRef="https://www.twle.cn"
  4. link1.Target="_blank"
  5. link1.Title="twle.cn"
  6. link2.HRef="https://www.microsoft.com"
  7. link2.Target="_blank"
  8. link2.Title="Microsoft"
  9. End Sub
  10. </script>
  11. <!DOCTYPE html>
  12. <meta charset="utf-8"/>
  13. <form runat="server">
  14. <a id="link1" runat="server">Visit twle.cn!</a>
  15. <br>
  16. <a id="link2" runat="server">Visit Microsoft!</a>
  17. </form>

HTML Button

  1. <script runat="server">
  2. Sub button1(Source As Object, e As EventArgs)
  3. p1.InnerHtml="You clicked the blue button!"
  4. End Sub
  5. Sub button2(Source As Object, e As EventArgs)
  6. p1.InnerHtml="You clicked the pink button!"
  7. End Sub
  8. </script>
  9. <!DOCTYPE html>
  10. <meta charset="utf-8" />
  11. <form runat="server">
  12. <button id="b1" OnServerClick="button1" style="background-color:#e6e6fa; height:25;width:100" runat="server">
  13. Blue button!
  14. </button>
  15. <button id="b2" OnServerClick="button2" style="background-color:#fff0f5;height:25;width:100" runat="server">
  16. Pink button!
  17. </button>
  18. <p id="p1" runat="server" />
  19. </form>

HTML Image

  1. <script runat="server">
  2. Sub Page_Load(Sender As Object,E As EventArgs)
  3. image1.Src="/static/i/smiley.gif"
  4. image1.Alt="Smiley"
  5. image1.Border="3"
  6. End Sub
  7. </script>
  8. <!DOCTYPE html>
  9. <meta charset="utf-8"/>
  10. <form runat="server">
  11. <img id="image1" runat="server" />
  12. </form>

HTML Image 2

  1. <script runat="server">
  2. Sub choose_image(Sender As Object, e As EventArgs)
  3. image1.Src = select1.Value
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. <select id="select1" runat="server">
  10. <option value="/static/i/smiley.gif">Smiley</option>
  11. <option value="/static/i/angry.gif">Angry</option>
  12. <option value="/static/i/stickman.gif">Stickman</option>
  13. </select>
  14. <input type="submit" runat="server" value="Display image"
  15. OnServerClick="choose_image">
  16. <br><br>
  17. <img id="image1" src="smiley.gif" runat="server" width="32" height="32" />
  18. </form>

HTML Inputbutton

  1. <script runat="server">
  2. Sub submit(sender As Object, e as EventArgs)
  3. if name.value<>"" then
  4. p1.InnerHtml="Welcome " & name.value & "!"
  5. end if
  6. End Sub
  7. </script>
  8. <!DOCTYPE html>
  9. <meta charset="utf-8" />
  10. <form runat="server">
  11. Enter your name: <input id="name" type="text" size="30" runat="server" />
  12. <br><br>
  13. <input type="submit" value="Submit" OnServerClick="submit" runat="server" />
  14. <p id="p1" runat="server" />
  15. </form>

HTML InputCheckbox

  1. <script runat="server">
  2. Sub submit(Source As Object, e As EventArgs)
  3. if red.Checked=True then
  4. p1.InnerHtml="You prefer red!"
  5. else
  6. p1.InnerHtml="You prefer blue!"
  7. end if
  8. red.checked=false
  9. blue.checked=false
  10. End Sub
  11. </script>
  12. <!DOCTYPE html>
  13. <meta charset="utf-8" />
  14. <form runat="server">
  15. What color do you prefer?
  16. <br>
  17. <input id="red" type="checkbox" runat="server" /> Red
  18. <br>
  19. <input id="blue" type="checkbox" runat="server" /> Blue
  20. <br>
  21. <input type="button" value="Submit" OnServerClick="submit" runat="server"/>
  22. <p id="p1" runat="server" />
  23. </form>

HTML InputHidden

  1. <script runat="server">
  2. Sub submit(Source As Object, e As EventArgs)
  3. hidden1.Value=string1.Value
  4. p1.InnerHtml="Hidden value= " + hidden1.Value
  5. End Sub
  6. </script>
  7. <!DOCTYPE html>
  8. <meta charset="utf-8" />
  9. <form runat="server">
  10. Enter some text: <input id="string1" type="text" size="25" runat="server" />
  11. <input type="submit" value="Submit" OnServerClick="submit" runat="server" />
  12. <input id="hidden1" type="hidden" runat="server" />
  13. <p id="p1" runat="server" />
  14. </form>

HTML InputImage

  1. <script runat="server">
  2. Sub button1(Source As Object, e As ImageClickEventArgs)
  3. p1.InnerHtml="You clicked the smiley button!"
  4. End Sub
  5. Sub button2(Source As Object, e As ImageClickEventArgs)
  6. p1.InnerHtml="You clicked the angry button!"
  7. End Sub
  8. </script>
  9. <!DOCTYPE html>
  10. <meta charset="utf-8" />
  11. <form runat="server">
  12. <p>Click on one of the images:</p>
  13. <p>
  14. <input type="image" src="/static/i/smiley.gif"
  15. OnServerClick="button1" runat="server" width="32" height="32" />
  16. </p>
  17. <p>
  18. <input type="image" src="/static/i/angry.gif"
  19. OnServerClick="button2" runat="server" width="32" height="32" />
  20. </p>
  21. <p id="p1" runat="server" />
  22. </form>

HTML InputRadiobutton

  1. <script runat="server">
  2. Sub submit(Source As Object, e As EventArgs)
  3. if r1.Checked=True then
  4. p1.InnerHtml="Your favorite color is red"
  5. else
  6. if r2.Checked=True then
  7. p1.InnerHtml="Your favorite color is green"
  8. else
  9. if r3.Checked=True then
  10. p1.InnerHtml="Your favorite color is blue"
  11. end if
  12. end if
  13. end if
  14. End Sub
  15. </script>
  16. <!DOCTYPE html>
  17. <meta charset="utf-8" />
  18. <form runat="server">
  19. <p>Select your favorite color:
  20. <br>
  21. <input id="r1" name="col" type="radio" runat="server">Red</input>
  22. <br>
  23. <input id="r2" name="col" type="radio" runat="server">Green</input>
  24. <br>
  25. <input id="r3" name="col" type="radio" runat="server">Blue</input>
  26. <br>
  27. <input type="button" value="Submit" OnServerClick="submit" runat="server"/>
  28. <p id="p1" runat="server" />
  29. </form>

HTML Table

  1. <script runat="server">
  2. Sub submit(sender As Object, e As EventArgs)
  3. Dim row,numrows,numcells,j,i
  4. row=0
  5. numrows=cint(rows1.Value)
  6. numcells=cint(cells1.Value)
  7. for j=1 to numrows
  8. Dim r As New HtmlTableRow()
  9. row=row+1
  10. for i=1 to numcells
  11. Dim c As New HtmlTableCell()
  12. c.Controls.Add(New LiteralControl("row " & j & ", cell " & i))
  13. r.Cells.Add(c)
  14. next
  15. t1.Rows.Add(r)
  16. t1.Visible=true
  17. next
  18. End Sub
  19. </script>
  20. <!DOCTYPE html>
  21. <meta charset="utf-8" />
  22. <form runat="server">
  23. <p>Table rows:
  24. <select id="rows1" runat="server">
  25. <option value="1">1</option>
  26. <option value="2">2</option>
  27. <option value="3">3</option>
  28. </select>
  29. <br>Table cells:
  30. <select id="cells1" runat="server">
  31. <option value="1">1</option>
  32. <option value="2">2</option>
  33. <option value="3">3</option>
  34. </select>
  35. <br><br>
  36. <input type="submit" value="Display Table" runat="server" OnServerClick="submit">
  37. </p>
  38. <table id="t1" border="1" runat="server" visible="false"/>
  39. </form>

HTML Table 2

  1. <script runat="server">
  2. Sub submit(sender As Object, e As EventArgs)
  3. dim i,j
  4. table1.BGColor="yellow"
  5. table1.BorderColor="red"
  6. for i=0 To table1.Rows.Count-1
  7. for j=0 To table1.Rows(i).Cells.Count-1
  8. table1.Rows(i).Cells(j).InnerHtml="Row " & i
  9. next
  10. next
  11. End Sub
  12. </script>
  13. <!DOCTYPE html>
  14. <meta charset="utf-8" />
  15. <form runat="server">
  16. <table id="table1" border="1" runat="server">
  17. <tr>
  18. <td>Cell 1</td>
  19. <td>Cell 2</td>
  20. </tr>
  21. <tr>
  22. <td>Cell 3</td>
  23. <td>Cell 4</td>
  24. </tr>
  25. </table>
  26. <br>
  27. <input type="button" value="Change Contents" OnServerClick="submit" runat="server"/>
  28. </form>

HTML Textarea

  1. <script runat="server">
  2. Sub submit(sender As Object, e As EventArgs)
  3. p1.InnerHtml = "<b>You wrote:</b> " & textarea1.Value
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. Enter some text:<br>
  10. <textarea id="textarea1" cols="35" rows="6" runat="server" />
  11. <input type="submit" value="Submit" OnServerClick="submit" runat="server" />
  12. <p id="p1" runat="server" />
  13. </form>

ASP.NET Web 控件

AdRotator

  1. <%
  2. url=Request.QueryString("url")
  3. If url<>"" then Response.Redirect(url)
  4. %>
  5. <!DOCTYPE html>
  6. <meta charset="utf-8" />
  7. <%
  8. set adrotator=Server.CreateObject("MSWC.AdRotator")
  9. adrotator.TargetFrame="target='_blank'"
  10. response.write(adrotator.GetAdvertisement("text/advertisements.txt"))
  11. %>
  12. <p>
  13. NOTE: Because images are changed randomly, and because this page has few images to choose from, it will
  14. often display the same advertisement twice in a row.
  15. </p>
  16. <p>NOTE: The AdRotator does not work with Internet Information Server 7 (IIS7).</p>
  17. <p>
  18. <a href="text/advertisements.txt">
  19. <img src="/static/i/btn_view_text.gif"></a>
  20. </p>

Button

  1. <script runat="server">
  2. Sub submit(Source As Object, e As EventArgs)
  3. button1.Text="You clicked me!"
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. <asp:Button id="button1" Text="Click me!" runat="server" OnClick="submit" />
  10. </form>

Button 2

  1. <script runat="server">
  2. Sub submit(Source As Object, e As EventArgs)
  3. button1.Style("background-color")="#0000ff"
  4. button1.Style("color")="#ffffff"
  5. button1.Style("width")="200px"
  6. button1.Style("cursor")="pointer"
  7. button1.Style("font-family")="verdana"
  8. button1.Style("font-weight")="bold"
  9. button1.Style("font-size")="14pt"
  10. button1.Text="You clicked me!"
  11. End Sub
  12. </script>
  13. <!DOCTYPE html>
  14. <meta charset="utf-8" />
  15. <form runat="server">
  16. <asp:Button id="button1" Text="Click me!" runat="server" OnClick="submit" />
  17. </form>

Calendar

  1. <!DOCTYPE html>
  2. <meta charset="utf-8" />
  3. <form runat="server">
  4. <asp:Calendar runat="server" />
  5. </form>

Calendar 2

  1. <!DOCTYPE html>
  2. <meta charset="utf-8" />
  3. <form runat="server">
  4. <asp:Calendar DayNameFormat="Full" runat="server">
  5. <WeekendDayStyle BackColor="#fafad2" ForeColor="#ff0000" />
  6. <DayHeaderStyle ForeColor="#0000ff" />
  7. <TodayDayStyle BackColor="#00ff00" />
  8. </asp:Calendar>
  9. </form>

Calendar 3

  1. <!DOCTYPE html>
  2. <meta charset="utf-8" />
  3. <form runat="server">
  4. <asp:Calendar DayNameFormat="Full" runat="server"
  5. SelectionMode="DayWeekMonth"
  6. SelectMonthText="<*>"
  7. SelectWeekText="<->"/>
  8. <SelectorStyle BackColor="#f5f5f5" />
  9. </asp:Calendar>
  10. </form>

Checkbox

  1. <script runat="server">
  2. Sub Check(sender As Object, e As EventArgs)
  3. if check1.Checked then
  4. work.Text=home.Text
  5. else
  6. work.Text=""
  7. end if
  8. End Sub
  9. </script>
  10. <!DOCTYPE html>
  11. <meta charset="utf-8" />
  12. <form runat="server">
  13. <p>Home Phone:
  14. <asp:TextBox id="home" runat="server" />
  15. <br>
  16. Work Phone:
  17. <asp:TextBox id="work" runat="server" />
  18. <asp:CheckBox id="check1"
  19. Text="Same as home phone" TextAlign="Right"
  20. AutoPostBack="True" OnCheckedChanged="Check"
  21. runat="server" />
  22. </p>
  23. </form>

CheckboxList

  1. <script runat="server">
  2. Sub Check(sender As Object, e As EventArgs)
  3. dim i
  4. mess.Text="<p>Selected Item(s):</p>"
  5. for i=0 to check1.Items.Count-1
  6. if check1.Items(i).Selected then
  7. mess.Text+=check1.Items(i).Text + "<br>"
  8. end if
  9. next
  10. End Sub
  11. </script>
  12. <!DOCTYPE html>
  13. <meta charset="utf-8" />
  14. <form runat="server">
  15. <asp:CheckBoxList id="check1" AutoPostBack="True"
  16. TextAlign="Right" OnSelectedIndexChanged="Check"
  17. runat="server">
  18. <asp:ListItem>Item 1</asp:ListItem>
  19. <asp:ListItem>Item 2</asp:ListItem>
  20. <asp:ListItem>Item 3</asp:ListItem>
  21. <asp:ListItem>Item 4</asp:ListItem>
  22. <asp:ListItem>Item 5</asp:ListItem>
  23. <asp:ListItem>Item 6</asp:ListItem>
  24. </asp:CheckBoxList>
  25. <br>
  26. <asp:label id="mess" runat="server"/>
  27. </form>

DataList

  1. <%@ Import Namespace="System.Data" %>
  2. <script runat="server">
  3. sub Page_Load
  4. if Not Page.IsPostBack then
  5. dim mycdcatalog=New DataSet
  6. mycdcatalog.ReadXml(MapPath("cdcatalog.xml"))
  7. cdcatalog.DataSource=mycdcatalog
  8. cdcatalog.DataBind()
  9. end if
  10. end sub
  11. </script>
  12. <!DOCTYPE html>
  13. <meta charset="utf-8" />
  14. <form runat="server">
  15. <asp:DataList id="cdcatalog"
  16. gridlines="both" runat="server">
  17. <HeaderTemplate>
  18. My CD Catalog
  19. </HeaderTemplate>
  20. <ItemTemplate>
  21. "<%#Container.DataItem("title")%>" of
  22. <%#Container.DataItem("artist")%> -
  23. $<%#Container.DataItem("price")%>
  24. </ItemTemplate>
  25. <FooterTemplate>
  26. Copyright Hege Refsnes
  27. </FooterTemplate>
  28. </asp:DataList>
  29. </form>

用 styles 的DataList

  1. <%@ Import Namespace="System.Data" %>
  2. <script runat="server">
  3. sub Page_Load
  4. if Not Page.IsPostBack then
  5. dim mycdcatalog=New DataSet
  6. mycdcatalog.ReadXml(MapPath("cdcatalog.xml"))
  7. cdcatalog.DataSource=mycdcatalog
  8. cdcatalog.DataBind()
  9. end if
  10. end sub
  11. </script>
  12. <!DOCTYPE html>
  13. <meta charset="utf-8" />
  14. <form runat="server">
  15. <asp:DataList id="cdcatalog"
  16. runat="server"
  17. cellpadding="2"
  18. cellspacing="2"
  19. borderstyle="inset"
  20. backcolor="#e8e8e8"
  21. width="100%"
  22. headerstyle-font-name="Verdana"
  23. headerstyle-font-size="12pt"
  24. headerstyle-horizontalalign="center"
  25. headerstyle-font-bold="true"
  26. itemstyle-backcolor="#778899"
  27. itemstyle-forecolor="#ffffff"
  28. footerstyle-font-size="9pt"
  29. footerstyle-font-italic="true">
  30. <HeaderTemplate>
  31. My CD Catalog
  32. </HeaderTemplate>
  33. <ItemTemplate>
  34. "<%#Container.DataItem("title")%>" of
  35. <%#Container.DataItem("artist")%> -
  36. $<%#Container.DataItem("price")%>
  37. </ItemTemplate>
  38. <FooterTemplate>
  39. Copyright Hege Refsnes
  40. </FooterTemplate>
  41. </asp:DataList>
  42. </form>

用 <AlternatingItemTemplate> 的DataList

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

DropdownList

  1. <script runat="server">
  2. Sub submit(sender As Object, e As EventArgs)
  3. mess.Text="You selected " & drop1.SelectedItem.Text
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. <asp:DropDownList id="drop1" runat="server">
  10. <asp:ListItem>Item 1</asp:ListItem>
  11. <asp:ListItem>Item 2</asp:ListItem>
  12. <asp:ListItem>Item 3</asp:ListItem>
  13. <asp:ListItem>Item 4</asp:ListItem>
  14. <asp:ListItem>Item 5</asp:ListItem>
  15. <asp:ListItem>Item 6</asp:ListItem>
  16. </asp:DropDownList>
  17. <asp:Button Text="Submit" OnClick="submit" runat="server"/>
  18. <p><asp:label id="mess" runat="server"/></p>
  19. </form>

Hyperlink

  1. <!DOCTYPE html>
  2. <meta charset="utf-8" />
  3. <form runat="server">
  4. <asp:HyperLink
  5. ImageUrl="/static/i/banners/w6.gif"
  6. NavigateUrl="https://www.twle.cn"
  7. Text="Visit twle.cn!"
  8. Target="_blank"
  9. runat="server" />
  10. </form>

Image

  1. <!DOCTYPE html>
  2. <meta charset="utf-8" />
  3. <form runat="server">
  4. <asp:Image runat="server" AlternateText="twle.cn" ImageUrl="/static/i/banners/w6.gif"/>
  5. </form>

ImageButton

  1. <script runat="server">
  2. Sub getCoordinates(sender As Object, e As ImageClickEventArgs)
  3. mess.Text="Coordinates: " & e.x & ", " & e.y
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. <p>Click on the image:</p>
  10. <asp:ImageButton
  11. runat="server"
  12. ImageUrl="/static/i/smiley.gif"
  13. OnClick="getCoordinates"/>
  14. <p><asp:label id="mess" runat="server"/></p>
  15. </form>

Label

  1. <script runat="server">
  2. Sub submit(Sender As Object, e As EventArgs)
  3. label1.Text=txt1.Text
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. Write some text:
  10. <asp:TextBox id="txt1" Width="200" runat="server" />
  11. <asp:Button id="b1" Text="Copy to Label" OnClick="submit" runat="server" />
  12. <p><asp:Label id="label1" runat="server" /></p>
  13. </form>

LinkButton

  1. <script runat="server">
  2. Sub lblClick(sender As Object, e As EventArgs)
  3. Label1.Text="You clicked the LinkButton control"
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. <asp:LinkButton Text="Click me!" OnClick="lblClick" runat="server" />
  10. <p><asp:Label id="Label1" runat="server" /></p>
  11. </form>

Listbox

  1. <script runat="server">
  2. Sub submit(Sender As Object,e As EventArgs)
  3. mess.Text="You selected " & drop1.SelectedItem.Text
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. <asp:ListBox id="drop1" rows="3" runat="server">
  10. <asp:ListItem selected="true">Item 1</asp:ListItem>
  11. <asp:ListItem>Item 2</asp:ListItem>
  12. <asp:ListItem>Item 3</asp:ListItem>
  13. <asp:ListItem>Item 4</asp:ListItem>
  14. <asp:ListItem>Item 5</asp:ListItem>
  15. <asp:ListItem>Item 6</asp:ListItem>
  16. </asp:ListBox>
  17. <asp:Button Text="Submit" OnClick="submit" runat="server" />
  18. <p><asp:label id="mess" runat="server" /></p>
  19. </form>

Literal

  1. <!DOCTYPE html>
  2. <meta charset="utf-8" />
  3. <form runat="server">
  4. <asp:Literal Text="I love ASP. NET!" runat="server" />
  5. </form>

Literal 2

  1. <script runat="server">
  2. Sub submit(sender As Object, e As EventArgs)
  3. Literal1.Text="I love ASP.NET!"
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. <asp:Literal id="Literal1" Text="I love ASP!" runat="server" />
  10. <br><br>
  11. <asp:Button Text="Change Text" OnClick="submit" runat="server" />
  12. </form>

Panel

  1. <script runat="server">
  2. Sub Page_Load(sender As Object, e As EventArgs)
  3. if check1.Checked then
  4. panel1.Visible=false
  5. else
  6. panel1.Visible=true
  7. end if
  8. End Sub
  9. </script>
  10. <!DOCTYPE html>
  11. <meta charset="utf-8" />
  12. <form runat="server">
  13. <asp:Panel id="panel1"
  14. runat="server" BackColor="#ff0000"
  15. Height="100px" Width="100px">
  16. Hello World!
  17. </asp:Panel>
  18. <asp:CheckBox id="check1"
  19. Text="Hide Panel control"
  20. runat="server"/>
  21. <br><br>
  22. <asp:Button Text="Reload" runat="server" />
  23. </form>

Radiobutton

  1. <script runat="server">
  2. Sub submit(Sender As Object, e As EventArgs)
  3. if red.Checked then
  4. Label1.Text="You selected " & red.Text
  5. elseIf green.Checked then
  6. Label1.Text="You selected " & green.Text
  7. elseIf blue.Checked then
  8. Label1.Text="You selected " & blue.Text
  9. end if
  10. End Sub
  11. </script>
  12. <!DOCTYPE html>
  13. <meta charset="utf-8" />
  14. <form runat="server">
  15. Select your favorite color:
  16. <br>
  17. <asp:RadioButton id="red" Text="Red" Checked="True"
  18. GroupName="colors" runat="server"/>
  19. <br>
  20. <asp:RadioButton id="green" Text="Green"
  21. GroupName="colors" runat="server"/>
  22. <br>
  23. <asp:RadioButton id="blue" Text="Blue"
  24. GroupName="colors" runat="server"/>
  25. <br>
  26. <asp:Button text="Submit" OnClick="submit" runat="server"/>
  27. <p><asp:Label id="Label1" runat="server"/></p>
  28. </form>

RadiobuttonList

  1. <script runat="server">
  2. Sub submit(sender As Object, e As EventArgs)
  3. label1.Text="You selected " & radiolist1.SelectedItem.Text
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. <asp:RadioButtonList id="radiolist1" runat="server">
  10. <asp:ListItem selected="true">Item 1</asp:ListItem>
  11. <asp:ListItem>Item 2</asp:ListItem>
  12. <asp:ListItem>Item 3</asp:ListItem>
  13. <asp:ListItem>Item 4</asp:ListItem>
  14. </asp:RadioButtonList>
  15. <br>
  16. <asp:Button text="Submit" OnClick="submit" runat="server"/>
  17. <p><asp:Label id="Label1" runat="server"/></p>
  18. </form>

Repeater

  1. <%@ Import Namespace="System.Data" %>
  2. <script runat="server">
  3. sub Page_Load
  4. if Not Page.IsPostBack then
  5. dim mycdcatalog=New DataSet
  6. mycdcatalog.ReadXml(MapPath("cdcatalog.xml"))
  7. cdcatalog.DataSource=mycdcatalog
  8. cdcatalog.DataBind()
  9. end if
  10. end sub
  11. </script>
  12. <!DOCTYPE html>
  13. <meta charset="utf-8" />
  14. <form runat="server">
  15. <asp:Repeater id="cdcatalog" runat="server">
  16. <HeaderTemplate>
  17. <table border="1" width="100%">
  18. <tr>
  19. <th>Title</th>
  20. <th>Artist</th>
  21. <th>Country</th>
  22. <th>Company</th>
  23. <th>Price</th>
  24. <th>Year</th>
  25. </tr>
  26. </HeaderTemplate>
  27. <ItemTemplate>
  28. <tr>
  29. <td><%#Container.DataItem("title")%></td>
  30. <td><%#Container.DataItem("artist")%></td>
  31. <td><%#Container.DataItem("country")%></td>
  32. <td><%#Container.DataItem("company")%></td>
  33. <td><%#Container.DataItem("price")%></td>
  34. <td><%#Container.DataItem("year")%></td>
  35. </tr>
  36. </ItemTemplate>
  37. <FooterTemplate>
  38. </table>
  39. </FooterTemplate>
  40. </asp:Repeater>
  41. </form>

用 <AlternatingItemTemplate> 重复

  1. <%@ Import Namespace="System.Data" %>
  2. <script runat="server">
  3. sub Page_Load
  4. if Not Page.IsPostBack then
  5. dim mycdcatalog=New DataSet
  6. mycdcatalog.ReadXml(MapPath("cdcatalog.xml"))
  7. cdcatalog.DataSource=mycdcatalog
  8. cdcatalog.DataBind()
  9. end if
  10. end sub
  11. </script>
  12. <!DOCTYPE html>
  13. <meta charset="utf-8" />
  14. <form runat="server">
  15. <asp:Repeater id="cdcatalog" runat="server">
  16. <HeaderTemplate>
  17. <table border="1" width="100%">
  18. <tr>
  19. <th>Title</th>
  20. <th>Artist</th>
  21. <th>Country</th>
  22. <th>Company</th>
  23. <th>Price</th>
  24. <th>Year</th>
  25. </tr>
  26. </HeaderTemplate>
  27. <ItemTemplate>
  28. <tr>
  29. <td><%#Container.DataItem("title")%></td>
  30. <td><%#Container.DataItem("artist")%></td>
  31. <td><%#Container.DataItem("country")%></td>
  32. <td><%#Container.DataItem("company")%></td>
  33. <td><%#Container.DataItem("price")%></td>
  34. <td><%#Container.DataItem("year")%></td>
  35. </tr>
  36. </ItemTemplate>
  37. <AlternatingItemTemplate>
  38. <tr bgcolor="#e8e8e8">
  39. <td><%#Container.DataItem("title")%></td>
  40. <td><%#Container.DataItem("artist")%></td>
  41. <td><%#Container.DataItem("country")%></td>
  42. <td><%#Container.DataItem("company")%></td>
  43. <td><%#Container.DataItem("price")%></td>
  44. <td><%#Container.DataItem("year")%></td>
  45. </tr>
  46. </AlternatingItemTemplate>
  47. <FooterTemplate>
  48. </table>
  49. </FooterTemplate>
  50. </asp:Repeater>
  51. </form>

用 <SeparatorTemplate> 重复

  1. <%@ Import Namespace="System.Data" %>
  2. <script runat="server">
  3. sub Page_Load
  4. if Not Page.IsPostBack then
  5. dim mycdcatalog=New DataSet
  6. mycdcatalog.ReadXml(MapPath("cdcatalog.xml"))
  7. cdcatalog.DataSource=mycdcatalog
  8. cdcatalog.DataBind()
  9. end if
  10. end sub
  11. </script>
  12. <!DOCTYPE html>
  13. <meta charset="utf-8" />
  14. <form runat="server">
  15. <asp:Repeater id="cdcatalog" runat="server">
  16. <HeaderTemplate>
  17. <table border="0" width="100%">
  18. <tr>
  19. <th>Title</th>
  20. <th>Artist</th>
  21. <th>Country</th>
  22. <th>Company</th>
  23. <th>Price</th>
  24. <th>Year</th>
  25. </tr>
  26. </HeaderTemplate>
  27. <ItemTemplate>
  28. <tr>
  29. <td><%#Container.DataItem("title")%></td>
  30. <td><%#Container.DataItem("artist")%></td>
  31. <td><%#Container.DataItem("country")%></td>
  32. <td><%#Container.DataItem("company")%></td>
  33. <td><%#Container.DataItem("price")%></td>
  34. <td><%#Container.DataItem("year")%></td>
  35. </tr>
  36. </ItemTemplate>
  37. <SeparatorTemplate>
  38. <tr>
  39. <td colspan="6"><hr /></td>
  40. </tr>
  41. </SeparatorTemplate>
  42. <FooterTemplate>
  43. </table>
  44. </FooterTemplate>
  45. </asp:Repeater>
  46. </form>

Table

  1. <!DOCTYPE html>
  2. <meta charset="utf-8" />
  3. <form runat=server>
  4. <asp:Table runat="server" CellPadding="5"
  5. GridLines="horizontal" HorizontalAlign="Center">
  6. <asp:TableRow>
  7. <asp:TableCell>1</asp:TableCell>
  8. <asp:TableCell>2</asp:TableCell>
  9. </asp:TableRow>
  10. <asp:TableRow>
  11. <asp:TableCell>3</asp:TableCell>
  12. <asp:TableCell>4</asp:TableCell>
  13. </asp:TableRow>
  14. </asp:Table>
  15. <br>
  16. <asp:Table runat="server" CellPadding="5"
  17. GridLines="vertical" HorizontalAlign="Center">
  18. <asp:TableRow>
  19. <asp:TableCell>1</asp:TableCell>
  20. <asp:TableCell>2</asp:TableCell>
  21. </asp:TableRow>
  22. <asp:TableRow>
  23. <asp:TableCell>3</asp:TableCell>
  24. <asp:TableCell>4</asp:TableCell>
  25. </asp:TableRow>
  26. </asp:Table>
  27. </form>

Table 2

  1. <script runat="server">
  2. Sub Page_Load(sender As Object, e As EventArgs)
  3. dim rows,cells,j,i
  4. rows=3
  5. cells=2
  6. For j=0 To rows-1
  7. dim r As New TableRow()
  8. For i=0 To cells-1
  9. dim c As New TableCell()
  10. c.Controls.Add(New LiteralControl("row " & j & ", cell " & i))
  11. r.Cells.Add(c)
  12. Next
  13. Table1.Rows.Add(r)
  14. Next
  15. End Sub
  16. </script>
  17. <!DOCTYPE html>
  18. <meta charset="utf-8" />
  19. <form runat="server">
  20. <asp:Table id="Table1" BorderWidth="1" GridLines="Both" runat="server" />
  21. </form>

Textbox

  1. <script runat="server">
  2. Sub submit(sender As Object, e As EventArgs)
  3. lbl1.Text="Your name is " & txt1.Text
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. Enter your name:
  10. <asp:TextBox id="txt1" runat="server" />
  11. <asp:Button OnClick="submit" Text="Submit" runat="server" />
  12. <p><asp:Label id="lbl1" runat="server" /></p>
  13. </form>

Textbox 2

  1. <script runat="server">
  2. Sub change(sender As Object, e As EventArgs)
  3. lbl1.Text="You changed text to " & txt1.Text
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. Enter your name:
  10. <asp:TextBox id="txt1" runat="server"
  11. text="Hello World!"
  12. ontextchanged="change" autopostback="true"/>
  13. <p><asp:Label id="lbl1" runat="server" /></p>
  14. </form>

Textbox 3

  1. <script runat="server">
  2. Sub change(sender As Object, e As EventArgs)
  3. lbl1.Text="You changed text to " & txt1.Text
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. Enter your name:
  10. <asp:TextBox id="txt1" runat="server"
  11. text="Hello World!"
  12. ontextchanged="change" autopostback="true"/>
  13. <p><asp:Label id="lbl1" runat="server" /></p>
  14. </form>

XML

  1. <!DOCTYPE html>
  2. <meta charset="utf-8">
  3. <form runat="server">
  4. <asp:Xml DocumentSource="cdcatalog.xml" TransformSource="cdcatalog.xsl" runat="server" />
  5. </form>
  6. <p><a href="cdcatalog.xml" target="_blank">View XML file</a></p>
  7. <p><a href="cdcatalog.xsl" target="_blank">View XSL file</a></p>

ASP.NET Validation 控件

CompareValidator

  1. <!DOCTYPE html>
  2. <meta charset="utf-8" />
  3. <form runat="server">
  4. <table border="0" bgcolor="#b0c4de">
  5. <tr valign="top">
  6. <td colspan="4"><h4>Compare two values</h4></td>
  7. </tr>
  8. <tr valign="top">
  9. <td><asp:TextBox id="txt1" runat="server" /></td>
  10. <td> = </td>
  11. <td><asp:TextBox id="txt2" runat="server" /></td>
  12. <td><asp:Button Text="Validate" runat="server" /></td>
  13. </tr>
  14. </table>
  15. <br>
  16. <asp:CompareValidator
  17. id="compval"
  18. Display="dynamic"
  19. ControlToValidate="txt1"
  20. ControlToCompare="txt2"
  21. ForeColor="red"
  22. BackColor="yellow"
  23. Type="String"
  24. EnableClientScript="false"
  25. Text="Validation Failed!"
  26. runat="server" />
  27. </form>

CompareValidator 2

  1. <script runat="server">
  2. sub check_operator(sender As Object, e As EventArgs)
  3. compval.Operator=CType(list.SelectedIndex,ValidationCompareOperator)
  4. compval.Validate()
  5. end sub
  6. </script>
  7. <!DOCTYPE html>
  8. <meta charset="utf-8" />
  9. <form runat="server">
  10. <table border="0" bgcolor="#b0c4de">
  11. <tr valign="top">
  12. <td colspan="4"><h4>Compare two values</h4></td>
  13. </tr>
  14. <tr valign="top">
  15. <td><asp:TextBox id="txt1" runat="server" /></td>
  16. <td>
  17. <asp:ListBox id="list" rows="2" OnSelectedIndexChanged="check_operator" runat="server">
  18. <asp:ListItem value="Equal" selected>=</asp:ListItem>
  19. <asp:ListItem value="NotEqual"><></asp:ListItem>
  20. </asp:ListBox>
  21. </td>
  22. <td><asp:TextBox id="txt2" runat="server" /></td>
  23. <td><asp:Button Text="Validate" runat="server" /></td>
  24. </tr>
  25. </table>
  26. <br>
  27. <asp:CompareValidator
  28. id="compval"
  29. Display="dynamic"
  30. ControlToValidate="txt1"
  31. ControlToCompare="txt2"
  32. ForeColor="red"
  33. BackColor="yellow"
  34. Type="String"
  35. EnableClientScript="false"
  36. Text="Validation Failed!"
  37. runat="server" />
  38. </form>

CustomValidator

  1. <script runat="server">
  2. Sub user(source As object,args As ServerValidateEventArgs)
  3. if len(args.Value)<8 or len(args.Value)>16 then
  4. args.IsValid=false
  5. else
  6. args.IsValid=true
  7. end if
  8. End Sub
  9. </script>
  10. <!DOCTYPE html>
  11. <meta charset="utf-8" />
  12. <form runat="server">
  13. <asp:Label runat="server" Text="Enter a username: " />
  14. <asp:TextBox id="txt1" runat="server" />
  15. <asp:Button Text="Submit" runat="server"/>
  16. <br>
  17. <asp:Label id="mess" runat="server"/>
  18. <br>
  19. <asp:CustomValidator
  20. ControlToValidate="txt1"
  21. OnServerValidate="user"
  22. Text="A username must be between 8 and 16 characters!"
  23. runat="server"/>
  24. </form>

RangeValidator

  1. <!DOCTYPE html>
  2. <meta charset="utf-8" />
  3. <form runat="server">
  4. Enter a date between 2005-01-01 and 2005-12-31:
  5. <br>
  6. <asp:TextBox id="tbox1" runat="server" />
  7. <br><br>
  8. <asp:Button Text="Submit" runat="server" />
  9. <br><br>
  10. <asp:RangeValidator
  11. ControlToValidate="tbox1"
  12. MinimumValue="2005-01-01"
  13. MaximumValue="2005-12-31"
  14. Type="Date"
  15. EnableClientScript="false"
  16. Text="The date must be between 2005-01-01 and 2005-12-31!"
  17. runat="server" />
  18. </form>

RangeValidator 2

  1. <script runat="server">
  2. Sub submit(sender As Object, e As EventArgs)
  3. If Page.IsValid Then
  4. lbl1.Text="Page is valid."
  5. Else
  6. lbl1.Text="Page is not valid!!"
  7. End If
  8. End Sub
  9. </script>
  10. <!DOCTYPE html>
  11. <meta charset="utf-8" />
  12. <form runat="server">
  13. Enter a number from 1 to 100:
  14. <asp:TextBox id="tbox1" runat="server" />
  15. <br><br>
  16. <asp:Button Text="Submit" OnClick="submit" runat="server" />
  17. <br><br>
  18. <asp:Label id="lbl1" runat="server" />
  19. <br>
  20. <asp:RangeValidator
  21. ControlToValidate="tbox1"
  22. MinimumValue="1"
  23. MaximumValue="100"
  24. Type="Integer"
  25. EnableClientScript="false"
  26. Text="The value must be from 1 to 100!"
  27. runat="server" />
  28. </form>

RegularExpressionValidator

  1. <script runat="server">
  2. sub submit(sender As Object, e As EventArgs)
  3. if Page.IsValid then
  4. lbl.Text="The page is valid!"
  5. else
  6. lbl.Text="The page is not valid!"
  7. end if
  8. end sub
  9. </script>
  10. <!DOCTYPE html>
  11. <meta charset="utf-8" />
  12. <form runat="server">
  13. Enter a US zip code:
  14. <asp:TextBox id="txtbox1" runat="server" />
  15. <br><br>
  16. <asp:Button text="Submit" OnClick="submit" runat="server" />
  17. <br><br>
  18. <asp:Label id="lbl" runat="server" />
  19. <br>
  20. <asp:RegularExpressionValidator
  21. ControlToValidate="txtbox1"
  22. ValidationExpression="\d{5}"
  23. EnableClientScript="false"
  24. ErrorMessage="The zip code must be 5 numeric digits!"
  25. runat="server" />
  26. </form>

RequiredFieldValidator

  1. <!DOCTYPE html>
  2. <meta charset="utf-8">
  3. <form runat="server">
  4. Name: <asp:TextBox id="name" runat="server" />
  5. <br>
  6. Age: <asp:TextBox id="age" runat="server" />
  7. <br><br>
  8. <asp:Button runat="server" Text="Submit" />
  9. <br><br>
  10. <asp:RequiredFieldValidator
  11. ControlToValidate="name"
  12. Text="The name field is required!"
  13. runat="server" />
  14. </form>

Validationsummary

  1. <!DOCTYPE html>
  2. <meta charset="utf-8" />
  3. <form runat="server">
  4. <table>
  5. <tr>
  6. <td>
  7. <table bgcolor="#b0c4de" cellspacing="10">
  8. <tr>
  9. <td align="right">Name:</td>
  10. <td><asp:TextBox id="txt_name" runat="server"/></td>
  11. <td>
  12. <asp:RequiredFieldValidator
  13. ControlToValidate="txt_name"
  14. ErrorMessage="Name"
  15. Text="*"
  16. runat="server"/>
  17. </td>
  18. </tr>
  19. <tr>
  20. <td align="right">Card Type:</td>
  21. <td>
  22. <asp:RadioButtonList id="rlist_type"
  23. RepeatLayout="Flow"
  24. runat="server">
  25. <asp:ListItem>Diners</asp:ListItem>
  26. <asp:ListItem>MasterCard</asp:ListItem>
  27. <asp:ListItem>Visa</asp:ListItem>
  28. </asp:RadioButtonList>
  29. </td>
  30. <td>
  31. <asp:RequiredFieldValidator
  32. ControlToValidate="rlist_type"
  33. ErrorMessage="Card Type"
  34. InitialValue=""
  35. Text="*"
  36. runat="server"/>
  37. </td>
  38. </tr>
  39. <tr>
  40. <td></td>
  41. <td><asp:Button id="b1" Text="Submit" runat="server"/></td>
  42. <td></td>
  43. </tr>
  44. </table>
  45. </td>
  46. </tr>
  47. </table>
  48. <br>
  49. <asp:ValidationSummary
  50. HeaderText="You must enter a value in the following fields:"
  51. DisplayMode="BulletList"
  52. EnableClientScript="true"
  53. runat="server"/>
  54. </form>

Validationsummary 2

  1. <!DOCTYPE html>
  2. <meta charset="utf-8" />
  3. <form runat="server">
  4. <table>
  5. <tr>
  6. <td>
  7. <table bgcolor="#b0c4de" cellspacing="10">
  8. <tr>
  9. <td align="right">Name:</td>
  10. <td><asp:TextBox id="txt_name" runat="server"/></td>
  11. <td>
  12. <asp:RequiredFieldValidator
  13. ControlToValidate="txt_name"
  14. ErrorMessage="Name"
  15. Text="*"
  16. runat="server"/>
  17. </td>
  18. </tr>
  19. <tr>
  20. <td align="right">Card Type:</td>
  21. <td>
  22. <asp:RadioButtonList id="rlist_type"
  23. RepeatLayout="Flow"
  24. runat="server">
  25. <asp:ListItem>Diners</asp:ListItem>
  26. <asp:ListItem>MasterCard</asp:ListItem>
  27. <asp:ListItem>Visa</asp:ListItem>
  28. </asp:RadioButtonList>
  29. </td>
  30. <td>
  31. <asp:RequiredFieldValidator
  32. ControlToValidate="rlist_type"
  33. ErrorMessage="Card Type"
  34. InitialValue=""
  35. Text="*"
  36. runat="server"/>
  37. </td>
  38. </tr>
  39. <tr>
  40. <td></td>
  41. <td><asp:Button id="b1" Text="Submit" runat="server"/></td>
  42. <td></td>
  43. </tr>
  44. </table>
  45. </td>
  46. </tr>
  47. </table>
  48. <asp:ValidationSummary
  49. ShowMessageBox="true"
  50. ShowSummary="false"
  51. HeaderText="You must enter a value in the following fields:"
  52. EnableClientScript="true"
  53. runat="server"/>
  54. </form>

ASP.NET 事件

Page_Load

  1. <script runat="server">
  2. Sub Page_Load
  3. lbl1.Text="The date and time is " & now()
  4. End Sub
  5. </script>
  6. <!DOCTYPE html>
  7. <meta charset="utf-8" />
  8. <form runat="server">
  9. <h3><asp:label id="lbl1" runat="server" /></h3>
  10. </form>

Page.IsPostBack

  1. <script runat="server">
  2. Sub Page_Load
  3. if Not Page.IsPostBack then
  4. lbl1.Text="The date and time is " & now()
  5. end if
  6. End Sub
  7. Sub submit(s As Object, e As EventArgs)
  8. lbl2.Text="Hello World!"
  9. End Sub
  10. </script>
  11. <!DOCTYPE html>
  12. <meta charset="utf-8" />
  13. <form runat="server">
  14. <h3><asp:label id="lbl1" runat="server" /></h3>
  15. <h3><asp:label id="lbl2" runat="server" /></h3>
  16. <asp:button text="Submit" onclick="submit" runat="server" />
  17. </form>

ASP.NET 数据绑定

ArrayList RadioButtonList

  1. <script runat="server">
  2. Sub Page_Load
  3. if Not Page.IsPostBack then
  4. dim mycountries=New ArrayList
  5. mycountries.Add("Norway")
  6. mycountries.Add("Sweden")
  7. mycountries.Add("France")
  8. mycountries.Add("Italy")
  9. mycountries.TrimToSize()
  10. mycountries.Sort()
  11. rb.DataSource=mycountries
  12. rb.DataBind()
  13. end if
  14. end sub
  15. sub displayMessage(s as Object,e As EventArgs)
  16. lbl1.text="Your favorite country is: " & rb.SelectedItem.Text
  17. end sub
  18. </script>
  19. <!DOCTYPE html>
  20. <meta charset="utf-8" />
  21. <form runat="server">
  22. <asp:RadioButtonList id="rb" runat="server"
  23. AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
  24. <p><asp:label id="lbl1" runat="server" /></p>
  25. </form>

ArrayList DropDownList

  1. <script runat="server">
  2. sub Page_Load
  3. if Not Page.IsPostBack then
  4. dim mycountries=New ArrayList
  5. mycountries.Add("Norway")
  6. mycountries.Add("Sweden")
  7. mycountries.Add("France")
  8. mycountries.Add("Italy")
  9. mycountries.TrimToSize()
  10. mycountries.Sort()
  11. dd.DataSource=mycountries
  12. dd.DataBind()
  13. end if
  14. end sub
  15. sub displayMessage(s as Object,e As EventArgs)
  16. lbl1.text="Your favorite country is: " & dd.SelectedItem.Text
  17. end sub
  18. </script>
  19. <!DOCTYPE html>
  20. <meta charset="utf-8" />
  21. <form runat="server">
  22. <asp:DropDownList id="dd" runat="server"
  23. AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
  24. <p><asp:label id="lbl1" runat="server" /></p>
  25. </form>

Hashtable RadioButtonList 1

  1. <script runat="server">
  2. sub Page_Load
  3. if Not Page.IsPostBack then
  4. dim mycountries=New Hashtable
  5. mycountries.Add("N","Norway")
  6. mycountries.Add("S","Sweden")
  7. mycountries.Add("F","France")
  8. mycountries.Add("I","Italy")
  9. rb.DataSource=mycountries
  10. rb.DataValueField="Key"
  11. rb.DataTextField="Value"
  12. rb.DataBind()
  13. end if
  14. end sub
  15. sub displayMessage(s as Object,e As EventArgs)
  16. lbl1.text="Your favorite country is: " & rb.SelectedItem.Text
  17. end sub
  18. </script>
  19. <!DOCTYPE html>
  20. <meta charset="utf-8" />
  21. <form runat="server">
  22. <asp:RadioButtonList id="rb" runat="server"
  23. AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
  24. <p><asp:label id="lbl1" runat="server" /></p>
  25. </form>

Hashtable RadiobuttonList 2

  1. <script runat="server">
  2. sub Page_Load
  3. if Not Page.IsPostBack then
  4. dim navigate=New Hashtable
  5. navigate.Add("RadioButtonList","control_radiobuttonlist.asp")
  6. navigate.Add("CheckBoxList","control_checkboxlist.asp")
  7. navigate.Add("DropDownList","control_dropdownlist.asp")
  8. navigate.Add("ListBox","control_listbox.asp")
  9. rb.DataSource=navigate
  10. rb.DataValueField="Value"
  11. rb.DataTextField="Key"
  12. rb.DataBind()
  13. end if
  14. end sub
  15. sub navigate(s as Object, e As EventArgs)
  16. response.redirect(rb.SelectedItem.Value)
  17. end sub
  18. </script>
  19. <!DOCTYPE html>
  20. <meta charset="utf-8" />
  21. <form runat="server">
  22. <asp:RadioButtonList id="rb" runat="server"
  23. AutoPostBack="True" onSelectedIndexChanged="navigate" />
  24. </form>

Hashtable DropDownList

  1. <script runat="server">
  2. sub Page_Load
  3. if Not Page.IsPostBack then
  4. dim mycountries=New Hashtable
  5. mycountries.Add("N","Norway")
  6. mycountries.Add("S","Sweden")
  7. mycountries.Add("F","France")
  8. mycountries.Add("I","Italy")
  9. dd.DataSource=mycountries
  10. dd.DataValueField="Key"
  11. dd.DataTextField="Value"
  12. dd.DataBind()
  13. end if
  14. end sub
  15. sub displayMessage(s as Object,e As EventArgs)
  16. lbl1.text="Your favorite country is: " & dd.SelectedItem.Text
  17. end sub
  18. </script>
  19. <!DOCTYPE html>
  20. <meta charset="utf-8" />
  21. <form runat="server">
  22. <asp:DropDownList id="dd" runat="server"
  23. AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
  24. <p><asp:label id="lbl1" runat="server" /></p>
  25. </form>

SortedList RadioButtonList 1

  1. <script runat="server">
  2. sub Page_Load
  3. if Not Page.IsPostBack then
  4. dim mycountries=New SortedList
  5. mycountries.Add("N","Norway")
  6. mycountries.Add("S","Sweden")
  7. mycountries.Add("F","France")
  8. mycountries.Add("I","Italy")
  9. rb.DataSource=mycountries
  10. rb.DataValueField="Key"
  11. rb.DataTextField="Value"
  12. rb.DataBind()
  13. end if
  14. end sub
  15. sub displayMessage(s as Object,e As EventArgs)
  16. lbl1.text="Your favorite country is: " & rb.SelectedItem.Text
  17. end sub
  18. </script>
  19. <!DOCTYPE html>
  20. <meta charset="utf-8" />
  21. <form runat="server">
  22. <asp:RadioButtonList id="rb" runat="server"
  23. AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
  24. <p><asp:label id="lbl1" runat="server" /></p>
  25. </form>

SortedList RadiobuttonList 2

  1. <script runat="server">
  2. sub Page_Load
  3. if Not Page.IsPostBack then
  4. dim navigate=New SortedList
  5. navigate.Add("RadioButtonList","control_radiobuttonlist.asp")
  6. navigate.Add("CheckBoxList","control_checkboxlist.asp")
  7. navigate.Add("DropDownList","control_dropdownlist.asp")
  8. navigate.Add("ListBox","control_listbox.asp")
  9. rb.DataSource=navigate
  10. rb.DataValueField="Value"
  11. rb.DataTextField="Key"
  12. rb.DataBind()
  13. end if
  14. end sub
  15. sub navigate(s as Object, e As EventArgs)
  16. response.redirect(rb.SelectedItem.Value)
  17. end sub
  18. </script>
  19. <!DOCTYPE html>
  20. <meta charset="utf-8" />
  21. <form runat="server">
  22. <asp:RadioButtonList id="rb" runat="server"
  23. AutoPostBack="True" onSelectedIndexChanged="navigate" />
  24. </form>

SortedList DropDownList

  1. <script runat="server">
  2. sub Page_Load
  3. if Not Page.IsPostBack then
  4. dim mycountries=New SortedList
  5. mycountries.Add("N","Norway")
  6. mycountries.Add("S","Sweden")
  7. mycountries.Add("F","France")
  8. mycountries.Add("I","Italy")
  9. dd.DataSource=mycountries
  10. dd.DataValueField="Key"
  11. dd.DataTextField="Value"
  12. dd.DataBind()
  13. end if
  14. end sub
  15. sub displayMessage(s as Object,e As EventArgs)
  16. lbl1.text="Your favorite country is: " & dd.SelectedItem.Text
  17. end sub
  18. </script>
  19. <!DOCTYPE html>
  20. <meta charset="utf-8" />
  21. <form runat="server">
  22. <asp:DropDownList id="dd" runat="server"
  23. AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
  24. <p><asp:label id="lbl1" runat="server" /></p>
  25. </form>

XML RadiobuttonList

  1. <%@ Import Namespace="System.Data" %>
  2. <script runat="server">
  3. sub Page_Load
  4. if Not Page.IsPostBack then
  5. dim mycountries=New DataSet
  6. mycountries.ReadXml(MapPath("countries.xml"))
  7. rb.DataSource=mycountries
  8. rb.DataValueField="value"
  9. rb.DataTextField="text"
  10. rb.DataBind()
  11. end if
  12. end sub
  13. sub displayMessage(s as Object,e As EventArgs)
  14. lbl1.text="Your favorite country is: " & rb.SelectedItem.Text
  15. end sub
  16. </script>
  17. <!DOCTYPE html>
  18. <meta charset="utf-8" />
  19. <form runat="server">
  20. <asp:RadioButtonList id="rb" runat="server"
  21. AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
  22. <p><asp:label id="lbl1" runat="server" /></p>
  23. </form>

ASP.NET 数据库

数据库链接 - 绑定一个 Repeater 控件

  1. <%@ Import Namespace="System.Data.OleDb" %>
  2. <script runat="server">
  3. sub Page_Load
  4. dim dbconn,sql,dbcomm,dbread
  5. dbconn=New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;data source=" & server.mappath("/db/northwind.mdb"))
  6. dbconn.Open()
  7. sql="SELECT * FROM customers"
  8. dbcomm=New OleDbCommand(sql,dbconn)
  9. dbread=dbcomm.ExecuteReader()
  10. customers.DataSource=dbread
  11. customers.DataBind()
  12. dbread.Close()
  13. dbconn.Close()
  14. end sub
  15. </script>
  16. <!DOCTYPE html>
  17. <meta charset="utf-8" />
  18. <form runat="server">
  19. <asp:Repeater id="customers" runat="server">
  20. <HeaderTemplate>
  21. <table border="1" width="100%">
  22. <tr bgcolor="#b0c4de">
  23. <th>Companyname</th>
  24. <th>Contactname</th>
  25. <th>Address</th>
  26. <th>City</th>
  27. </tr>
  28. </HeaderTemplate>
  29. <ItemTemplate>
  30. <tr bgcolor="#f0f0f0">
  31. <td><%#Container.DataItem("companyname")%> </td>
  32. <td><%#Container.DataItem("contactname")%> </td>
  33. <td><%#Container.DataItem("address")%> </td>
  34. <td><%#Container.DataItem("city")%> </td>
  35. </tr>
  36. </ItemTemplate>
  37. <FooterTemplate>
  38. </table>
  39. </FooterTemplate>
  40. </asp:Repeater>
  41. </form>

数据库链接 - 绑定一个 DataList 控件

  1. <%@ Import Namespace="System.Data.OleDb" %>
  2. <script runat="server">
  3. sub Page_Load
  4. dim dbconn,sql,dbcomm,dbread
  5. dbconn=New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;data source=" & server.mappath("/db/northwind.mdb"))
  6. dbconn.Open()
  7. sql="SELECT * FROM customers"
  8. dbcomm=New OleDbCommand(sql,dbconn)
  9. dbread=dbcomm.ExecuteReader()
  10. customers.DataSource=dbread
  11. customers.DataBind()
  12. dbread.Close()
  13. dbconn.Close()
  14. end sub
  15. </script>
  16. <!DOCTYPE html>
  17. <meta charset="utf-8" />
  18. <form runat="server">
  19. <asp:DataList
  20. id="customers"
  21. runat="server"
  22. cellpadding="2"
  23. cellspacing="2"
  24. borderstyle="inset"
  25. backcolor="#e8e8e8"
  26. width="100%"
  27. headerstyle-font-name="Verdana"
  28. headerstyle-font-size="12pt"
  29. headerstyle-horizontalalign="center"
  30. headerstyle-font-bold="True"
  31. itemstyle-backcolor="#778899"
  32. itemstyle-forecolor="#ffffff"
  33. footerstyle-font-size="9pt"
  34. footerstyle-font-italic="True">
  35. <HeaderTemplate>
  36. Customers Table
  37. </HeaderTemplate>
  38. <ItemTemplate>
  39. <%#Container.DataItem("companyname")%> in
  40. <%#Container.DataItem("address")%>, <%#Container.DataItem("city")%>
  41. </ItemTemplate>
  42. <FooterTemplate>
  43. Source: Northwind Database
  44. </FooterTemplate>
  45. </asp:DataList>
  46. </form>
0 条回复 A文章作者 M管理员
欢迎您,新朋友,感谢参与互动!
    暂无讨论,说说你的看法吧
个人中心
今日签到
私信列表
搜索