Subversion Repositories DevTools

Rev

Rev 5512 | Go to most recent revision | 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>
43
</head>
44
 
45
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0">
46
<!-- HEADER ++++++++++++++++++++++ -->
47
<!--#include file="_header.asp"-->
48
<!-- +++++++++++++++++++++++++++++ -->
49
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
50
	<tr>
51
		<td width="1%" valign="top" background="images/bg_bage_pane.gif">
52
		<!-- TREE NAVIGATOR ++++++++++++++++++++++++++++++++++++++++++++ -->
53
		<!--#include file="_treeNavigator.asp"-->  
54
		<!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
55
		</td>
56
		<td width="1" background="images/bg_drk_gray_border.gif"><img src="images/spacer.gif" width="1" height="600"></td>
57
		<td width="100%" valign="top">
58
			<table width="100%"  border="0" cellspacing="0" cellpadding="9">
59
				<tr>
60
					<td background="images/bg_drk_bage_pane.gif">
61
						<table width="100%"  border="0" cellspacing="0" cellpadding="0">
62
							<tr>
63
								<td nowrap class="body_txt"></td>
64
								<td align="right" nowrap class="section_ttl"><%=PARENT_TITLE%></td>
65
							</tr>
66
						</table>
67
					</td>
68
				</tr>
69
				<tr>
70
					<td class="menu_crumbttl"><%Call RenderTitle ( objUserCollector )%></td>
71
				</tr>
72
				<tr>
73
					<td>
74
					<!-- DETAILS ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
75
					<!-- TAB CONTROLS ++++++++++++++++++++++ -->
76
					<!--#include file="_tabs_definition.asp"-->
77
					<%
78
					Set objTabControl = New TabControl
79
					objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleMac/mac_style.html") ) ' Supply tab style definition
80
					objTabControl.TabStyle = "StyleMac"
81
					objTabControl.AddTabDefnition ( arrUserAccount )
82
					objTabControl.SelectByName ( "General" )
83
					objTabControl.Render ()
84
					%>
85
					<!-- END OF TAB CONTROLS +++++++++++++++ -->
86
						<table width="100%"  border="0" cellspacing="0" cellpadding="0">
87
							<tr>
88
								<td width="1" background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="500"></td>
89
								<td width="100%" valign="top">
90
									<table width="100%"  border="0" cellspacing="10" cellpadding="0">
91
										<tr>
92
											<td>
93
												<!-- TAB DETAILS +++++++++++++++++++++++++++++ -->
94
												<table border="0" align="left" bordercolor="#666666" bgcolor="#FFFFFF">
95
													<tr>
96
														<td class="body_row">User ID: </td>
97
														<td class="body_col"><%=Response.Write(objUserCollector("user_id"))%></td>
98
													</tr>
99
													<tr>
100
														<td class="body_row">Full Name: </td>
101
														<td class="body_col"><%=Response.Write(objUserCollector("full_name"))%></td>
102
													</tr>
103
													<tr>
104
														<td class="body_row">User Name: </td>
105
														<td class="body_col"><%=Response.Write(objUserCollector("user_name"))%></td>
106
													</tr>
107
													<tr>
108
														<td class="body_row">Domain: </td>
109
														<td class="body_col"><%=Response.Write(objUserCollector("domain"))%></td>
110
													</tr>
111
													<tr>
112
														<td class="body_row">Email: </td>
113
														<td class="body_col"><%=Response.Write(objUserCollector("user_email"))%></td>
114
													</tr>
6049 dpurdie 115
													<tr>
116
														<td class="body_row">State: </td>
117
														<td class="body_col"><%=iif( objUserCollector("is_disabled") = "Y", "Account Disabled", "Account Active" )%></td>
118
													</tr>
119
 
5354 dpurdie 120
												</table>
121
											</td>
122
										</tr>
123
										<tr>
124
                                            <td>
125
                                                <% If canActionControl("canEditUserDetails") Then%>
126
			                                    <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')">
127
                                                    Edit Details <%=LIMG_EDIT%>
128
                                                </button>
129
                                                <%Else%>
130
			                                    <span class="form_btn_dis" >
131
                                                    Edit Details <%=LIMG_EDIT_OFF%>
132
                                                </span>
133
                                                <%End If%>
134
                                            </td>
135
										</tr>
136
									</table>
137
								</td>
138
								<td width="1" background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
139
							</tr>
140
						</table>
141
						<table width="100%"  border="0" cellspacing="0" cellpadding="0">
142
							<tr>
143
								<td background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
144
							</tr>
145
						</table>
146
						<!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
147
						<br>
148
					</td>
149
				</tr>
150
			</table>
151
		</td>
152
	</tr>
153
</table>
154
<!-- FOOTER ++++++++++++++++++++++ -->
155
<!--#include file="_footer.asp"-->
156
<!-- +++++++++++++++++++++++++++++ -->
157
</body>
158
</html>
159
<%
160
'------------ RUN AFTER PAGE RENDER -----------
161
'----------------------------------------------
162
%>
2 rsolanki 163
<!--#include file="common/globals_destructor.asp"-->