Erro na Aplicação

[raposo 0]

Prezados(as),

 

Estou desenvolvendo uma aplicação e o seguinte erro é apresentado:

 

Tipo de erro:

Microsoft JET Database Engine (0x80040E14)

Erro de sintaxe (operador faltando) na expressão de consulta 'cod_usuario ='.

/newintra/wwwroot/mudarSenha.asp, line 3

 

Segue o código:

<!--Erro Linha3--> Set rs = conexao.execute("Select * from PERSITE_usuarios where cod_usuario = " & request.cookies("sbsv3")("CODUSER")&"")

<!--Linha4--> vNome = rs("nom_usuario")

<!--Linha5--> vDesc = rs("des_usuario")

<!--Linha6--> vEmail = rs("des_email")

<!--Linha7--> vFoto = rs("foto")

 

Set objFileSys = server.createobject("Scripting.FilesystemObject")

dir = server.mappath("imagens/")

set TheFolder=objFileSys.GetFolder(dir)

Set MyDrives = objFileSys.Drives

set TheRootFolder = TheFolder

set RootFolders = TheRootFolder.SubFolders

 

 

 

 

 

Como posso resolver?

 

Desde já agradeço!

[jrcardozo 4]

o cookie está vazio ou nulo

request.cookies("sbsv3")("CODUSER")

 

faça um IF para verificar se tem valor ou concatene com 0: Clng("0" & request.cookies("sbsv3")("CODUSER"))

[raposo 0]

Olá Jonathandj,

 

Obrigado pela resposta.

Elaborei o código da seguinte forma:

 

 

Set rs = conexao.execute("Select * from PERSITE_usuarios where cod_usuario = Clng("0" & request.cookies("sbsv3")("CODUSER")&"")

 

 

E atribui este erro:

Tipo de erro:

Erro de compilação do Microsoft VBScript (0x800A03EE)

')' esperado

wwwroot/mudarSenha.asp, line 3, column 83

[Dee 0]

Faltou um '&' e Aspas antes do Request.Cookies

 

Set rs = conexao.execute("Select * from PERSITE_usuarios where cod_usuario = Clng('0'" & request.cookies("sbsv3")("CODUSER"))

[Patrique 0]

Ta faltando um "(" no code, o proprio erro já fala, o certo seria assim

 

Set rs = conexao.execute("Select * from PERSITE_usuarios where cod_usuario = Clng('0'" & request.cookies("sbsv3")("CODUSER")))