coisa esquizita

[Reginaldo 0]

boa noite comunidade... estou com um probleminha e espero contar com você' + essa vez.. http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

 

tenho um site com 2 opções de idioma.. ingles e portugues...

 

portugues na raiz e ingles um diretorio acima... endereço/ingles

 

esse site tem uma area restrita a usuarios cadastrados..

 

pra isso fiz um ssitema de login..

 

mas tem um problema... ele só funciona na raiz... na area em ingles ele da o seguinte erro:

 

ASP

[*]ADODB.Recordset error '800a0cc1' 

 

[*]

 

[*]Item cannot be found in the collection corresponding to the requested name or ordinal. 

 

[*]

 

[*]/ingles/login.asp, line 24 

 

[*]

 

é o mesmo arquivo da raiz.. só q numa pasta acima... acessa o mesmo banco de dados.. vou colocar abaixo o trexo do erro..

 

ASP

[*]<%

 

[*]Set Conn = Server.CreateObject("AdoDb.Connection") 

 

[*]Conn.provider="Microsoft.Jet.OLEDB.4.0" 

 

[*]Conn.connectionstring=Server.Mappath("./adm/banco.mdb") 

 

[*]Conn.open

 

[*]

 

[*]login = Request.Form("usuario")

 

[*]senha = Request.Form("senha") 

 

[*]

 

[*]SQL = "select * from usuarios where usuario = '"&login&"' and senha = '"&senha&"' "

 

[*]Set RS = Conn.Execute(SQL)

 

[*]

 

[*]If RS.EOF Then

 

[*] Response.Redirect "negado.asp"

 

[*]End If

 

[*]

 

[*]session("nivel_acesso") = RS("nivel")

 

[*]

 

[*]

 

[*]usuario = RS("usuario")

 

[*]Set RS2 = conn.Execute("SELECT * FROM usuarios WHERE usuario = '"&usuario&"'")

 

[*]cont = RS2("acesso")

 

[*]limite = RS2("limite")  <<<<<<<=======LINHA 24

 

[*]if limite = "nao" then

 

[*]Response.redirect("logado.asp")

 

[*]else

 

[*]if cont = 2 then

 

[*]Response.redirect("negado.asp")

 

[*]Response.End

 

[*]End if

 

[*]End if

 

[*]cont = cont + 1

 

[*]Set RS2 = Server.CreateObject("ADODB.Connection")

 

[*]SQL2 = "UPDATE usuarios SET acesso='"& RS("acesso")+ 1 & "' WHERE usuario='"&usuario&"'"

 

[*]Rs2.Open conn

 

[*]RS2.Execute (SQL2)

 

[*]

 

[*]Response.Redirect "logado.asp"%>

 

alguem pode me dar uma força ? essa eu não entendi...

 

desde ja agradeço..

[Reginaldo 0]

o galera.. num deve ser tão dificil assim.. você's manjam pra caramba.. ajudem um irmão .. rs abraço...

[ska_ska 0]

o campo RS2("limite") não foi localizado na sua pesquisa sql...

[Reginaldo 0]

o campo RS2("limite")  não foi localizado na sua pesquisa sql...

<{POST_SNAPBACK}>

mas pq não ? na raiz ele encontra... login.asp na raiz e login.asp nesse diretorio são o mesmo arquivo... esse diretorio tem o mesmo conteudo só que em outra lingua... oq será q acontece ? a string ta certinha... ele faz a conexão e o nome do campo esta ok...

 

:wacko:

[AEM 0]

ae reginaldo, isto aconteceu comigo .. e meu problema estava na conexao do BD Utilize o caminho diretoEX:Conn.connectionstring = "C:\diretorio\banco.mdb"comigo tinha dado certo... quando dava o erro acima .. q ele nao encontrou na tabela o item ordinal solicitado era isto.. tentae nao custa

[AEM 0]

ae reginaldo, isto aconteceu comigo .. e meu problema estava na conexao do BD

Utilize o caminho direto

EX:

Conn.connectionstring = "C:\diretorio\banco.mdb"

comigo tinha dado certo... quando dava o erro acima .. q ele nao encontrou na tabela o item ordinal solicitado era isto.. tentae nao custa

<{POST_SNAPBACK}>

meio coisa de louco nao é...

[Reginaldo 0]

vou tentar aki... mas tenho certeza q não é a string.. pois a variavel que efetua o login ganha o valor do registro no banco e mesmo acontecendo esse erro... a pessoa ja fica logada http://forum.imasters.com.br/public/style_emoticons/default/yes.gif

 

coisa de loko mesmo :wacko: mas vou fazer a sua dica.. depois coloco aki se deu certo..

 

grande abraço ..

[Generation 0]

Opa beleza?

 

Bom desculpe por nao esperar sua solucao, mas analisei e vi uma coisa e queria perguntar...você tem duas tabelas?? uma chamada usuario e outra chamada usuarios ??

 

Acho que o erro esta ai...olhe..

 

ASP

[*]SQL = "select * from usuarios where usuario = '"&login&"' and senha = '"&senha&"' "

 

[*]

ASP

[*]

 

[*]Set RS2 = conn.Execute("SELECT * FROM usuarios WHERE usuario = '"&usuario&"'")

 

será que nao é..e por isso diz que a coluna nao existe?

 

 

T+

[Reginaldo 0]

Opa beleza?

 

Bom desculpe por nao esperar sua solucao, mas analisei e vi uma coisa e queria perguntar...você tem duas tabelas?? uma chamada usuario e outra chamada usuarios ??

 

Acho que o erro esta ai...olhe..

 

ASP

[*]SQL = "select * from usuarios where usuario = '"&login&"' and senha = '"&senha&"' "

ASP

[*]Set RS2 = conn.Execute("SELECT * FROM usuarios WHERE usuario = '"&usuario&"'")

 

será que nao é..e por isso diz que a coluna nao existe?

 

 

T+

<{POST_SNAPBACK}>

agradeço a força amigo... mas você se enganou... tem lugar q "usuario" é uma variavel.. tem lugar q usuario é um campo...

 

tenho apenas a tabela usuarios em minha rotina...

 

agradeço mesmo assim.. oq vale é a intenção...

grnde abraço http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Reginaldo 0]

resaltando.. a solução do AEM não deu certo... agradeço a força.. mas não era isso..

 

nossa q coisa estranha né..

 

quem tiver um palpite.. por favor da uma forcinha ai...

http://forum.imasters.com.br/public/style_emoticons/default/blush.gif

 

boa noite comunidade.

[Generation 0]

Desculpe a falta de atenção, o erro que ocorreu e voce citou é como o Ska disse...., A coluna limite nao pode ser encontrada na tabela usuarios, tem como voce dar uma olhada se ela existe e tem esse nome mesmo?T+

[Reginaldo 0]

Desculpe a falta de atenção, o erro que ocorreu e voce citou é como o Ska disse...., A coluna limite nao pode ser encontrada na tabela usuarios, tem como voce dar uma olhada se ela existe e tem esse nome mesmo?

 

 

T+

<{POST_SNAPBACK}>

existe sim.. tanto q um diretório abaixo (raiz) a rotina roda perfeitinha... tanto na raiz qto nesse diretório ela acessa a mesma base de dados..

 

coisa de loko :blink: