/
ivan
/
ModMas
Обзор
Документация
Войти
/
ivan
/
ModMas
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
main
ModuleMaster/usercontrol.aspx
231 строка
14 KB
i.krivokon
Initial commit
13 мар 2026, 13:49
13 мар 2026, 13:49
00d9fb6
Код
Авторство
О чём код?
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="UserControl.aspx.vb" Inherits="UserControl" %> <!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"> <div> <asp:SqlDataSource ID="sdsUsersGroup" runat="server" ConnectionString="<%$ ConnectionStrings:SERKIntranetConnectionString %>" SelectCommand="SELECT [id] ,[GroupName] ,[GroupDescription] FROM [UserModules].[dbo].[Groups]"></asp:SqlDataSource> <h1>Group Management</h1> <table> <tr> <td> <asp:Panel ID="Panel1" runat="server" Height="150px" Style="overflow-y: scroll;"> <asp:DropDownList ID="ddlUsersGroup" runat="server" AutoPostBack="true" DataSourceID="sdsUsersGroup" DataTextField="GroupName" DataValueField="id"> </asp:DropDownList> <asp:GridView ID="GridView2" runat="server" AutoGenerateColumns="False" CellPadding="4" DataKeyNames="id" DataSourceID="sdsUsersByGroup" ForeColor="#333333" GridLines="None" ShowHeaderWhenEmpty="True"> <AlternatingRowStyle BackColor="White" ForeColor="#284775" /> <Columns> <asp:BoundField DataField="id" HeaderText="id" InsertVisible="False" ReadOnly="True" SortExpression="id" Visible="False" /> <asp:BoundField DataField="userName" HeaderText="userName" SortExpression="userName" /> <asp:BoundField DataField="userId" HeaderText="userId" SortExpression="userId" /> <asp:BoundField DataField="groupId" HeaderText="groupId" SortExpression="groupId" Visible="False" /> <asp:CheckBoxField DataField="enabled" HeaderText="enabled" SortExpression="enabled" /> <asp:CommandField ShowSelectButton="True" /> </Columns> <EditRowStyle BackColor="#999999" /> <FooterStyle BackColor="#5D7B9D" Font-Bold="True" ForeColor="White" /> <HeaderStyle BackColor="#5D7B9D" Font-Bold="True" ForeColor="White" /> <PagerStyle BackColor="#284775" ForeColor="White" HorizontalAlign="Center" /> <RowStyle BackColor="#F7F6F3" ForeColor="#333333" /> <SelectedRowStyle BackColor="#E2DED6" Font-Bold="True" ForeColor="#333333" /> <SortedAscendingCellStyle BackColor="#E9E7E2" /> <SortedAscendingHeaderStyle BackColor="#506C8C" /> <SortedDescendingCellStyle BackColor="#FFFDF8" /> <SortedDescendingHeaderStyle BackColor="#6F8DAE" /> </asp:GridView> </asp:Panel> </td> <td> </td> <td> <asp:Panel ID="Panel2" runat="server" Height="150px" Style="overflow-y: scroll;"> <asp:DropDownList runat="server" ID="ddlDepartment" AutoPostBack="True" DataSourceID="sdsDepartments" DataTextField="UserDepartment" DataValueField="UserDepartment"></asp:DropDownList> <asp:SqlDataSource ID="sdsDepartments" runat="server" ConnectionString="<%$ ConnectionStrings:SERKIntranetConnectionString %>" SelectCommand="SELECT distinct [UserDepartment] FROM [serkintranet].[dbo].[WebUsers] order by [UserDepartment]"></asp:SqlDataSource> <asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False" DataKeyNames="UserLogin" DataSourceID="sdsUsers" CellPadding="4" ForeColor="#333333" GridLines="None" ShowHeaderWhenEmpty="True"> <AlternatingRowStyle BackColor="White" ForeColor="#284775" /> <Columns> <asp:BoundField DataField="id" HeaderText="id" InsertVisible="False" ReadOnly="True" SortExpression="id" Visible="False" /> <asp:BoundField DataField="UserName" HeaderText="UserName" SortExpression="UserName" /> <asp:BoundField DataField="UserLogin" HeaderText="UserLogin" ReadOnly="True" SortExpression="UserLogin" /> <asp:BoundField DataField="UserDepartment" HeaderText="UserDepartment" SortExpression="UserDepartment" /> </Columns> <EditRowStyle BackColor="#999999" /> <FooterStyle BackColor="#5D7B9D" Font-Bold="True" ForeColor="White" /> <HeaderStyle BackColor="#5D7B9D" Font-Bold="True" ForeColor="White" /> <PagerStyle BackColor="#284775" ForeColor="White" HorizontalAlign="Center" /> <RowStyle BackColor="#F7F6F3" ForeColor="#333333" /> <SelectedRowStyle BackColor="#E2DED6" Font-Bold="True" ForeColor="#333333" /> <SortedAscendingCellStyle BackColor="#E9E7E2" /> <SortedAscendingHeaderStyle BackColor="#506C8C" /> <SortedDescendingCellStyle BackColor="#FFFDF8" /> <SortedDescendingHeaderStyle BackColor="#6F8DAE" /> </asp:GridView> </asp:Panel> </td> </tr> </table> <h1> Access Management</h1> <asp:DropDownList runat="server" ID="ddlModules" DataSourceID="sdsModules" DataTextField="ModuleName" DataValueField="id" AutoPostBack="true" /> <asp:DropDownList runat="server" ID="ddlTables" DataSourceID="sdsTablesByModule" DataTextField="TableName" AutoPostBack ="true" DataValueField="id" /> <table> <tr> <td> <asp:Panel ID="Panel3" runat="server" Height="150px" Style="overflow-y: scroll;"> <asp:GridView ID="GridView3" runat="server" AutoGenerateColumns="False" DataKeyNames="id" DataSourceID="sdsGroupsByTable" BackColor="White" BorderColor="#E7E7FF" BorderStyle="None" BorderWidth="1px" CellPadding="3" GridLines="Horizontal" ShowHeaderWhenEmpty="True"> <AlternatingRowStyle BackColor="#F7F7F7" /> <Columns> <asp:BoundField DataField="groupName" HeaderText="groupName" SortExpression="groupName" /> <asp:BoundField DataField="id" HeaderText="id" InsertVisible="False" ReadOnly="True" SortExpression="id" Visible="False" /> <asp:BoundField DataField="tableId" HeaderText="tableId" SortExpression="tableId" Visible="False" /> <asp:BoundField DataField="fieldId" HeaderText="fieldId" SortExpression="fieldId" Visible="False" /> <asp:BoundField DataField="groupId" HeaderText="groupId" SortExpression="groupId" Visible="False" /> </Columns> <FooterStyle BackColor="#B5C7DE" ForeColor="#4A3C8C" /> <HeaderStyle BackColor="#4A3C8C" Font-Bold="True" ForeColor="#F7F7F7" /> <PagerStyle BackColor="#E7E7FF" ForeColor="#4A3C8C" HorizontalAlign="Right" /> <RowStyle BackColor="#E7E7FF" ForeColor="#4A3C8C" /> <SelectedRowStyle BackColor="#738A9C" Font-Bold="True" ForeColor="#F7F7F7" /> <SortedAscendingCellStyle BackColor="#F4F4FD" /> <SortedAscendingHeaderStyle BackColor="#5A4C9D" /> <SortedDescendingCellStyle BackColor="#D8D8F0" /> <SortedDescendingHeaderStyle BackColor="#3E3277" /> </asp:GridView> </asp:Panel> </td> <td> </td> <td> <asp:Panel ID="Panel4" runat="server" Height="150px" Style="overflow-y: scroll;"> <asp:GridView ID="GridView4" runat="server" AutoGenerateColumns="False" DataKeyNames="id" DataSourceID="sdsUsersGroup" BackColor="White" BorderColor="#E7E7FF" BorderStyle="None" BorderWidth="1px" CellPadding="3" GridLines="Horizontal" ShowHeaderWhenEmpty="True"> <AlternatingRowStyle BackColor="#F7F7F7" /> <Columns> <asp:BoundField DataField="id" HeaderText="id" InsertVisible="False" ReadOnly="True" SortExpression="id" Visible="False" /> <asp:BoundField DataField="GroupName" HeaderText="GroupName" SortExpression="GroupName" /> <asp:BoundField DataField="GroupDescription" HeaderText="GroupDescription" SortExpression="GroupDescription" /> </Columns> <FooterStyle BackColor="#B5C7DE" ForeColor="#4A3C8C" /> <HeaderStyle BackColor="#4A3C8C" Font-Bold="True" ForeColor="#F7F7F7" /> <PagerStyle BackColor="#E7E7FF" ForeColor="#4A3C8C" HorizontalAlign="Right" /> <RowStyle BackColor="#E7E7FF" ForeColor="#4A3C8C" /> <SelectedRowStyle BackColor="#738A9C" Font-Bold="True" ForeColor="#F7F7F7" /> <SortedAscendingCellStyle BackColor="#F4F4FD" /> <SortedAscendingHeaderStyle BackColor="#5A4C9D" /> <SortedDescendingCellStyle BackColor="#D8D8F0" /> <SortedDescendingHeaderStyle BackColor="#3E3277" /> </asp:GridView> </asp:Panel> </td> </tr> </table> </div> <asp:SqlDataSource ID="sdsUsersByGroup" runat="server" ConnectionString="<%$ ConnectionStrings:SERKIntranetConnectionString %>" SelectCommand="SELECT [id] ,[userName] ,[userId] ,[groupId] ,[enabled] FROM [UserModules].[dbo].[Users] where groupid = @groupId"> <SelectParameters> <asp:ControlParameter ControlID="ddlUsersGroup" Name="groupId" PropertyName="SelectedValue" /> </SelectParameters> </asp:SqlDataSource> <asp:SqlDataSource ID="sdsModules" runat="server" ConnectionString="<%$ ConnectionStrings:SERKIntranetConnectionString %>" SelectCommand="SELECT [id] ,[ModuleName] ,[ModuleDescription] ,[Department] ,[CREATED_BY] FROM [UserModules].[dbo].[ModuleMaster]"></asp:SqlDataSource> <asp:SqlDataSource ID="sdsTablesByModule" runat="server" ConnectionString="<%$ ConnectionStrings:SERKIntranetConnectionString %>" SelectCommand="SELECT [id] ,[ModuleId] ,[TableName] ,[TableDescription] ,[CREATED_BY] FROM [UserModules].[dbo].[ModuleTables] where moduleid=@moduleid"> <SelectParameters> <asp:ControlParameter ControlID="ddlModules" Name="moduleid" PropertyName="SelectedValue" /> </SelectParameters> </asp:SqlDataSource> <asp:SqlDataSource ID="sdsUsers" runat="server" ConnectionString="<%$ ConnectionStrings:SERKIntranetConnectionString %>" SelectCommand="SELECT [id] ,[UserName] ,[UserLogin] ,[UserDepartment] FROM [serkintranet].[dbo].[WebUsers] where [UserDepartment] like @department"> <SelectParameters> <asp:ControlParameter ControlID="ddlDepartment" DefaultValue="%" Name="department" PropertyName="SelectedValue" /> </SelectParameters> </asp:SqlDataSource> <asp:SqlDataSource ID="sdsGroupsByTable" runat="server" ConnectionString="<%$ ConnectionStrings:SERKIntranetConnectionString %>" SelectCommand="SELECT t1.[id] ,t1.[tableId] ,t1.[fieldId] ,t1.[groupId] ,t2.[groupName] FROM [UserModules].[dbo].[Authorization] t1 left outer join [UserModules].[dbo].[Groups] t2 on t1.groupid = t2.id where tableid=@tableid "> <SelectParameters> <asp:ControlParameter ControlID="ddlTables" Name="tableid" PropertyName="SelectedValue" /> </SelectParameters> </asp:SqlDataSource> </form> </body> </html>