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

需要支持?

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

ASP.NET Web Forms 范例

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

ASP.NET HTML 控件

HTML Anchor

<script  runat="server">
Sub Page_Load
   link1.HRef="https://www.twle.cn"
   link1.Target="_blank"
   link1.Title="twle.cn"

   link2.HRef="https://www.microsoft.com"
   link2.Target="_blank"
   link2.Title="Microsoft"
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8"/>

<form runat="server">
<a id="link1" runat="server">Visit twle.cn!</a>
<br>
<a id="link2" runat="server">Visit Microsoft!</a>
</form>

HTML Button

<script  runat="server">
Sub button1(Source As Object, e As EventArgs)
   p1.InnerHtml="You clicked the blue button!"
End Sub
Sub button2(Source As Object, e As EventArgs)
   p1.InnerHtml="You clicked the pink button!"
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<button id="b1" OnServerClick="button1" style="background-color:#e6e6fa; height:25;width:100" runat="server">
Blue button!
</button>
<button id="b2" OnServerClick="button2" style="background-color:#fff0f5;height:25;width:100" runat="server">
Pink button!
</button>
<p id="p1" runat="server" />
</form>

HTML Image

<script  runat="server">
Sub Page_Load(Sender As Object,E As EventArgs)
   image1.Src="/static/i/smiley.gif"
   image1.Alt="Smiley"
   image1.Border="3"
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8"/>
<form runat="server">
<img id="image1" runat="server" />
</form>

HTML Image 2

<script  runat="server">
Sub choose_image(Sender As Object, e As EventArgs)
   image1.Src = select1.Value
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<select id="select1" runat="server">
   <option value="/static/i/smiley.gif">Smiley</option>
   <option value="/static/i/angry.gif">Angry</option>
   <option value="/static/i/stickman.gif">Stickman</option>
</select>
<input type="submit" runat="server" value="Display image"
OnServerClick="choose_image">
<br><br>
<img id="image1" src="smiley.gif" runat="server" width="32" height="32" />
</form>

HTML Inputbutton

<script  runat="server">
Sub submit(sender As Object, e as EventArgs)
if name.value<>"" then
   p1.InnerHtml="Welcome " & name.value & "!"
end if
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
Enter your name: <input id="name" type="text" size="30" runat="server" />
<br><br>
<input type="submit" value="Submit" OnServerClick="submit" runat="server" />
<p id="p1" runat="server" />
</form>

HTML InputCheckbox

<script  runat="server">
Sub submit(Source As Object, e As EventArgs)
if red.Checked=True then
   p1.InnerHtml="You prefer red!"
else
   p1.InnerHtml="You prefer blue!"
end if
red.checked=false
blue.checked=false
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
What color do you prefer?
<br>
<input id="red" type="checkbox" runat="server" /> Red
<br>
<input id="blue" type="checkbox" runat="server" /> Blue
<br>
<input type="button" value="Submit" OnServerClick="submit" runat="server"/>
<p id="p1" runat="server" />
</form>

HTML InputHidden

<script  runat="server">
Sub submit(Source As Object, e As EventArgs)
      hidden1.Value=string1.Value
      p1.InnerHtml="Hidden value= " + hidden1.Value
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
Enter some text: <input id="string1" type="text" size="25" runat="server" />
<input type="submit" value="Submit" OnServerClick="submit" runat="server" />
<input id="hidden1" type="hidden" runat="server" />
<p id="p1" runat="server" />
</form>

HTML InputImage

<script  runat="server">
Sub button1(Source As Object, e As ImageClickEventArgs)
      p1.InnerHtml="You clicked the smiley button!"
End Sub
Sub button2(Source As Object, e As ImageClickEventArgs)
      p1.InnerHtml="You clicked the angry button!"
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<p>Click on one of the images:</p>
<p>
<input type="image" src="/static/i/smiley.gif"
OnServerClick="button1" runat="server" width="32" height="32" />
</p>
<p>
<input type="image" src="/static/i/angry.gif"
OnServerClick="button2" runat="server" width="32" height="32" />
</p>
<p id="p1" runat="server" />
</form>

HTML InputRadiobutton

<script  runat="server">
Sub submit(Source As Object, e As EventArgs)
if r1.Checked=True then
   p1.InnerHtml="Your favorite color is red"
else
   if r2.Checked=True then
     p1.InnerHtml="Your favorite color is green"
   else
     if r3.Checked=True then
       p1.InnerHtml="Your favorite color is blue"
     end if
   end if
end if
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<p>Select your favorite color:
<br>
<input id="r1" name="col" type="radio" runat="server">Red</input>
<br>
<input id="r2" name="col" type="radio" runat="server">Green</input>
<br>
<input id="r3" name="col" type="radio" runat="server">Blue</input>
<br>
<input type="button" value="Submit" OnServerClick="submit" runat="server"/>
<p id="p1" runat="server" />
</form>

HTML Table

<script  runat="server">
Sub submit(sender As Object, e As EventArgs)
Dim row,numrows,numcells,j,i
row=0
numrows=cint(rows1.Value)
numcells=cint(cells1.Value)
for j=1 to numrows
   Dim r As New HtmlTableRow()
   row=row+1
   for i=1 to numcells
     Dim c As New HtmlTableCell()
     c.Controls.Add(New LiteralControl("row " & j & ", cell " & i))
     r.Cells.Add(c)
   next
   t1.Rows.Add(r)
   t1.Visible=true
next
End Sub 
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<p>Table rows:
<select id="rows1" runat="server">
   <option value="1">1</option>
   <option value="2">2</option>
   <option value="3">3</option>
</select>
<br>Table cells: 
<select id="cells1" runat="server">
   <option value="1">1</option>
   <option value="2">2</option>
   <option value="3">3</option>
</select>
<br><br>
<input type="submit" value="Display Table" runat="server" OnServerClick="submit">
</p>
<table id="t1" border="1" runat="server" visible="false"/>
</form>

HTML Table 2

<script  runat="server">
Sub submit(sender As Object, e As EventArgs) 
dim i,j
table1.BGColor="yellow"
table1.BorderColor="red"
for i=0 To table1.Rows.Count-1
   for j=0 To table1.Rows(i).Cells.Count-1
     table1.Rows(i).Cells(j).InnerHtml="Row " & i 
   next
next
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<table id="table1" border="1" runat="server">
   <tr>
     <td>Cell 1</td>
     <td>Cell 2</td>
   </tr>
   <tr>
     <td>Cell 3</td>
     <td>Cell 4</td>
   </tr>
</table>
<br>
<input type="button" value="Change Contents" OnServerClick="submit" runat="server"/>
</form>

HTML Textarea

<script  runat="server">
Sub submit(sender As Object, e As EventArgs)
   p1.InnerHtml = "<b>You wrote:</b> " & textarea1.Value
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
Enter some text:<br>
<textarea id="textarea1" cols="35" rows="6" runat="server" />
<input type="submit" value="Submit" OnServerClick="submit" runat="server" />
<p id="p1" runat="server" />
</form>

ASP.NET Web 控件

AdRotator

<%
url=Request.QueryString("url")
If url<>"" then Response.Redirect(url)
%>
<!DOCTYPE html>
<meta charset="utf-8" />
<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
adrotator.TargetFrame="target='_blank'"
response.write(adrotator.GetAdvertisement("text/advertisements.txt"))
%>

<p>
NOTE: Because images are changed randomly, and because this page has few images to choose from, it will 
often display the same advertisement twice in a row.
</p>

<p>NOTE: The AdRotator does not work with Internet Information Server 7 (IIS7).</p>

<p>
<a href="text/advertisements.txt">
<img src="/static/i/btn_view_text.gif"></a>
</p>

Button

<script  runat="server">
Sub submit(Source As Object, e As EventArgs)
   button1.Text="You clicked me!"
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:Button id="button1" Text="Click me!" runat="server" OnClick="submit" />
</form>

Button 2

<script  runat="server">
Sub submit(Source As Object, e As EventArgs)
   button1.Style("background-color")="#0000ff"
   button1.Style("color")="#ffffff"
   button1.Style("width")="200px"
   button1.Style("cursor")="pointer"
   button1.Style("font-family")="verdana"
   button1.Style("font-weight")="bold"
   button1.Style("font-size")="14pt"
   button1.Text="You clicked me!"
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:Button id="button1" Text="Click me!" runat="server" OnClick="submit" />
</form>

Calendar

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:Calendar runat="server" />
</form>

Calendar 2

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:Calendar DayNameFormat="Full" runat="server">
   <WeekendDayStyle BackColor="#fafad2" ForeColor="#ff0000" />
   <DayHeaderStyle ForeColor="#0000ff" />
   <TodayDayStyle BackColor="#00ff00" />
</asp:Calendar>
</form>

Calendar 3

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:Calendar DayNameFormat="Full" runat="server"
SelectionMode="DayWeekMonth"
SelectMonthText="<*>"
SelectWeekText="<->"/>
   <SelectorStyle BackColor="#f5f5f5" />
</asp:Calendar>
</form>

Checkbox

<script  runat="server">
   Sub Check(sender As Object, e As EventArgs) 
     if check1.Checked then
       work.Text=home.Text
     else
       work.Text=""
     end if
   End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<p>Home Phone:
<asp:TextBox id="home" runat="server" />
<br>
Work Phone:
<asp:TextBox id="work" runat="server" />
<asp:CheckBox id="check1"
Text="Same as home phone" TextAlign="Right"
AutoPostBack="True" OnCheckedChanged="Check"
runat="server" />
</p>
</form>

CheckboxList

<script  runat="server">
Sub Check(sender As Object, e As EventArgs)
   dim i
   mess.Text="<p>Selected Item(s):</p>"
   for i=0 to check1.Items.Count-1
     if check1.Items(i).Selected then
       mess.Text+=check1.Items(i).Text + "<br>"
     end if
   next
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:CheckBoxList id="check1" AutoPostBack="True"
TextAlign="Right" OnSelectedIndexChanged="Check"
runat="server">
<asp:ListItem>Item 1</asp:ListItem>
<asp:ListItem>Item 2</asp:ListItem>
<asp:ListItem>Item 3</asp:ListItem>
<asp:ListItem>Item 4</asp:ListItem>
<asp:ListItem>Item 5</asp:ListItem>
<asp:ListItem>Item 6</asp:ListItem>
</asp:CheckBoxList>
<br>
<asp:label id="mess" runat="server"/>
</form>

DataList

<%@ Import Namespace="System.Data" %>
<script runat="server">
sub Page_Load
if Not Page.IsPostBack then
  dim mycdcatalog=New DataSet
  mycdcatalog.ReadXml(MapPath("cdcatalog.xml"))
  cdcatalog.DataSource=mycdcatalog
  cdcatalog.DataBind()
end if
end sub
</script>
<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:DataList id="cdcatalog"
gridlines="both" runat="server">
<HeaderTemplate>
My CD Catalog
</HeaderTemplate>
<ItemTemplate>
"<%#Container.DataItem("title")%>" of
<%#Container.DataItem("artist")%> -
$<%#Container.DataItem("price")%>
</ItemTemplate>
<FooterTemplate>
Copyright Hege Refsnes
</FooterTemplate>
</asp:DataList>
</form>

用 styles 的DataList

<%@ Import Namespace="System.Data" %>
<script runat="server">
sub Page_Load
if Not Page.IsPostBack then
  dim mycdcatalog=New DataSet
  mycdcatalog.ReadXml(MapPath("cdcatalog.xml"))
  cdcatalog.DataSource=mycdcatalog
  cdcatalog.DataBind()
end if
end sub
</script>
<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:DataList id="cdcatalog" 
runat="server" 
cellpadding="2" 
cellspacing="2" 
borderstyle="inset" 
backcolor="#e8e8e8" 
width="100%"
headerstyle-font-name="Verdana" 
headerstyle-font-size="12pt" 
headerstyle-horizontalalign="center" 
headerstyle-font-bold="true" 
itemstyle-backcolor="#778899" 
itemstyle-forecolor="#ffffff" 
footerstyle-font-size="9pt" 
footerstyle-font-italic="true">
<HeaderTemplate>
My CD Catalog
</HeaderTemplate>
<ItemTemplate>
"<%#Container.DataItem("title")%>" of
<%#Container.DataItem("artist")%> -
$<%#Container.DataItem("price")%>
</ItemTemplate>
<FooterTemplate>
Copyright Hege Refsnes
</FooterTemplate>
</asp:DataList>
</form>

用 <AlternatingItemTemplate> 的DataList

<%@ Import Namespace="System.Data" %>
<script runat="server">
sub Page_Load
if Not Page.IsPostBack then
dim mycdcatalog=New DataSet
mycdcatalog.ReadXml(MapPath("cdcatalog.xml"))
cdcatalog.DataSource=mycdcatalog
cdcatalog.DataBind()
end if
end sub
</script>
<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:DataList id="cdcatalog"
runat="server"
cellpadding="2"
cellspacing="2"
borderstyle="inset"
backcolor="#e8e8e8"
width="100%"
headerstyle-font-name="Verdana"
headerstyle-font-size="12pt"
headerstyle-horizontalalign="center"
headerstyle-font-bold="True"
itemstyle-backcolor="#778899"
itemstyle-forecolor="#ffffff"
alternatingitemstyle-backcolor="#e8e8e8"
alternatingitemstyle-forecolor="#000000"
footerstyle-font-size="9pt"
footerstyle-font-italic="True">
<HeaderTemplate>My CD Catalog</HeaderTemplate>
<ItemTemplate>
"<%#Container.DataItem("title")%>" of
<%#Container.DataItem("artist")%> -
$<%#Container.DataItem("price")%>
</ItemTemplate>
<AlternatingItemTemplate>
"<%#Container.DataItem("title")%>" of
<%#Container.DataItem("artist")%> -
$<%#Container.DataItem("price")%>
</AlternatingItemTemplate>
<FooterTemplate>
© Hege Refsnes
</FooterTemplate>
</asp:DataList>
</form>

DropdownList

<script  runat="server">
Sub submit(sender As Object, e As EventArgs)
   mess.Text="You selected " & drop1.SelectedItem.Text
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:DropDownList id="drop1" runat="server">
<asp:ListItem>Item 1</asp:ListItem>
<asp:ListItem>Item 2</asp:ListItem>
<asp:ListItem>Item 3</asp:ListItem>
<asp:ListItem>Item 4</asp:ListItem>
<asp:ListItem>Item 5</asp:ListItem>
<asp:ListItem>Item 6</asp:ListItem>
</asp:DropDownList>
<asp:Button Text="Submit" OnClick="submit" runat="server"/>
<p><asp:label id="mess" runat="server"/></p>
</form>

Hyperlink

<!DOCTYPE html>
<meta  charset="utf-8" />

<form runat="server">
<asp:HyperLink
ImageUrl="/static/i/banners/w6.gif"
NavigateUrl="https://www.twle.cn"
Text="Visit twle.cn!"
Target="_blank"
runat="server" />
</form>

Image

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

ImageButton

<script  runat="server">
Sub getCoordinates(sender As Object, e As ImageClickEventArgs) 
   mess.Text="Coordinates: " & e.x & ", " & e.y
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<p>Click on the image:</p>
<asp:ImageButton
runat="server"
ImageUrl="/static/i/smiley.gif"
OnClick="getCoordinates"/>
<p><asp:label id="mess" runat="server"/></p>
</form>

Label

<script  runat="server">
Sub submit(Sender As Object, e As EventArgs) 
   label1.Text=txt1.Text
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
Write some text:
<asp:TextBox id="txt1" Width="200" runat="server" />
<asp:Button id="b1" Text="Copy to Label" OnClick="submit" runat="server" />
<p><asp:Label id="label1" runat="server" /></p>
</form>

LinkButton

<script  runat="server">
Sub lblClick(sender As Object, e As EventArgs) 
   Label1.Text="You clicked the LinkButton control"
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:LinkButton Text="Click me!" OnClick="lblClick" runat="server" />
<p><asp:Label id="Label1" runat="server" /></p>
</form>

Listbox

<script  runat="server">
Sub submit(Sender As Object,e As EventArgs)
mess.Text="You selected " & drop1.SelectedItem.Text
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:ListBox id="drop1" rows="3" runat="server">
<asp:ListItem selected="true">Item 1</asp:ListItem>
<asp:ListItem>Item 2</asp:ListItem>
<asp:ListItem>Item 3</asp:ListItem>
<asp:ListItem>Item 4</asp:ListItem>
<asp:ListItem>Item 5</asp:ListItem>
<asp:ListItem>Item 6</asp:ListItem>
</asp:ListBox>
<asp:Button Text="Submit" OnClick="submit" runat="server" />
<p><asp:label id="mess" runat="server" /></p>
</form>

Literal

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:Literal Text="I love ASP. NET!" runat="server" />
</form>

Literal 2

<script  runat="server">
Sub submit(sender As Object, e As EventArgs)
   Literal1.Text="I love ASP.NET!"
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:Literal id="Literal1" Text="I love ASP!" runat="server" />
<br><br>
<asp:Button Text="Change Text" OnClick="submit" runat="server" />
</form>

Panel

<script  runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
   if check1.Checked then
     panel1.Visible=false
   else
     panel1.Visible=true
   end if
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:Panel id="panel1"
runat="server" BackColor="#ff0000"
Height="100px" Width="100px">
Hello World!
</asp:Panel>
<asp:CheckBox id="check1"
Text="Hide Panel control"
runat="server"/>
<br><br>
<asp:Button Text="Reload" runat="server" />
</form>

Radiobutton

<script  runat="server">
Sub submit(Sender As Object, e As EventArgs)
if red.Checked then
   Label1.Text="You selected " & red.Text
elseIf green.Checked then
   Label1.Text="You selected " & green.Text
elseIf blue.Checked then
   Label1.Text="You selected " & blue.Text
end if
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
Select your favorite color:
<br>
<asp:RadioButton id="red" Text="Red" Checked="True" 
GroupName="colors" runat="server"/>
<br>
<asp:RadioButton id="green" Text="Green"
GroupName="colors" runat="server"/>
<br>
<asp:RadioButton id="blue" Text="Blue" 
GroupName="colors" runat="server"/>
<br>
<asp:Button text="Submit" OnClick="submit" runat="server"/>
<p><asp:Label id="Label1" runat="server"/></p>
</form>

RadiobuttonList

<script  runat="server">
Sub submit(sender As Object, e As EventArgs)
   label1.Text="You selected " & radiolist1.SelectedItem.Text
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:RadioButtonList id="radiolist1" runat="server">
   <asp:ListItem selected="true">Item 1</asp:ListItem>
   <asp:ListItem>Item 2</asp:ListItem>
   <asp:ListItem>Item 3</asp:ListItem>
   <asp:ListItem>Item 4</asp:ListItem>
</asp:RadioButtonList>
<br>
<asp:Button text="Submit" OnClick="submit" runat="server"/>
<p><asp:Label id="Label1" runat="server"/></p>
</form>

Repeater

<%@ Import Namespace="System.Data" %>
<script runat="server">
sub Page_Load
if Not Page.IsPostBack then
  dim mycdcatalog=New DataSet
  mycdcatalog.ReadXml(MapPath("cdcatalog.xml"))
  cdcatalog.DataSource=mycdcatalog
  cdcatalog.DataBind()
end if
end sub
</script>
<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:Repeater id="cdcatalog" runat="server">
<HeaderTemplate>
<table border="1" width="100%">
<tr>
<th>Title</th>
<th>Artist</th>
<th>Country</th>
<th>Company</th>
<th>Price</th>
<th>Year</th>
</tr>
</HeaderTemplate>
<ItemTemplate>
<tr>
<td><%#Container.DataItem("title")%></td>
<td><%#Container.DataItem("artist")%></td>
<td><%#Container.DataItem("country")%></td>
<td><%#Container.DataItem("company")%></td>
<td><%#Container.DataItem("price")%></td>
<td><%#Container.DataItem("year")%></td>
</tr>
</ItemTemplate>
<FooterTemplate>
</table>
</FooterTemplate>
</asp:Repeater>
</form>

用 <AlternatingItemTemplate> 重复

<%@ Import Namespace="System.Data" %>
<script runat="server">
sub Page_Load
if Not Page.IsPostBack then
  dim mycdcatalog=New DataSet
  mycdcatalog.ReadXml(MapPath("cdcatalog.xml"))
  cdcatalog.DataSource=mycdcatalog
  cdcatalog.DataBind()
end if
end sub
</script>
<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:Repeater id="cdcatalog" runat="server">
<HeaderTemplate>
<table border="1" width="100%">
<tr>
<th>Title</th>
<th>Artist</th>
<th>Country</th>
<th>Company</th>
<th>Price</th>
<th>Year</th>
</tr>
</HeaderTemplate>
<ItemTemplate>
<tr>
<td><%#Container.DataItem("title")%></td>
<td><%#Container.DataItem("artist")%></td>
<td><%#Container.DataItem("country")%></td>
<td><%#Container.DataItem("company")%></td>
<td><%#Container.DataItem("price")%></td>
<td><%#Container.DataItem("year")%></td>
</tr>
</ItemTemplate>
<AlternatingItemTemplate>
<tr bgcolor="#e8e8e8">
<td><%#Container.DataItem("title")%></td>
<td><%#Container.DataItem("artist")%></td>
<td><%#Container.DataItem("country")%></td>
<td><%#Container.DataItem("company")%></td>
<td><%#Container.DataItem("price")%></td>
<td><%#Container.DataItem("year")%></td>
</tr>
</AlternatingItemTemplate>
<FooterTemplate>
</table>
</FooterTemplate>
</asp:Repeater>
</form>

用 <SeparatorTemplate> 重复

<%@ Import Namespace="System.Data" %>
<script runat="server">
sub Page_Load
if Not Page.IsPostBack then
  dim mycdcatalog=New DataSet
  mycdcatalog.ReadXml(MapPath("cdcatalog.xml"))
  cdcatalog.DataSource=mycdcatalog
  cdcatalog.DataBind()
end if
end sub
</script>
<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:Repeater id="cdcatalog" runat="server">
<HeaderTemplate>
<table border="0" width="100%">
<tr>
<th>Title</th>
<th>Artist</th>
<th>Country</th>
<th>Company</th>
<th>Price</th>
<th>Year</th>
</tr>
</HeaderTemplate>
<ItemTemplate>
<tr>
<td><%#Container.DataItem("title")%></td>
<td><%#Container.DataItem("artist")%></td>
<td><%#Container.DataItem("country")%></td>
<td><%#Container.DataItem("company")%></td>
<td><%#Container.DataItem("price")%></td>
<td><%#Container.DataItem("year")%></td>
</tr>
</ItemTemplate>
<SeparatorTemplate>
<tr>
<td colspan="6"><hr /></td>
</tr>
</SeparatorTemplate>
<FooterTemplate>
</table>
</FooterTemplate>
</asp:Repeater>
</form>

Table

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat=server>
<asp:Table runat="server" CellPadding="5"
GridLines="horizontal" HorizontalAlign="Center">
   <asp:TableRow>
     <asp:TableCell>1</asp:TableCell>
     <asp:TableCell>2</asp:TableCell>
   </asp:TableRow>
   <asp:TableRow>
     <asp:TableCell>3</asp:TableCell>
     <asp:TableCell>4</asp:TableCell>
   </asp:TableRow>
</asp:Table>
<br>
<asp:Table runat="server" CellPadding="5"
GridLines="vertical" HorizontalAlign="Center">
   <asp:TableRow>
     <asp:TableCell>1</asp:TableCell>
     <asp:TableCell>2</asp:TableCell>
   </asp:TableRow>
   <asp:TableRow>
     <asp:TableCell>3</asp:TableCell>
     <asp:TableCell>4</asp:TableCell>
   </asp:TableRow>
</asp:Table>
</form>

Table 2

<script  runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
dim rows,cells,j,i
rows=3
cells=2
For j=0 To rows-1
   dim r As New TableRow()
   For i=0 To cells-1
     dim c As New TableCell()
     c.Controls.Add(New LiteralControl("row " & j & ", cell " & i))
     r.Cells.Add(c)
   Next
   Table1.Rows.Add(r)
Next
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:Table id="Table1" BorderWidth="1" GridLines="Both" runat="server" />
</form>

Textbox

<script runat="server">
Sub submit(sender As Object, e As EventArgs)
lbl1.Text="Your name is " & txt1.Text
End Sub
</script>
<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
Enter your name:
<asp:TextBox id="txt1" runat="server" />
<asp:Button OnClick="submit" Text="Submit" runat="server" />
<p><asp:Label id="lbl1" runat="server" /></p>
</form>

Textbox 2

<script runat="server">
Sub change(sender As Object, e As EventArgs)
lbl1.Text="You changed text to " & txt1.Text
End Sub
</script>
<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
Enter your name:
<asp:TextBox id="txt1" runat="server"
text="Hello World!"
ontextchanged="change" autopostback="true"/>
<p><asp:Label id="lbl1" runat="server" /></p>
</form>

Textbox 3

<script runat="server">
Sub change(sender As Object, e As EventArgs)
lbl1.Text="You changed text to " & txt1.Text
End Sub
</script>
<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
Enter your name:
<asp:TextBox id="txt1" runat="server"
text="Hello World!"
ontextchanged="change" autopostback="true"/>
<p><asp:Label id="lbl1" runat="server" /></p>
</form>

XML

<!DOCTYPE html>
<meta charset="utf-8">
<form runat="server">
<asp:Xml DocumentSource="cdcatalog.xml" TransformSource="cdcatalog.xsl" runat="server" />
</form>

<p><a href="cdcatalog.xml" target="_blank">View XML file</a></p>
<p><a href="cdcatalog.xsl" target="_blank">View XSL file</a></p>

ASP.NET Validation 控件

CompareValidator

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<table border="0" bgcolor="#b0c4de">
   <tr valign="top">
     <td colspan="4"><h4>Compare two values</h4></td>
   </tr> 
   <tr valign="top">
     <td><asp:TextBox id="txt1" runat="server" /></td>
     <td> = </td>
     <td><asp:TextBox id="txt2" runat="server" /></td>
     <td><asp:Button Text="Validate" runat="server" /></td>
   </tr>
</table>
<br>
<asp:CompareValidator
id="compval" 
Display="dynamic"
ControlToValidate="txt1" 
ControlToCompare="txt2" 
ForeColor="red" 
BackColor="yellow" 
Type="String"
EnableClientScript="false" 
Text="Validation Failed!" 
runat="server" />
</form>

CompareValidator 2

<script  runat="server">
sub check_operator(sender As Object, e As EventArgs) 
   compval.Operator=CType(list.SelectedIndex,ValidationCompareOperator)
   compval.Validate()
end sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<table border="0" bgcolor="#b0c4de">
   <tr valign="top">
     <td colspan="4"><h4>Compare two values</h4></td>
   </tr> 
   <tr valign="top">
     <td><asp:TextBox id="txt1" runat="server" /></td>
     <td>
     <asp:ListBox id="list" rows="2" OnSelectedIndexChanged="check_operator" runat="server">
           <asp:ListItem value="Equal" selected>=</asp:ListItem>
           <asp:ListItem value="NotEqual"><></asp:ListItem>
     </asp:ListBox>
     </td>
     <td><asp:TextBox id="txt2" runat="server" /></td>
     <td><asp:Button Text="Validate" runat="server" /></td>
   </tr>
</table>
<br>
<asp:CompareValidator
id="compval" 
Display="dynamic"
ControlToValidate="txt1" 
ControlToCompare="txt2" 
ForeColor="red" 
BackColor="yellow" 
Type="String"
EnableClientScript="false" 
Text="Validation Failed!" 
runat="server" />
</form>

CustomValidator

<script  runat="server">
Sub user(source As object,args As ServerValidateEventArgs)
   if len(args.Value)<8 or len(args.Value)>16 then
    args.IsValid=false
   else
    args.IsValid=true
   end if
End Sub
</script>     

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:Label runat="server" Text="Enter a username: " />
<asp:TextBox id="txt1" runat="server" />
<asp:Button Text="Submit" runat="server"/>
<br>
<asp:Label id="mess" runat="server"/>
<br>
<asp:CustomValidator
ControlToValidate="txt1"
OnServerValidate="user"
Text="A username must be between 8 and 16 characters!"
runat="server"/>
</form>

RangeValidator

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
Enter a date between 2005-01-01 and 2005-12-31:
<br>
<asp:TextBox id="tbox1" runat="server" />
<br><br>
<asp:Button Text="Submit" runat="server" />
<br><br>
<asp:RangeValidator
ControlToValidate="tbox1"
MinimumValue="2005-01-01"
MaximumValue="2005-12-31"
Type="Date"
EnableClientScript="false"
Text="The date must be between 2005-01-01 and 2005-12-31!"
runat="server" />
</form>

RangeValidator 2

<script  runat="server">
Sub submit(sender As Object, e As EventArgs)
If Page.IsValid Then
   lbl1.Text="Page is valid."
Else
   lbl1.Text="Page is not valid!!"
End If
End Sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
Enter a number from 1 to 100:
<asp:TextBox id="tbox1" runat="server" />
<br><br>
<asp:Button Text="Submit" OnClick="submit" runat="server" />
<br><br>
<asp:Label id="lbl1" runat="server" />
<br>
<asp:RangeValidator
ControlToValidate="tbox1"
MinimumValue="1"
MaximumValue="100"
Type="Integer"
EnableClientScript="false"
Text="The value must be from 1 to 100!"
runat="server" />
</form>

RegularExpressionValidator

<script  runat="server">
sub submit(sender As Object, e As EventArgs) 
if Page.IsValid then 
   lbl.Text="The page is valid!"
else 
   lbl.Text="The page is not valid!"
end if
end sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
Enter a US zip code:
<asp:TextBox id="txtbox1" runat="server" />
<br><br>
<asp:Button text="Submit" OnClick="submit" runat="server" />
<br><br>
<asp:Label id="lbl" runat="server" />
<br>
<asp:RegularExpressionValidator 
ControlToValidate="txtbox1"
ValidationExpression="\d{5}"
EnableClientScript="false"
ErrorMessage="The zip code must be 5 numeric digits!"
runat="server" />
</form>

RequiredFieldValidator

<!DOCTYPE html>
<meta charset="utf-8">
<form runat="server">
Name: <asp:TextBox id="name" runat="server" />
<br>
Age: <asp:TextBox id="age" runat="server" />
<br><br>
<asp:Button runat="server" Text="Submit" />
<br><br>
<asp:RequiredFieldValidator
ControlToValidate="name"
Text="The name field is required!"
runat="server" />
</form>

Validationsummary

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<table>
<tr>
<td>
<table bgcolor="#b0c4de" cellspacing="10">
   <tr>
     <td align="right">Name:</td>
     <td><asp:TextBox id="txt_name" runat="server"/></td>
     <td>
     <asp:RequiredFieldValidator
     ControlToValidate="txt_name" 
     ErrorMessage="Name"
     Text="*" 
     runat="server"/>
     </td>
   </tr>
   <tr>
     <td align="right">Card Type:</td>
     <td>
     <asp:RadioButtonList id="rlist_type" 
     RepeatLayout="Flow"
     runat="server">
     <asp:ListItem>Diners</asp:ListItem>
     <asp:ListItem>MasterCard</asp:ListItem>
     <asp:ListItem>Visa</asp:ListItem>
     </asp:RadioButtonList>
     </td>
     <td>
     <asp:RequiredFieldValidator
     ControlToValidate="rlist_type"
     ErrorMessage="Card Type"
     InitialValue=""
     Text="*"
     runat="server"/>
     </td>
   </tr>
   <tr>
     <td></td>
     <td><asp:Button id="b1" Text="Submit" runat="server"/></td>
     <td></td>
   </tr>
</table>
</td>
</tr>
</table>
<br>
<asp:ValidationSummary
HeaderText="You must enter a value in the following fields:"
DisplayMode="BulletList"
EnableClientScript="true"
runat="server"/>
</form>

Validationsummary 2

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<table>
<tr>
<td>
<table bgcolor="#b0c4de" cellspacing="10">
   <tr>
     <td align="right">Name:</td>
     <td><asp:TextBox id="txt_name" runat="server"/></td>
     <td>
     <asp:RequiredFieldValidator
     ControlToValidate="txt_name" 
     ErrorMessage="Name"
     Text="*" 
     runat="server"/>
     </td>
   </tr>
   <tr>
     <td align="right">Card Type:</td>
     <td>
     <asp:RadioButtonList id="rlist_type" 
     RepeatLayout="Flow"
     runat="server">
     <asp:ListItem>Diners</asp:ListItem>
     <asp:ListItem>MasterCard</asp:ListItem>
     <asp:ListItem>Visa</asp:ListItem>
     </asp:RadioButtonList>
     </td>
     <td>
     <asp:RequiredFieldValidator
     ControlToValidate="rlist_type"
     ErrorMessage="Card Type"
     InitialValue=""
     Text="*"
     runat="server"/>
     </td>
   </tr>
   <tr>
     <td></td>
     <td><asp:Button id="b1" Text="Submit" runat="server"/></td>
     <td></td>
   </tr>
</table>
</td>
</tr>
</table>
<asp:ValidationSummary
ShowMessageBox="true"
ShowSummary="false"
HeaderText="You must enter a value in the following fields:"
EnableClientScript="true"
runat="server"/>
</form>

ASP.NET 事件

Page_Load

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

Page.IsPostBack

<script runat="server">
Sub Page_Load
if Not Page.IsPostBack then
  lbl1.Text="The date and time is " & now()
end if
End Sub
Sub submit(s As Object, e As EventArgs)
lbl2.Text="Hello World!"
End Sub
</script>
<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<h3><asp:label id="lbl1" runat="server" /></h3>
<h3><asp:label id="lbl2" runat="server" /></h3>
<asp:button text="Submit" onclick="submit" runat="server" />
</form>

ASP.NET 数据绑定

ArrayList RadioButtonList

<script  runat="server">
Sub Page_Load
if Not Page.IsPostBack then
   dim mycountries=New ArrayList
   mycountries.Add("Norway")
   mycountries.Add("Sweden")
   mycountries.Add("France")
   mycountries.Add("Italy")
   mycountries.TrimToSize()
   mycountries.Sort()
   rb.DataSource=mycountries
   rb.DataBind()
end if
end sub

sub displayMessage(s as Object,e As EventArgs)
lbl1.text="Your favorite country is: " & rb.SelectedItem.Text
end sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:RadioButtonList id="rb" runat="server"
AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
<p><asp:label id="lbl1" runat="server" /></p>
</form>

ArrayList DropDownList

<script  runat="server">
sub Page_Load
if Not Page.IsPostBack then
   dim mycountries=New ArrayList
   mycountries.Add("Norway")
   mycountries.Add("Sweden")
   mycountries.Add("France")
   mycountries.Add("Italy")
   mycountries.TrimToSize()
   mycountries.Sort()
   dd.DataSource=mycountries
   dd.DataBind()
end if
end sub

sub displayMessage(s as Object,e As EventArgs)
lbl1.text="Your favorite country is: " & dd.SelectedItem.Text
end sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:DropDownList id="dd" runat="server"
AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
<p><asp:label id="lbl1" runat="server" /></p>
</form>

Hashtable RadioButtonList 1

<script  runat="server">
sub Page_Load
if Not Page.IsPostBack then
   dim mycountries=New Hashtable
   mycountries.Add("N","Norway")
   mycountries.Add("S","Sweden")
   mycountries.Add("F","France")
   mycountries.Add("I","Italy")
   rb.DataSource=mycountries
   rb.DataValueField="Key"
   rb.DataTextField="Value"
   rb.DataBind()
end if
end sub

sub displayMessage(s as Object,e As EventArgs)
lbl1.text="Your favorite country is: " & rb.SelectedItem.Text
end sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:RadioButtonList id="rb" runat="server"
AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
<p><asp:label id="lbl1" runat="server" /></p>
</form>

Hashtable RadiobuttonList 2

<script  runat="server">
sub Page_Load
if Not Page.IsPostBack then
   dim navigate=New Hashtable
   navigate.Add("RadioButtonList","control_radiobuttonlist.asp")
   navigate.Add("CheckBoxList","control_checkboxlist.asp")
   navigate.Add("DropDownList","control_dropdownlist.asp")
   navigate.Add("ListBox","control_listbox.asp")
   rb.DataSource=navigate
   rb.DataValueField="Value"
   rb.DataTextField="Key"
   rb.DataBind()
end if
end sub

sub navigate(s as Object, e As EventArgs)
response.redirect(rb.SelectedItem.Value)
end sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:RadioButtonList id="rb" runat="server"
AutoPostBack="True" onSelectedIndexChanged="navigate" />
</form>

Hashtable DropDownList

<script  runat="server">
sub Page_Load
if Not Page.IsPostBack then
   dim mycountries=New Hashtable
   mycountries.Add("N","Norway")
   mycountries.Add("S","Sweden")
   mycountries.Add("F","France")
   mycountries.Add("I","Italy")
   dd.DataSource=mycountries
   dd.DataValueField="Key"
   dd.DataTextField="Value"
   dd.DataBind()
end if
end sub

sub displayMessage(s as Object,e As EventArgs)
lbl1.text="Your favorite country is: " & dd.SelectedItem.Text
end sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:DropDownList id="dd" runat="server"
AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
<p><asp:label id="lbl1" runat="server" /></p>
</form>

SortedList RadioButtonList 1

<script  runat="server">
sub Page_Load
if Not Page.IsPostBack then
   dim mycountries=New SortedList
   mycountries.Add("N","Norway")
   mycountries.Add("S","Sweden")
   mycountries.Add("F","France")
   mycountries.Add("I","Italy")
   rb.DataSource=mycountries
   rb.DataValueField="Key"
   rb.DataTextField="Value"
   rb.DataBind()
end if
end sub

sub displayMessage(s as Object,e As EventArgs)
lbl1.text="Your favorite country is: " & rb.SelectedItem.Text
end sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:RadioButtonList id="rb" runat="server"
AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
<p><asp:label id="lbl1" runat="server" /></p>
</form>

SortedList RadiobuttonList 2

<script  runat="server">
sub Page_Load
if Not Page.IsPostBack then
   dim navigate=New SortedList
   navigate.Add("RadioButtonList","control_radiobuttonlist.asp")
   navigate.Add("CheckBoxList","control_checkboxlist.asp")
   navigate.Add("DropDownList","control_dropdownlist.asp")
   navigate.Add("ListBox","control_listbox.asp")
   rb.DataSource=navigate
   rb.DataValueField="Value"
   rb.DataTextField="Key"
   rb.DataBind()
end if
end sub

sub navigate(s as Object, e As EventArgs)
response.redirect(rb.SelectedItem.Value)
end sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:RadioButtonList id="rb" runat="server"
AutoPostBack="True" onSelectedIndexChanged="navigate" />
</form>

SortedList DropDownList

<script  runat="server">
sub Page_Load
if Not Page.IsPostBack then
   dim mycountries=New SortedList
   mycountries.Add("N","Norway")
   mycountries.Add("S","Sweden")
   mycountries.Add("F","France")
   mycountries.Add("I","Italy")
   dd.DataSource=mycountries
   dd.DataValueField="Key"
   dd.DataTextField="Value"
   dd.DataBind()
end if
end sub

sub displayMessage(s as Object,e As EventArgs)
lbl1.text="Your favorite country is: " & dd.SelectedItem.Text
end sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:DropDownList id="dd" runat="server"
AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
<p><asp:label id="lbl1" runat="server" /></p>
</form>

XML RadiobuttonList

        <%@ Import Namespace="System.Data" %>
        <script runat="server">
        sub Page_Load
        if Not Page.IsPostBack then
          dim mycountries=New DataSet
          mycountries.ReadXml(MapPath("countries.xml"))
          rb.DataSource=mycountries
          rb.DataValueField="value"
          rb.DataTextField="text"
          rb.DataBind()
        end if
        end sub
        sub displayMessage(s as Object,e As EventArgs)
        lbl1.text="Your favorite country is: " & rb.SelectedItem.Text
        end sub
        </script>
        <!DOCTYPE html>
        <meta charset="utf-8" />
        <form runat="server">
        <asp:RadioButtonList id="rb" runat="server"
        AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
        <p><asp:label id="lbl1" runat="server" /></p>
        </form>

ASP.NET 数据库

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

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

<script  runat="server">
sub Page_Load
dim dbconn,sql,dbcomm,dbread
dbconn=New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;data source=" & server.mappath("/db/northwind.mdb"))
dbconn.Open()
sql="SELECT * FROM customers"
dbcomm=New OleDbCommand(sql,dbconn)
dbread=dbcomm.ExecuteReader()
customers.DataSource=dbread
customers.DataBind()
dbread.Close()
dbconn.Close()
end sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />
<form runat="server">
<asp:Repeater id="customers" runat="server">

<HeaderTemplate>
<table border="1" width="100%">
<tr bgcolor="#b0c4de">
<th>Companyname</th>
<th>Contactname</th>
<th>Address</th>
<th>City</th>
</tr>
</HeaderTemplate>

<ItemTemplate>
<tr bgcolor="#f0f0f0">
<td><%#Container.DataItem("companyname")%> </td>
<td><%#Container.DataItem("contactname")%> </td>
<td><%#Container.DataItem("address")%> </td>
<td><%#Container.DataItem("city")%> </td>
</tr>
</ItemTemplate>

<FooterTemplate>
</table>
</FooterTemplate>

</asp:Repeater>
</form>

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

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

<script  runat="server">
sub Page_Load
dim dbconn,sql,dbcomm,dbread
dbconn=New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;data source=" & server.mappath("/db/northwind.mdb"))
dbconn.Open()
sql="SELECT * FROM customers"
dbcomm=New OleDbCommand(sql,dbconn)
dbread=dbcomm.ExecuteReader()
customers.DataSource=dbread
customers.DataBind()
dbread.Close()
dbconn.Close()
end sub
</script>

<!DOCTYPE html>
<meta charset="utf-8" />

<form runat="server">
<asp:DataList
id="customers"
runat="server"
cellpadding="2"
cellspacing="2"
borderstyle="inset"
backcolor="#e8e8e8"
width="100%"
headerstyle-font-name="Verdana"
headerstyle-font-size="12pt"
headerstyle-horizontalalign="center"
headerstyle-font-bold="True"
itemstyle-backcolor="#778899"
itemstyle-forecolor="#ffffff"
footerstyle-font-size="9pt"
footerstyle-font-italic="True">

<HeaderTemplate>
Customers Table
</HeaderTemplate>

<ItemTemplate>
<%#Container.DataItem("companyname")%>  in
<%#Container.DataItem("address")%>, <%#Container.DataItem("city")%>
</ItemTemplate>

<FooterTemplate>
Source: Northwind Database
</FooterTemplate>

</asp:DataList>
</form>
0 条回复 A文章作者 M管理员
    暂无讨论,说说你的看法吧
个人中心
今日签到
有新私信 私信列表
搜索