[Resolvido] String de BD com acentos

[Ronaldo Bueno 23]

Olá, Pessoal, novamente aqui para aprender.

 

Estou fazendo um site onde cadastrei as opções do menu em um BD, quando clico na opção ele me abre a página produtos pegando a string para fazer o filtro no BD.

 

O que está me tirando o sono é: as opções funcionam perfeitamente, mas quando chego em uma que tem acento. aparece o erro:

 

ADODB.Recordset error '800a0bb9' 

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another

 

a linha referenciada no erro está:

RSprodutos.open SQLprodutos, conn, 2, 2

 

Segue parte do código:

 

essa div monta o menu:

<div class="menu_head"><a href="produtos.asp?id=<%=RSselcate("categoria")%>"><%=RSselcate("categoria")%></a></div>

 

Abaixo pegar opção clicada e fazer a consulta:

 

<%
idcategoria = Request.Querystring("id")
response.write idcategoria

set RSprodutos = server.createobject("adodb.recordset")

if idcategoria = "Almofadas" then
SQLprodutos = "select * from produtos where categoria = '" & idcategoria & "'"
Elseif idcategoria = "Poltronas" then
SQLprodutos = "select * from produtos where categoria = '" & idcategoria & "'"
Elseif idcategoria = "Sofás" then
SQLprodutos = "select * from produtos where categoria = '" & idcategoria & "'"
Elseif idcategoria = "Cadeiras" then
SQLprodutos = "select * from produtos where categoria = '" & idcategoria & "'"
Elseif idcategoria = "Puffs" then
SQLprodutos = "select * from produtos where categoria = '" & idcategoria & "'"
End if

RSprodutos.open SQLprodutos, conn, 2, 2
%>

 

Pode ser uma coisa besta, mas esta me deixando de cabça quente.

 

Obs. Fiz um menu sem ser do BD, Fiz uma página para cada opção e tudo funciona corretamente, mas queria simplificar e ter apenas uma página de produtos. será que alguém já passou essa situação ?

 

Obrigado

[Ronaldo Bueno 23]

Estava com a cabeça quente e não estava pensando direito.

 

refiz sem aquele monte de if e tudo deu certo.

 

<%
idcategoria = Request.Querystring("id")

set RSprodutos = server.createobject("adodb.recordset")
SQLprodutos = "select * from produtos where categoria = '" & idcategoria & "'"
RSprodutos.open SQLprodutos, conn, 2, 2
%>