Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

HiTech-SP

Problemas com WHERE, dados incompatíveis

Recommended Posts

Estou fazendo um fórum, vejam abaixo meu código:

 

<%

Set c=Server.CreateObject("ADODB.Connection")

c.Open "DSN=Banco"

DIM cod

cod=1

 

Set rs = c.execute("SELECT * FROM FORUM WHERE f = '" & cod & "'")

%>

<html>

<body>

<table width="76%" border="0" cellspacing="1" cellpadding="2">

<tr bgcolor="#CCCCCC">

<td width="44%"> <div align="center"><font color="#666666"><strong><font size="2" face="Courier New, Courier, mono">Tópicos</font></strong></font></div></td>

<td width="13%"> <div align="center"><font color="#666666"><strong><font size="2" face="Courier New, Courier, mono">Respostas</font></strong></font></div></td>

<td width="9%"> <div align="center"><font color="#666666"><strong><font size="2" face="Courier New, Courier, mono">Autor</font></strong></font></div></td>

<td width="11%"> <div align="center"><font color="#666666"><strong><font size="2" face="Courier New, Courier, mono">Visitas</font></strong></font></div></td>

<td width="23%"> <div align="center"><font color="#666666"><strong><font size="2" face="Courier New, Courier, mono">Última

Mensagem </font></strong></font></div></td>

</tr>

 

<%

 

do while not rs.eof

 

Set user = c.execute("SELECT * FROM USERS WHERE id = '" & cod & "'")

 

%>

 

<tr bgcolor="#CCCCCC">

<td width="4%"><img src="file:///C|/Inetpub/wwwroot/ico/house.gif" width="16" height="16"></td>

<td width="4%"><img src="file:///C|/Inetpub/wwwroot/ico/icon_connect.gif" width="16" height="16"></td>

<td width="36%"><font color="#333333" size="2" face="Courier New, Courier, mono">Assunto</font></td>

<td><div align="center"><font size="2" face="Courier New, Courier, mono"><%'bolarcodigo%></font></div></td>

<td><div align="center"><font size="2" face="Courier New, Courier, mono"><%response.write(user("apelido"))%></font></div></td>

<td><div align="center"><font size="2" face="Courier New, Courier, mono"><%response.write(rs("visitas"))%></font></div></td>

<td><div align="center"><font size="2" face="Courier New, Courier, mono"></font></div></td>

</tr>

<%

 

loop

rs.close

Set c = nothing

%>

</table>

 

é apenas um esboço..

Não achei erro nenhum nesse código, estou a dias vendo ele e não consigo resolver o problema.

Meu IIS é versão 5.1 (incluso no Windows XP, com Service Pack 1).

Aparece o seguitne problema:

 

HTTP 500.100 - Servidor interno Erro - erro do ASP

Internet Information Services

 

--------------------------------------------------------------------------------

 

Informações técnicas (para a equipe de suporte)

 

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)

[Microsoft][Driver ODBC para Microsoft Access] Tipo de dados imcompatível na expressão de critério.

/verforum.asp, line 7

 

 

Os dados da tabela estão do tipo inteiro.

O download da tabela : http://www26.brinkster.com/danilofr/db/ban...ancodedados.mdb

Se alguem souber solucionar o problema me avisa por favor, não agüento mais ver esse mesmo código dando erro... :D

Agradeço a atenção

HiTech-SP

Compartilhar este post


Link para o post
Compartilhar em outros sites

Se a variável é numerica, você não usa aspas simples.Set rs = c.execute("SELECT * FROM FORUM WHERE f =" & cod)Abraços,Nyan

Compartilhar este post


Link para o post
Compartilhar em outros sites

Se a variável é numerica, você não usa aspas simples.Set rs = c.execute("SELECT * FROM FORUM WHERE f =" & cod)Abraços,Nyan

é isso mesmo que o Nyan postou...

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.