Click to See Complete Forum and Search --> : login pages


patti
05-09-2003, 09:39 AM
I can not seem to get the log in page to work.
Can someone please help?
thanks, Patti

Ribeyed
05-09-2003, 01:17 PM
yes

patti
05-09-2003, 03:54 PM
GREAT thanks!
so far the log in page works well; it is the next page that isn't working.
I have attached the code below... does it look funky?
the website is www.crest-care.com and the files to login are in the login folder (www.crest-care.com/Login/)
is that enough info?
Thank you! Patti

<%@ LANGUAGE="VBSCRIPT" %>

<%
' Connects and opens the text file
' DATA FORMAT IN TEXT FILE= "username<SPACE>password"

Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject")
Set MyTextFile=MyFileObject.OpenTextFile(Server.MapPath("\login") & "\passwords.txt")

' Scan the text file to determine if the user is legal
WHILE NOT MyTextFile.AtEndOfStream
' If username and password found
IF MyTextFile.ReadLine = Request.form("username") & " " & Request.form("password") THEN
' Close the text file
MyTextFile.Close
' Go to login success page
Session("GoBack")=Request.ServerVariables("SCRIPT_NAME")
Response.Redirect "inyougo.asp"
Response.end
END IF
WEND

' Close the text file
MyTextFile.Close
' Go to error page if login unsuccessful
Session("GoBack")=Request.ServerVariables("SCRIPT_NAME")
Response.Redirect "invalid.asp"
Response.end

%>

swstos
05-09-2003, 05:13 PM
what do you mean the next page?

do you mean that is not redirecting to the next page?

' Close the text file
MyTextFile.Close

close the file after the loop...

patti
05-10-2003, 10:57 AM
Yes, I meant that it is not redirecting to the next page (the private one for people who login only).
Thank you for your help, I appreciate it.
Shall I end the code after:

Close the text file
MyTextFile.Close

Patti