Tipo incompat�vel: 'response.cookies(...).Expires'
<%@ LANGUAGE="VBSCRIPT"%>
<% ' put forms content into varables or something
username = request("username")
password = request("password")%>
<% ' open data base above then check for the user name%>
<%checkPass = "select * from members where username='"&username&"'"
'response.write checkPass
set passSet = canvasDB.execute(checkPass)
if passSet.EOF then
'That username not in the database
response.redirect"default.asp?error=Username%20not%20found"
else
' the username is ok, lets check the password
real_password = trim(passSet("password"))
if password = real_password then
' pass o.k
response.cookies("registered")= username
Response.Cookies("registered").Expires="Sept 6, 2002"
Response.cookies("loggedin")= true
else
'username ok but pass wrong
response.redirect "default.asp?error=Wrong%20or%20unknown%20password"
end if
end if
' direct the user if all is ok
'%>
<%response.redirect "members.asp"%>
<%
'close it off
passSet.close
set passSet= nothing
%>
http://www.asp10.net
==========================================
Solu��es simples para problemas complexos
==========================================
|
|
|
||
| p�gina do grupo | diret�rio de grupos | diret�rio de pessoas | cancelar assinatura |
