write.aspx

来自「是可以运行的电子光盘 有程序与PPT介绍 对于学习VB。NET的有参考意义」· ASPX 代码 · 共 166 行

<%@ Page Language="VB" MasterPageFile="~/MainMasterPage.master" AutoEventWireup="false" CodeFile="Write.aspx.vb" Inherits="WebDisk_Message_Write"%>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
    <table  align="center"  border="1" bordercolor="#ffffff" cellpadding="0" cellspacing="0" style="border-collapse: collapse"
        width="576">
        <tr>
            <td style="width: 585px">
                <br />
                <table align="center" bgcolor="#6478c8" border="0" cellpadding="0" cellspacing="1"
                    width="96%">
                    <tr>
                        <td align="center" background="image/linebk.gif" colspan="2" height="20">
                            .: 请在下面填写您的留言信息 :.
                        </td>
                    </tr>
                    <tr>
                        <td align="center" background="image/bkgcolor.gif" colspan="2">
                            &nbsp;
                        </td>
                    </tr>
                    <tr>
                        <td background="image/bkgcolor.gif" class="tdspace6px" width="20%">
                            您的姓名：<strong>*</strong>
                        </td>
                        <td background="image/bkgcolor.gif" class="tdspace6px" style="width: 438px">
                            <asp:TextBox ID="UserName" runat="server" Columns="10" MaxLength="16" onfocus="select()"></asp:TextBox>
                            <asp:RequiredFieldValidator ID="RFVUserName" runat="server" ControlToValidate="UserName"
                                Display="Dynamic" EnableClientScript="true" ErrorMessage="请输入您的姓名！"></asp:RequiredFieldValidator>
                        </td>
                    </tr>
                    <tr>
                        <td background="image/bkgcolor.gif" class="tdspace6px" width="20%">
                            您的性别：
                        </td>
                        <td background="image/bkgcolor.gif" class="tdspace6px" style="width: 438px">
                            <asp:RadioButtonList ID="Sex" runat="server" RepeatDirection="Horizontal">
                                <asp:ListItem Selected="true" Text="男生" Value="男"></asp:ListItem>
                                <asp:ListItem Text="女生" Value="女"></asp:ListItem>
                            </asp:RadioButtonList>
                        </td>
                    </tr>
                    <tr>
                        <td background="image/bkgcolor.gif" class="tdspace6px" width="20%">
                            您的年龄：
                        </td>
                        <td background="image/bkgcolor.gif" class="tdspace6px" style="width: 438px">
                            <asp:DropDownList ID="Drpage" runat="server">
                                <asp:ListItem Selected="true" Text="保密"></asp:ListItem>
                            </asp:DropDownList>
                        </td>
                    </tr>
                    <tr>
                        <td background="image/bkgcolor.gif" class="tdspace6px" width="20%">
                            您的Email：
                        </td>
                        <td background="image/bkgcolor.gif" class="tdspace6px" style="width: 438px">
                            <asp:TextBox ID="Email" runat="server" Columns="30" MaxLength="30" onfocus="select()"></asp:TextBox>
                            <asp:RegularExpressionValidator ID="RFVEmail" runat="server" ControlToValidate="Email"
                                Display="Dynamic" EnableClientScript="true" ErrorMessage="邮箱格式不正确！" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*"></asp:RegularExpressionValidator>
                        </td>
                    </tr>
                    <tr>
                        <td background="image/bkgcolor.gif" class="tdspace6px" width="20%">
                            ＱＱ号码：
                        </td>
                        <td background="image/bkgcolor.gif" class="tdspace6px" style="width: 438px">
                            <asp:TextBox ID="Qicq" runat="server" Columns="10" MaxLength="10" onfocus="select()"></asp:TextBox>
                            <asp:RangeValidator ID="EVQicq" runat="server" ControlToValidate="Qicq" Display="Dynamic"
                                ErrorMessage="请输入正确的QQ号码！" MaximumValue="9999999999" MinimumValue="10000" Type="Double"></asp:RangeValidator><strong>
                                </strong>
                        </td>
                    </tr>
                    <tr style="font-weight: bold">
                        <td background="image/bkgcolor.gif" class="tdspace6px" width="20%">
                            个人主页：
                        </td>
                        <td background="image/bkgcolor.gif" class="tdspace6px" style="width: 438px">
                            <asp:Label ID="lblhp" runat="server" Text="http://"></asp:Label><span style="color: #00cc33">
                            </span>
                            <asp:TextBox ID="homepage" runat="server" Columns="30" onfocus="select()" TextMode="SingleLine"></asp:TextBox>
                            <asp:RegularExpressionValidator ID="RFVHomepage" runat="server" ControlToValidate="Homepage"
                                Display="Dynamic" EnableClientScript="true" ErrorMessage="网址格式不正确！" ValidationExpression="([\w-]+\.)+[\w-]+(/[\w- ./?%&=]*)?"></asp:RegularExpressionValidator><span
                                    style="color: #00cc33"> </span>
                        </td>
                    </tr>
                    <tr style="color: #00cc33">
                        <td background="image/bkgcolor.gif" class="tdspace6px" width="20%">
                            选择头像：
                        </td>
                        <td background="image/bkgcolor.gif" class="tdspace6px" style="width: 438px">
                            <span style="color: #00cc33">&nbsp;&nbsp; </span>
                            <asp:DropDownList ID="Drpface" runat="server" ONCHANGE="javascript:faceimg.src='image/userface/image'+this.value+'.gif'">
                                <asp:ListItem Selected="true" Text="默认" Value="0"></asp:ListItem>
                            </asp:DropDownList><span style="color: #ff0000">
                                <br />
                            </span>&nbsp;
                            <img id="faceimg" src="image/userface/image0.gif" />
                        </td>
                    </tr>
                    <tr>
                        <td background="image/bkgcolor.gif" class="tdspace6px">
                            发帖表情：
                        </td>
                        <td background="image/bkgcolor.gif" class="tdspace6px" style="width: 438px">
                            <asp:RadioButtonList ID="Miange" runat="server" RepeatColumns="8">
                                <asp:ListItem Selected="true" Value="image/topicface/face1.GIF"><IMG src="image/topicface/face1.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face2.GIF"><IMG src="image/topicface/face2.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face3.GIF"><IMG src="image/topicface/face3.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face4.GIF"><IMG src="image/topicface/face4.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face5.GIF"><IMG src="image/topicface/face5.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face6.GIF"><IMG src="image/topicface/face6.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face7.GIF"><IMG src="image/topicface/face7.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face8.GIF"><IMG src="image/topicface/face8.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face9.GIF"><IMG src="image/topicface/face9.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face10.GIF"><IMG src="image/topicface/face10.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face11.GIF"><IMG src="image/topicface/face11.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face12.GIF"><IMG src="image/topicface/face12.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face13.GIF"><IMG src="image/topicface/face13.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face14.GIF"><IMG src="image/topicface/face14.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face15.GIF"><IMG src="image/topicface/face15.GIF" border="0" ></asp:ListItem>
                                <asp:ListItem Value="image/topicface/face16.GIF"><IMG src="image/topicface/face16.GIF" border="0" ></asp:ListItem>
                            </asp:RadioButtonList>
                        </td>
                    </tr>
                    <tr>
                        <td background="image/bkgcolor.gif" class="tdspace6px" width="20%">
                            留言主题：<strong>*</strong>
                        </td>
                        <td background="image/bkgcolor.gif" class="tdspace6px" style="width: 438px">
                            <asp:TextBox ID="Title" runat="server" Columns="30" onfocus="select()"></asp:TextBox>
                            <asp:RequiredFieldValidator ID="RFVtitle" runat="server" ControlToValidate="title"
                                Display="Dynamic" EnableClientScript="true" ErrorMessage="必须输入主题！"></asp:RequiredFieldValidator>
                        </td>
                    </tr>
                    <tr>
                        <td background="image/bkgcolor.gif" class="tdspace6px" valign="top" width="20%">
                            留言内容：<strong>*</strong>
                            <br />
                            UBB 标签：<font color="#00cc33">√</font>
                            <br />
                            HTML标签：<font color="#00cc33">√</font>
                            <br />
                            贴图标签：<font color="#00cc33">√</font>
                            <br />
                            表情标签：<font color="#ff0000">×</font>
                        </td>
                        <td background="image/bkgcolor.gif" class="tdspace6px" style="width: 438px">
                            <asp:TextBox ID="MessageBody" runat="server" Columns="46" Rows="8" TextMode="MultiLine"></asp:TextBox>
                            <br />
                            最多300字。
                            <asp:RequiredFieldValidator ID="RFVMessageBody" runat="server" ControlToValidate="MessageBody"
                                Display="Static" EnableClientScript="true" ErrorMessage="<br>必须输入内容！"></asp:RequiredFieldValidator>
                        </td>
                    </tr>
                    <tr>
                        <td align="center" background="image/linebk.gif" colspan="2" height="24">
                            <asp:ImageButton ID="Imgbtn" runat="server" ImageUrl="image/bt_post.gif" OnClick="Imgbtn_Click" />
                        </td>
                    </tr>
                </table>
                <br />
            </td>
        </tr>
    </table>
</asp:Content>