![]() Topic awaiting preservation: Adding a secure section to your website (Page 1 of 1) |
|
|---|---|
|
Paranoid (IV) Inmate From: London |
posted 01-13-2010 10:25
Hello, |
|
Paranoid (IV) Inmate From: Mercury City |
posted 01-13-2010 10:44
quote:
|
|
Paranoid (IV) Inmate From: London |
posted 01-13-2010 11:38
|
|
Paranoid (IV) Inmate From: Mercury City |
posted 01-13-2010 13:24
I've never heard of the possibility of specifying some indexing options in a Global.asa file personally. The answer I gave you was specifically for your indexing issue, and I don't think you can resolve it with a Global.asa file ? but I might be wrong. |
|
Nervous Wreck (II) Inmate From: |
posted 01-13-2010 14:13
I take it you are running an IIS server? In that case, .htaccess isa useless. Depending on versions, ISAPI filters might be needed (plain vanilla asp) or you'll have to configure roles in asp.net. |
|
Paranoid (IV) Inmate From: London |
posted 01-13-2010 14:15
|
|
Nervous Wreck (II) Inmate From: |
posted 01-13-2010 14:16
Blaise : check the above link, it contains everything you need to know. |
|
Paranoid (IV) Inmate From: London |
posted 01-13-2010 16:03
Unfortunately I don't have access to the WebServer to make these changes. code: <%
IF NOT Application("session") = Session("access") OR Application("session") = "" THEN
Response.Redirect("../index.html")
END IF
%>
|
|
Nervous Wreck (II) Inmate From: |
posted 01-14-2010 01:53
Okay, bear with me... |
|
Nervous Wreck (II) Inmate From: |
posted 01-14-2010 07:47
....In the 21st century, that "post too old" feature is a really terrible idea |
|
Paranoid (IV) Inmate From: London |
posted 01-14-2010 11:00
This is the code I ran with in the end. code: sub Session_OnStart
Application("session")=""
end sub
code: password = LCase(Request.Form("pword"))
user = LCase(Request.Form("uname"))
location = ""
Session("access") = ""
IF (user = "test" AND password = "testpass") Then
Session("access") = "test_account"
location = "test_account/index.asp"
END IF
Application("session") = Session("access")
dim folder
set folder = Server.CreateObject("Scripting.FielSystemObject")
Response.Redirect("location")
code: Dim folder, client
Set folder = Server.CreateObject("Scripting.FileSystemObject")
client = folder.GetParentFolderName(Request.ServerVariables("SCRIPT_NAME"))
client = Right(client,InStrRev(client, "/"))
Session("access") = client
IF NOT Application("session") = Session("access") OR Application("session") = "" THEN
Response.Redirect("../index.html")
END IF
|
|
Nervous Wreck (II) Inmate From: |
posted 01-14-2010 12:53
Yeah, it's safe. For memory/speed, you could skip the FSO (FileSystemObject) and tap into the built-in Server object, but you're good to go. |