Subversion Repositories DevTools

Rev

Rev 1499 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1499 Rev 3928
Line 39... Line 39...
39
	
39
	
40
	'update fields
40
	'update fields
41
	rsTemp.Edit
41
	rsTemp.Edit
42
	rsTemp.Fields("full_name").Value = SSfullname
42
	rsTemp.Fields("full_name").Value = SSfullname
43
	rsTemp.Fields("user_email").Value = SSemail
43
	rsTemp.Fields("user_email").Value = SSemail
-
 
44
 
-
 
45
    ' Removed ability for user to configure domain name
-
 
46
    ' This is done via access manager
-
 
47
    ' Note: Code is suspect anyway. Can clear domain login - but can't set it
44
	If SSDomainAuth = "N"  AND objAccessControl.Domain <> "" Then
48
	'If SSDomainAuth = "N"  AND objAccessControl.Domain <> "" Then
45
		If SSDomainAuth = "Y" Then
49
	'	If SSDomainAuth = "Y" Then
46
			rsTemp.Fields("user_password").Value = NULL
50
	'		rsTemp.Fields("user_password").Value = NULL
47
			rsTemp.Fields("domain").Value = SSdomain_name
51
	'		rsTemp.Fields("domain").Value = SSdomain_name
48
		Else
52
	'	Else
49
			rsTemp.Fields("domain").Value = NULL
53
	'		rsTemp.Fields("domain").Value = NULL
50
		End If
54
	'	End If
51
	End If
55
	'End If
52
	rsTemp.Update
56
	rsTemp.Update
53
	
57
	
54
	rsTemp.Close
58
	rsTemp.Close
55
	Set rsTemp = nothing
59
	Set rsTemp = nothing
56
End Sub
60
End Sub
Line 159... Line 163...
159
                  <td width="1%"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
163
                  <td width="1%"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
160
                  <td width="1%" nowrap class="form_group" valign="bottom"><br>
164
                  <td width="1%" nowrap class="form_group" valign="bottom"><br>
161
                    LOGIN DETAILS</td>
165
                    LOGIN DETAILS</td>
162
                  <td nowrap width="100%" align="right" class="form_step">&nbsp;</td>
166
                  <td nowrap width="100%" align="right" class="form_step">&nbsp;</td>
163
                </tr>
167
                </tr>
-
 
168
 
-
 
169
                <!-- User can no longer enter data for these fields. Fields are disabled or hidden -->
164
				<tr> 
170
				<tr>
165
                  <td width="1%">&nbsp;</td>
171
                  <td width="1%">&nbsp;</td>
166
                  <td width="1%" nowrap class="form_field" background="images/bg_form_lightbluedark.gif">Username</td>
172
                  <td width="1%" nowrap class="form_field" background="images/bg_form_lightbluedark.gif">Username</td>
167
                  <td nowrap width="100%" background="images/bg_form_lightbluedark.gif"> 
173
                  <td nowrap width="100%" background="images/bg_form_lightbluedark.gif"> 
168
                    <input type="text" name="FRusername" class="form_item" value="<%=objAccessControl.UserName%>" disabled>
174
                    <input disabled type="text" name="FRusername" class="form_item" value="<%=objAccessControl.UserName%>" disabled>
169
                    <input type="checkbox" name="FRdomainauth" value="Y" onClick="DisableDomain();"   <%If objAccessControl.Domain <> "" Then Response.write "checked"%>>
175
                    <input disabled type="checkbox" name="FRdomainauth" value="Y" onClick="DisableDomain();"   <%If objAccessControl.Domain <> "" Then Response.write "checked"%>>
170
                    <span class="form_txt">Domain User</span><%=Quick_Help ( "domain_user" )%></td>
176
                    <span class="form_txt">Domain User</span><%=Quick_Help ( "domain_user" )%></td>
171
                </tr>
177
                </tr>
172
				<tr> 
178
				<tr> 
173
                  <td width="1%">&nbsp;</td>
179
                  <td width="1%">&nbsp;</td>
174
                  <td width="1%" nowrap class="form_field" background="images/bg_form_lightbluedark.gif">Domain Name</td>
180
                  <td width="1%" nowrap class="form_field" background="images/bg_form_lightbluedark.gif">Domain Name</td>
175
                  <td nowrap width="100%" background="images/bg_form_lightbluedark.gif"> 
181
                  <td nowrap width="100%" background="images/bg_form_lightbluedark.gif"> 
176
                    <input type="text" name="FRdomain_name" class="form_item" <%If objAccessControl.Domain = "" Then Response.write "disabled"%> value="<%=objAccessControl.Domain%>"><input type="text" name="FRstatus3" class="form_status" disabled <%If objAccessControl.Domain = "" Then%>value="Not Required!"<%Else%>value=""<%End If%>>
182
                    <input disabled type="text" name="FRdomain_name" class="form_item" <%If objAccessControl.Domain = "" Then Response.write "disabled"%> value="<%=objAccessControl.Domain%>">
-
 
183
                    <span hidden class="form_status">
-
 
184
                        <%If objAccessControl.Domain = "" Then Response.Write "Not Required!"%>
-
 
185
                    </span>
177
                  </td>
186
                  </td>
178
                </tr>
187
                </tr>
179
				
188
				
180
				
-
 
181
				
-
 
182
                <tr> 
189
                <tr>
183
                  <td width="1%">&nbsp;</td>
190
                  <td width="1%">&nbsp;</td>
184
                  <td width="1%" nowrap class="form_field"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
191
                  <td width="1%" nowrap class="form_field"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
185
                  <td nowrap width="100%"> 
192
                  <td nowrap width="100%"> 
186
                    <input type="hidden" name="action" value="true">
193
                    <input type="hidden" name="action" value="true">
187
                    <input type="submit" name="btn" value=" Apply " class="form_btn">
194
                    <input type="submit" name="btn" value=" Apply " class="form_btn">