Subversion Repositories DevTools

Rev

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

Rev 2365 Rev 3959
Line 92... Line 92...
92 
			Call OpenInWindow ( "index.asp" )
 92 
			Call OpenInWindow ( "index.asp" )
93 
		End If
 93 
		End If
94
94
95
95
96 
	End If
 96 
	End If
97
- 
 
98 
End If
 97 
End If
99 
 
 98 
 
- 
 
 99 
' Attempt to kill of old ASPSESSIONID cookies
- 
 
 100 
'   Appears that we get one every time we login
- 
 
 101 
'   Soluton: Kill them all before we login
- 
 
 102 
'
- 
 
 103 
If instr(Request.ServerVariables("HTTP_COOKIE"), "ASPSESSIONID") > 0 Then
- 
 
 104 
 
- 
 
 105 
    Dim Allcookies,i
- 
 
 106 
 
- 
 
 107 
    AllCookies = Split(Request.ServerVariables("HTTP_COOKIE"),";")
- 
 
 108 
    For i = 1 to UBound(AllCookies)
- 
 
 109 
 
- 
 
 110 
        If instr(AllCookies(i), "ASPSESSIONID") > 0 Then
- 
 
 111 
            Response.AddHeader "Set-Cookie", Left(AllCookies(i),instr(AllCookies(i),"=") -1) & "=0; path=/;secure;httponly"
- 
 
 112 
        End if
- 
 
 113 
 
- 
 
 114 
    Next
- 
 
 115 
End If
- 
 
 116 
 
- 
 
 117 
 
100 
Call AccessManagerMessage( Request("message") )
 118 
Call AccessManagerMessage( Request("message") )
101 
'----------------------------------------------
 119 
'----------------------------------------------
102 
%>
 120 
%>
103 
<html>
 121 
<html>
104 
<head>
 122 
<head>
Line 142... Line 160...
142 
                <tr>
 160 
                <tr>
143 
                  <td align="center" valign="top">
 161 
                  <td align="center" valign="top">
144 
				  <table width="100"  border="0" cellspacing="2" cellpadding="0">
 162 
				  <table width="100"  border="0" cellspacing="2" cellpadding="0">
145 
                      <tr>
 163 
                      <tr>
146 
                        <td width="10%" nowrap class="form_iname">Username</td>
 164 
                        <td width="10%" nowrap class="form_iname">Username</td>
147 
                        <td width="1%"><input name="user_name" type="text" class="form_ivalue" size="20"></td>
 165 
                        <td width="1%"><input name="user_name" type="text" class="form_item" size="20"></td>
148 
                      </tr>
 166 
                      </tr>
149 
                      <tr>
 167 
                      <tr>
150 
                        <td nowrap class="form_iname">Password</td>
 168 
                        <td nowrap class="form_iname">Password</td>
151 
                        <td><input name="user_password" type="password" class="form_ivalue" size="20"></td>
 169 
                        <td><input name="user_password" type="password" class="form_item" size="20" <%If objAccessControl.isDevSystem Then Response.write"disabled"%>></td>
152 
                      </tr>
 170 
                      </tr>
153 
                      <tr>
 171 
                      <tr>
154 
                        <td nowrap class="form_iname" valign="top">&nbsp;</td>
 172 
                        <td nowrap class="form_iname" valign="top">&nbsp;</td>
155 
                        <td valign="top">&nbsp;</td>
 173 
                        <td valign="top">&nbsp;</td>
156 
                      </tr>
 174 
                      </tr>
Line 159... Line 177...
159 
                <tr>
 177 
                <tr>
160 
                  <td background="images/bg_login.gif">
 178 
                  <td background="images/bg_login.gif">
161 
				  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
 179 
				  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
162 
                      <tr>
 180 
                      <tr>
163 
                        <td><%=ProgressBar()%></td>
 181 
                        <td><%=ProgressBar()%></td>
164 
                        <td align="right"><input name="btn" type="submit" class="form_btn" value="Login"></td>
 182 
                        <td align="right"><input name="btn" type="submit" class="form_btn" value="Login" onclick="MM_validateForm('user_name','Username','R'<%If NOT objAccessControl.isDevSystem Then Response.write",'user_password','Password','R'"%>);return document.MM_returnValue"></td>
165 
                      </tr>
 183 
                      </tr>
166 
                  </table></td>
 184 
                  </table></td>
167 
                </tr>
 185 
                </tr>
168 
              </table>
 186 
              </table>
169 
			  </td>
 187 
			  </td>