Subversion Repositories DevTools

Rev

Rev 6049 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5354 dpurdie 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
4
'|                                                   |
5
'|                    User General                   |
6
'|                                                   |
7
'=====================================================
8
%>
9
<%
10
Option explicit
11
Response.Expires = 0
12
%>
13
<!--#include file="common/globals.asp"-->
14
<!--#include file="common/config.asp"-->
15
<!--#include file="common/common_subs.asp"-->
16
<!--#include file="common/_user_common.asp"-->
17
<%
18
'------------ ACCESS CONTROL ------------------
19
%>
20
<!--#include file="_access_control_general.asp"-->
21
<%
22
'------------ VARIABLE DEFINITION -------------
23
Dim sNode
24
Dim rsQry
25
'------------ CONSTANTS DECLARATION -----------
26
'------------ VARIABLE INIT -------------------
27
'------------ CONDITIONS ----------------------
28
'----------------------------------------------
29
%>
30
<%
31
'------------ RUN BEFORE PAGE RENDER ----------
32
Call GetUserDetails ( parUser_id, objUserCollector )
33
'----------------------------------------------
34
%>
35
<html>
36
<head>
37
<title>Access Manager</title>
38
<link rel="shortcut icon" href="<%=FavIcon%>"/>
39
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
40
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
41
<link href="scripts/access_manager.css" rel="stylesheet" type="text/css">
42
<script language="JavaScript" src="scripts/common.js"></script>
6658 dpurdie 43
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
5354 dpurdie 44
</head>
45
 
46
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0">
47
<!-- HEADER ++++++++++++++++++++++ -->
48
<!--#include file="_header.asp"-->
49
<!-- +++++++++++++++++++++++++++++ -->
50
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
51
	<tr>
52
		<td width="1%" valign="top" background="images/bg_bage_pane.gif">
53
		<!-- TREE NAVIGATOR ++++++++++++++++++++++++++++++++++++++++++++ -->
54
		<!--#include file="_treeNavigator.asp"-->  
55
		<!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
56
		</td>
57
		<td width="1" background="images/bg_drk_gray_border.gif"><img src="images/spacer.gif" width="1" height="600"></td>
58
		<td width="100%" valign="top">
59
			<table width="100%"  border="0" cellspacing="0" cellpadding="9">
60
				<tr>
61
					<td background="images/bg_drk_bage_pane.gif">
62
						<table width="100%"  border="0" cellspacing="0" cellpadding="0">
63
							<tr>
64
								<td nowrap class="body_txt"></td>
65
								<td align="right" nowrap class="section_ttl"><%=PARENT_TITLE%></td>
66
							</tr>
67
						</table>
68
					</td>
69
				</tr>
70
				<tr>
71
					<td class="menu_crumbttl"><%Call RenderTitle ( objUserCollector )%></td>
72
				</tr>
73
				<tr>
74
					<td>
75
					<!-- DETAILS ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
76
					<!-- TAB CONTROLS ++++++++++++++++++++++ -->
77
					<!--#include file="_tabs_definition.asp"-->
78
					<%
79
					Set objTabControl = New TabControl
80
					objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleMac/mac_style.html") ) ' Supply tab style definition
81
					objTabControl.TabStyle = "StyleMac"
82
					objTabControl.AddTabDefnition ( arrUserAccount )
83
					objTabControl.SelectByName ( "General" )
84
					objTabControl.Render ()
85
					%>
86
					<!-- END OF TAB CONTROLS +++++++++++++++ -->
87
						<table width="100%"  border="0" cellspacing="0" cellpadding="0">
88
							<tr>
89
								<td width="1" background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="500"></td>
90
								<td width="100%" valign="top">
91
									<table width="100%"  border="0" cellspacing="10" cellpadding="0">
92
										<tr>
93
											<td>
94
												<!-- TAB DETAILS +++++++++++++++++++++++++++++ -->
95
												<table border="0" align="left" bordercolor="#666666" bgcolor="#FFFFFF">
96
													<tr>
97
														<td class="body_row">User ID: </td>
98
														<td class="body_col"><%=Response.Write(objUserCollector("user_id"))%></td>
99
													</tr>
100
													<tr>
101
														<td class="body_row">Full Name: </td>
102
														<td class="body_col"><%=Response.Write(objUserCollector("full_name"))%></td>
103
													</tr>
104
													<tr>
105
														<td class="body_row">User Name: </td>
106
														<td class="body_col"><%=Response.Write(objUserCollector("user_name"))%></td>
107
													</tr>
108
													<tr>
109
														<td class="body_row">Domain: </td>
110
														<td class="body_col"><%=Response.Write(objUserCollector("domain"))%></td>
111
													</tr>
112
													<tr>
113
														<td class="body_row">Email: </td>
114
														<td class="body_col"><%=Response.Write(objUserCollector("user_email"))%></td>
115
													</tr>
6049 dpurdie 116
													<tr>
117
														<td class="body_row">State: </td>
118
														<td class="body_col"><%=iif( objUserCollector("is_disabled") = "Y", "Account Disabled", "Account Active" )%></td>
119
													</tr>
120
 
5354 dpurdie 121
												</table>
122
											</td>
123
										</tr>
124
										<tr>
125
                                            <td>
126
                                                <% If canActionControl("canEditUserDetails") Then%>
127
			                                    <button class="form_btn" onclick="MM_openBrWindow('wEditAccount.asp?rmode=1&rfile=<%=SCRIPT_NAME%>&<%=objPMod.ComposeURL%>','EditAccount','scrollbars=yes,resizable=yes,width=600,height=350')">
128
                                                    Edit Details <%=LIMG_EDIT%>
129
                                                </button>
130
                                                <%Else%>
131
			                                    <span class="form_btn_dis" >
132
                                                    Edit Details <%=LIMG_EDIT_OFF%>
133
                                                </span>
134
                                                <%End If%>
135
                                            </td>
136
										</tr>
137
									</table>
138
								</td>
139
								<td width="1" background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
140
							</tr>
141
						</table>
142
						<table width="100%"  border="0" cellspacing="0" cellpadding="0">
143
							<tr>
144
								<td background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
145
							</tr>
146
						</table>
147
						<!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
148
						<br>
149
					</td>
150
				</tr>
151
			</table>
152
		</td>
153
	</tr>
154
</table>
155
<!-- FOOTER ++++++++++++++++++++++ -->
156
<!--#include file="_footer.asp"-->
157
<!-- +++++++++++++++++++++++++++++ -->
158
</body>
159
</html>
160
<%
161
'------------ RUN AFTER PAGE RENDER -----------
162
'----------------------------------------------
163
%>
2 rsolanki 164
<!--#include file="common/globals_destructor.asp"-->