Erroooooo

Outubro 6, 2005

Quando eu pego coloko um nome de usuario e a senha correspondente aquele usuario da o sguinte erro:

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.

/quiz/quiz2.asp, line 43

Tipo de navegador:

Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)

Página:

POST 57 bytes to /quiz/quiz2.asp

POST Data:

apelido=jpmasiero&senha=masiero&Submit22.x=0&Submit22.y=0

será que alguém pode me ajuda?

bareta · Outubro 6, 2005

posta o cod aqui pra ver...

você ta trocando campos do tipo numero por tipo texto ou vice versa

Outubro 6, 2005

<%

Dim dbBanco, vContador

Call abre_conexao

vSql = "SELECT * FROm Menu Order By Seq"

Set rsMenu = dbBanco.Execute (vSql)

vVar = "SIM"

vApelido = ucase (Request.Form ("apelido"))

vSenha = ucase (Request.Form ("senha"))

vSql = "SELECT * FROM Usuarios Where Apelido = '" & vApelido & "'"

Set rsusuarios = dbbanco.Execute (vSql)

IF rsUsuarios.EOF THEN

vVar = "não"

ELSE

IF rsUsuarios ("Senha") <> vSenha THEN

vVar = "não"

ELSE

Session ("CodUsuario") = rsUsuarios ("Codigo")

Session ("NomeUsu") = rsUsuarios ("Nome") & " " & rsUsuarios ("Sobrenome")

Session ("NomeUsuario") = rsUsuarios ("Nome") & " " & rsUsuarios ("Sobrenome")

IF rsUsuarios ("IP") = "" THEN

ip = request.ServerVariables("REMOTE_ADDR")

vSql = "UPDATE Usuarios Set IP = '" & ip & "' Where Codigo =" & rsUsuarios ("ip")

dbBanco.Execute (vSQl)

END IF

IF vVar = "SIM" THEN

vSql = "SELECT * FROM Jogadores Where CodUsuario =" & rsusuarios ("Codigo")

Set rsusuarios = dbbanco.Execute (vSql)

IF rsJogadores.EOF THEN

vSql = "SELECT * FROM Jogadores Order By Codigo Desc"

Set rsJogadores = dbBanco.Execute (vSql)

IF rsJogadores ("ultimaper") > 285 THEN

vUlt = 285

ELSE

vUlt = rsJogadores ("ultimaper") + 1

END IF

vData = "10/6/2004"

vSql = "INSERT INTO Jogadores (codusuario, ultimaper, data) Select " & rsUsuarios ("Codigo") & ", " & vUlt & ", '" & vData & "'"

dbBanco.Execute (vSQl)

vSql = "SELECT * FROM Jogadores Where codusuario =" & rsusuarios ("Codigo")

Set rsJogadores = dbBanco.Execute (vSql)

END IF

IF Session ("NomeUsuario") = "" THEN

vLogado = ""

ELSE

vLogado = "logado: " & Session ("NomeUsu") & ""

END IF

%>

<html>

<head>

<!--

body { scrollbar-face-color: #dddddd; scrollbar-shadow-color: #929292; scrollbar-highlight-color: #ffffff; scrollbar-3dlight-color: #F2F2F2; scrollbar-darkshadow-color: #ffffff; scrollbar-track-color: #efefef; scrollbar-arrow-color: #C13337; }

-->

</style>

a { color: #000000; text-decoration: none; }

a:hover { color: #AF0000; text-decoration: Italic; }

select { font-family: Arial; font-weight: bold; }

input { font-family: Arial; font-size: 9px}

textarea { font-family: Arial; font-weight: bold; }>

</style>

<!--

function MM_reloadPage(init) { //reloads the window if Nav4 resized

if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {

document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}

else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();

}

MM_reloadPage(true);

//-->

</script>

</head>

<tr>

</tr>

<tr>

<tr>

<tr>

<tr>

<td>

</td>

</tr>

</table></td>

</tr>

</table></td>

<tr>

<% IF vVar = "SIM" THEN %>

Usuário: <% response.write rsUsuarios ("Nome") & " " & rsUsuarios ("SobreNome") %>

Pontuação: <% response.write rsJogadores ("Pontos") %> ponto(s)

</form>

Regras:

Para cada pergunta correta: + 5 pontos

Para cada pergunta errada: - 1 ponto

Você tem 20 segundos para responder

cada pergunta. Caso o tempo se esgote, ela é considerada

com errada.

Só pode ser respondidas 5 perguntas

por dia.

<% ELSE %>

Identificação

não encontrada.

Volte e informe corretamente.

<% END IF %>

</div></td>

</tr>

</table></td>

<tr>

</form>

<tr>

</tr>

<tr>

<td><div align="left">Apelido:</div></td>

</tr>

<tr>

</div></td>

</tr>

<tr>

<td><div align="left">Senha:</div></td>

</tr>

<tr>

</div></td>

</tr>

<tr>

</div></td>

</tr>

</table>

</form>

</div></td>

</tr>

</table></td>

</tr>

</table>

</div>

<% response.write vLogado %>

<% IF vLogado <> "" THEN %>

<% end if %>

</div></td>

</tr>

<tr>

</tr>

</table>

</map>

</body>

</html>

este é u codigo todo

Outubro 6, 2005

Gent eu so burrão comessei a mexe cum asp essa semana c precisarem de alguma coisa fala aiw viu mas me ajuda por favor

Marcos-rj · Outubro 6, 2005

ok

Outubro 6, 2005

OPS esqueci genti esta é a linha 43

Set rsusuarios = dbbanco.Execute (vSql)

fercosmig · Outubro 6, 2005

Tipo de dados imcompatível na expressão de critério.

o problema está aqui, nas aspas simples e duplas que você está usando, verifique o tipo de dados que foram criados no seu banco de dados.

vSql = "UPDATE Usuarios Set IP = '" & ip & "' Where Codigo =" & rsUsuarios ("ip")

você pode tentar assim tb

vSql = "UPDATE Usuarios Set IP = '" & ip & "' Where Codigo ='" & rsUsuarios ("ip") & "'"

abraços

Outubro 7, 2005

Tipo de dados imcompatível na expressão de critério.
o problema está aqui, nas aspas simples e duplas que você está usando, verifique o tipo de dados que foram criados no seu banco de dados.
vSql = "UPDATE Usuarios Set IP = '" & ip & "' Where Codigo =" & rsUsuarios ("ip")
você pode tentar assim tb
vSql = "UPDATE Usuarios Set IP = '" & ip & "' Where Codigo ='" & rsUsuarios ("ip") & "'"
abraços

Mas o sql do problema esta aki...

vSql = "SELECT * FROM Jogadores Where CodUsuario =" & rsusuarios ("Codigo")

Set rsusuarios = dbbanco.Execute (vSql)

Verifique se o CodUsuario é mesmo do tipo numero, autoincrement ou algo do tipo... se não for você precisa fazer o seguinte

vSql = "SELECT * FROM Jogadores Where CodUsuario =" & "'" &rsusuarios ("Codigo") & "'"

Entrar

Erroooooo

Pergunta

Guest João Paulo Masiero

Link para o comentário

Compartilhar em outros sites

7 respostass a esta questão

Posts Recomendados

bareta

Link para o comentário

Compartilhar em outros sites

Guest Guest

Link para o comentário

Compartilhar em outros sites

Guest João Paulo Masiero

Link para o comentário

Compartilhar em outros sites

Marcos-rj

Link para o comentário

Compartilhar em outros sites

Guest João Paulo Masiero

Link para o comentário

Compartilhar em outros sites

fercosmig

Link para o comentário

Compartilhar em outros sites

Guest Cezar Suzuki

Link para o comentário

Compartilhar em outros sites

Participe da discussão

Estatísticas dos Fóruns

Navegação

Atividades