.net编程

开发平台：
Visual Basic

LoggedIn.aspx：源码内容
							﻿<%@ Page Language="VB" AutoEventWireup="false" CodeFile="LoggedIn.aspx.vb" Inherits="suc" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>您已登录</title>
</head>
<body>
    <form id="form1" runat="server">
        <asp:Panel ID="Panel1" runat="server" Height="192px" Style="left: 120px; position: relative;
            top: 16px" Width="296px">
        <asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False" AutoGenerateEditButton="True" CellPadding="4"
            DataSourceID="AccessDataSource1" ForeColor="#333333" GridLines="None" Style="position: relative" Width="296px" BorderStyle="Ridge">
            <FooterStyle BackColor="#507CD1" Font-Bold="True" ForeColor="White" />
            <Columns>
                <asp:BoundField DataField="LoginName" HeaderText="ID" SortExpression="LoginName" />
                <asp:BoundField DataField="UserName" HeaderText="姓名" SortExpression="UserName" />
                <asp:BoundField DataField="Address" HeaderText="工作单位" SortExpression="Address" />
            </Columns>
            <SelectedRowStyle BackColor="#D1DDF1" ForeColor="#333333" Font-Bold="True" />
            <PagerStyle BackColor="#2461BF" ForeColor="White" HorizontalAlign="Center" />
            <HeaderStyle BackColor="#507CD1" Font-Bold="True" ForeColor="White" />
            <AlternatingRowStyle BackColor="White" />
            <RowStyle BackColor="#EFF3FB" />
            <EditRowStyle BackColor="#2461BF" />
        </asp:GridView>
        <asp:AccessDataSource ID="AccessDataSource1" runat="server" ConflictDetection="CompareAllValues"
            DataFile="~/User.DMB.mdb" DeleteCommand="DELETE FROM [UserSheet] WHERE [LoginName] = ? AND [UserName] = ? AND [Address] = ?"
            InsertCommand="INSERT INTO [UserSheet] ([UserName], [Address], [LoginName]) VALUES (?, ?, ?)"
            OldValuesParameterFormatString="original_{0}" SelectCommand="SELECT [UserName], [Address], [LoginName] FROM [UserSheet] WHERE ([LoginName] = ?)"
            UpdateCommand="UPDATE [UserSheet] SET [UserName] = ?, [Address] = ? WHERE [LoginName] = ? AND [UserName] = ? AND [Address] = ?">
            <DeleteParameters>
                <asp:Parameter Name="original_LoginName" Type="String" />
                <asp:Parameter Name="original_UserName" Type="String" />
                <asp:Parameter Name="original_Address" Type="String" />
            </DeleteParameters>
            <UpdateParameters>
                <asp:Parameter Name="UserName" Type="String" />
                <asp:Parameter Name="Address" Type="String" />
                <asp:Parameter Name="original_LoginName" Type="String" />
                <asp:Parameter Name="original_UserName" Type="String" />
                <asp:Parameter Name="original_Address" Type="String" />
            </UpdateParameters>
            <SelectParameters>
                <asp:SessionParameter DefaultValue="" Name="LoginName" SessionField="user" Type="String" />
            </SelectParameters>
            <InsertParameters>
                <asp:Parameter Name="UserName" Type="String" />
                <asp:Parameter Name="Address" Type="String" />
                <asp:Parameter Name="LoginName" Type="String" />
            </InsertParameters>
        </asp:AccessDataSource>
        <asp:Button ID="Button1" runat="server" Style="position: relative; left: 8px; top: 0px;" Text="删除此用户" />
            <asp:Button ID="Button2" runat="server" Style="position: relative; left: 27px; top: 0px;" Text="更改密码" />
            <asp:Button ID="Button4" runat="server" Style="position: relative; left: 49px; top: 0px;" Text="注销" /></asp:Panel>
        &nbsp;&nbsp;
        <asp:Panel ID="Panel2" runat="server" Height="96px" Style="left: 152px; position: relative;
            top: 0px" Width="280px" Visible="False" BackColor="#00C0C0" BorderStyle="Ridge">
            <asp:Panel ID="Panel3" runat="server" BackColor="Teal" Height="24px" Style="left: 1px;
                position: relative; top: 0px" Width="280px">
                <asp:Label ID="Label1" runat="server" BackColor="Teal" Style="left: 104px; position: relative;
                    top: 0px" Text="更改密码"></asp:Label></asp:Panel>
            <asp:Panel ID="Panel4" runat="server" Height="24px" Style="left: 0px; position: relative;
                top: 0px" Width="280px">
                <asp:Label ID="Label2" runat="server" Height="24px" Style="position: relative" Text="输入原密码:"
                    Width="88px" Font-Size="Smaller"></asp:Label>
                <asp:TextBox ID="TextBox1" runat="server" Style="left: 0px; position: relative; top: 0px"
                    TextMode="Password"></asp:TextBox>
                <asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server" ControlToValidate="TextBox1"
                    ErrorMessage="必须填写“原密码”。" Style="position: relative">*</asp:RequiredFieldValidator></asp:Panel>
            <asp:Panel ID="Panel5" runat="server" Height="24px" Style="left: 0px; position: relative;
                top: 0px" Width="280px">
                <asp:Label ID="Label3" runat="server" Height="24px" Style="position: relative" Text="输入新密码:"
                    Width="88px" Font-Size="Smaller"></asp:Label>
                <asp:TextBox ID="TextBox2" runat="server" Style="left: 0px; position: relative; top: 0px"
                    TextMode="Password"></asp:TextBox>
                <asp:RequiredFieldValidator ID="PasswordRequired" runat="server" ControlToValidate="TextBox2"
                    ErrorMessage="必须填写“新密码”。" Style="position: relative">*</asp:RequiredFieldValidator></asp:Panel>
            <asp:Label ID="Label4" runat="server" Height="24px" Style="position: relative" Text="新密码确认:"
                Width="88px" Font-Size="Smaller"></asp:Label>
            <asp:TextBox ID="TextBox3" runat="server" Style="position: relative" TextMode="Password"></asp:TextBox>
            <asp:RequiredFieldValidator ID="ConfirmPasswordRequired" runat="server" ControlToValidate="TextBox3"
                ErrorMessage="必须填写“确认密码”。" Style="position: relative">*</asp:RequiredFieldValidator><br />
            <asp:CompareValidator ID="PasswordCompare" runat="server" ControlToCompare="TextBox2"
                ControlToValidate="TextBox3" Display="Dynamic" ErrorMessage="“密码”和“确认密码”不一致，请重新输入"
                Style="left: 12px; position: relative; top: 0px" ValidationGroup="CreateUserWizard1" Font-Size="Smaller"></asp:CompareValidator><br />
            <asp:Label ID="Label7" runat="server" ForeColor="Red" Height="16px" Style="left: 8px;
                position: relative; top: 0px" Text="您输入的原密码不正确，请重新输入！" Visible="False" Width="272px" Font-Size="Smaller"></asp:Label><br />
            <asp:Button ID="Button3" runat="server" Style="position: relative; left: 8px; top: 0px;" Text="更改密码" />&nbsp;&nbsp;
            <asp:HyperLink ID="HyperLink1" runat="server" NavigateUrl="~/LoggedIn.aspx" Style="left: 96px;
                position: relative; top: -6px" Font-Size="Smaller">取消更改</asp:HyperLink></asp:Panel>
        <asp:Panel ID="Panel7" runat="server" BackColor="White" Height="80px" Style="left: 152px;
            position: relative; top: -6px" Visible="False" Width="272px">
            <asp:Label ID="Label6" runat="server" Height="24px" Style="left: 8px; position: relative;
                top: 8px" Text="确定删除吗?删除帐户后将不可恢复!" Width="256px" ForeColor="#C00000"></asp:Label>
            <asp:Button ID="Button6" runat="server" Style="left: 157px; position: relative; top: 16px"
                Text="返回" Height="22px" />
            <asp:Button ID="Button7" runat="server" Style="left: 25px; position: relative; top: 16px"
                Text="删除" Height="22px" /></asp:Panel>
        <asp:Panel ID="Panel6" runat="server" Height="64px" Style="left: 152px; position: relative;
            top: -6px" Visible="False" Width="272px" BackColor="White">
            <asp:Label ID="Label5" runat="server" Font-Size="X-Large" Height="32px" Style="left: 48px;
                position: relative; top: 0px" Text="密码更改成功!" Width="160px"></asp:Label>
            <asp:Button ID="Button5" runat="server" Style="left: -46px; position: relative; top: 32px"
                Text="返回" /></asp:Panel>
    </form>
</body>
</html>

						