Hola a todos,
necesito ayuda con este codigo:
<%
set CheckUser = Server.CreateObject("ADODB.Recordset")
CheckUser.ActiveConnection = dbpath
CheckUser.Source = "SELECT * FROM Members WHERE Username
= '" + Replace(CheckUser__myuser, "'", "''") + "' AND
Confirmed = TRUE"
CheckUser.CursorType = 0
CheckUser.CursorLocation = 2
CheckUser.LockType = 3
CheckUser.Open
CheckUser_numRows = 0
%>
<%
if checkUser.eof then
response.redirect"../login.asp?error=No encontrado"
End if
if lcase(checkUser("Username")) = lcase(request
("username")) then
if checkuser("mypass") = request("mypass") then
Response.Cookies("username") = checkuser
("Username")
Response.Cookies("numcol") = checkuser
("numcol")
session("user-logged") = "Yes"
session("user-level") = CheckUser
("ApvLevel")
if filewrite <> "" then %>
<!--#include file ="filewrite.asp">
El problema es que cuano accede a este codigo, me da un
error de Response.Cookies que es el siguiente:
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'response.Cookies'
Me podeis ayudar? Gracias
Leer las respuestas