Ir para conteúdo

POWERED BY:

Arquivado

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

Evilkenzera

Erro com página que recebe dados de um form

Recommended Posts

Galera, estou tendo um erro. Fiz uma página que recebe os dados de um form, e evia para o banco MYSQL.

Não sei onde estou errando. Se alguém ae puder me ajudar? Agradeço.

 

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[MySQL][ODBC 3.51 Driver][mysqld-4.0.18-nt]You have an error in your SQL syntax. Check the manual that corresponds to your MySQL server version for the right syntax to use near 'pakas,4,01,imagens/categoria/bebida/agua/3441794_t1.jpg,30,0,0'

/supermercado/site/admin/adm_ProdutoInclui2.asp, line 104

 

 

 

 

 

<!--#include file="restrito.asp"-->

<!--#include file="../connection/bib_conexao.asp"-->

<%

Dim Conexao, rs, sqlInsert, rsSelect, sqlSelect

Dim varCategoria, varSubcategoria, varProduto, varVLR_Unitario, varQTD_Estoque, varURL_imagem, varPromo, varPage, varDescricao

 

varCategoria = Request.Form("txtcategoria")

varSubcategoria = Request.Form("txtsubcategoria")

varProduto = Request.Form("txtProduto")

varVLR_Unitario = Request.Form("txtVLR_Unitario")

varQTD_Estoque = Request.Form("txtQTD_Estoque")

varURL_imagem = Trim(request.form("txtUrl_imagem"))

varPromo = Request.Form("txtPromo")

varPage = Request.Form("txtPage")

varDescricao = Request.Form("txtDescricao")

 

varSubcategoria = replace(varCategoria, "'", "")

varSubcategoria = replace(varSubcategoria, "'", "")

varProduto = replace(varProduto, "'", "")

varVLR_Unitario = replace(varVLR_Unitario, "'", "")

varQTD_Estoque = replace(varQTD_Estoque, "'", "")

varURL_imagem = Replace(varURL_imagem, "'", "")

varPromo = replace(varPromo, "'", "")

varPage = replace(varPage, "'", "")

varDescricao = replace(varDescricao, "'", "")

 

 

sqlSelect = "SELECT Produto FROM Produto WHERE Produto = '" & varProduto & "'"

sqlInsert = "INSERT INTO Produto (Produto, Cod_Categoria, Cod_Subcategoria, Descricao, VLR_Unitario, URL_imagem, QTD_Estoque, Promo, Page)"

sqlInsert = sqlInsert & "values ('" & varProduto & "','" & varCategoria & "',"

sqlInsert = sqlInsert & varSubcategoria & "," & varDescricao & ","

sqlInsert = sqlInsert & varVLR_Unitario & "," & varURL_imagem & ","

sqlInsert = sqlInsert & varQTD_Estoque & "," & varPromo & ","

sqlInsert = sqlInsert & varPage & "')"

 

 

'abre a conexao

Call abre_conexao

 

'executa a instrução SQL

Set rsSelect=Conexao.Execute(sqlSelect)

%>

 

 

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">

<head>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />

<title>Untitled Document</title>

<style type="text/css">

<!--

body {

margin-left: 0px;

margin-top: 0px;

}

-->

</style>

<link href="menu.css" rel="stylesheet" type="text/css" />

<link href="../estilo.css" rel="stylesheet" type="text/css" />

<style type="text/css">

<!--

.style4 {

color: #669900;

font-weight: bold;

font-family: Verdana, Arial, Helvetica, sans-serif;

}

.style5 {color: #FF0000}

-->

</style>

</head>

 

<body>

<table width="751" border="0" cellpadding="0" cellspacing="0">

<!--DWLayoutTable-->

<tr>

<td width="142" height="19" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFCC">

<!--DWLayoutTable-->

<tr>

<td width="14" height="19"> </td>

<td width="128" valign="top" class="topmenu"><%= UCase(varNome) %> </td>

</tr>

 

 

 

</table></td>

<td width="4" rowspan="4" valign="top"><img src="../imagens/barra_vertical.gif" width="4" height="506" /></td>

<td width="604" rowspan="3" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">

<!--DWLayoutTable-->

<tr>

<td width="604" height="37"> </td>

</tr>

<tr>

<td height="334" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">

<!--DWLayoutTable-->

<tr>

<%

IF not rsSelect.EOF then

%>

<center>

<% Response.write "Esta Produto já está cadastrado!!! " %>

<center>

<%

Else

LINE 104 Set rs=Conexao.Execute(sqlInsert)

%>

<center>

<% Response.write "Produto Cadastrada com Sucesso!!! " %>

<center>

<td width="604" height="334" valign="top">

<p>

<%

End If

%>

</p>

<p align="center">

<input type="button" value="Retornar" onclick="document.location='adm_Produto.asp'" name="button" />

</p></td>

</tr>

</table></td>

</tr>

<tr>

<td height="79"> </td>

</tr>

 

 

</table></td>

<td width="1"></td>

</tr>

<tr>

<td height="11" bgcolor="#FFFFCC"></td>

<td></td>

</tr>

<tr>

<td rowspan="3" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFCC">

<!--DWLayoutTable-->

<tr>

<td width="14" height="14"></td>

<td colspan="2" valign="top"><div align="center" class="topmenu">

<div align="left">MENU PRINCIPAL </div>

</div></td>

</tr>

<tr>

<td height="7"></td>

<td width="5"></td>

<td width="124"></td>

</tr>

<tr>

<td height="15"></td>

<td colspan="2" valign="top" bgcolor="#FFCC00" class="menuapagado">Categoria</td>

</tr>

<tr>

<td height="52"></td>

<td> </td>

<td valign="top"><font face="Verdana" size="-3"><a href="adm_CategoriaInclui.asp" class="menuverde3"> - Incluir</a><br />

<a href="adm_CategoriaAltera1.asp" class="menuverde3"> - Alterar</a><br />

<a href="adm_CategoriaExclui1.asp" class="menuverde3"> - Excluir</a><br />

<a href="adm_EnviaFotoCategoria.asp" class="menuverde3"> - Enviar foto</a></font></td>

</tr>

<tr>

<td height="165"></td>

<td colspan="2" valign="top"><span class="menuverde"><a href="adm_Subcategoria.asp" class="menuverde">Subcategoria</a><br />

<a href="adm_Produto.asp" class="menuverde">Produto</a><br />

<a href="adm_ColocaPromocao.asp" class="menuverde">Colocar Promoção </a><br />

<a href="adm_RetiraPromocao.asp" class="menuverde">Retirar Promoção </a><br />

<a href="adm_Clientes.asp" class="menuverde">Clientes</a><br />

<a href="adm_Pedidos.asp" class="menuverde">Pedidos</a><br />

<a href="categoria.asp?categoria=catCestas" class="menuverde">Carnes</a><br />

<a href="categoria.asp?categoria=catPratoPronto" class="menuverde">Congelado</a><br />

<a href="categoria.asp?categoria=catDietLight" class="menuverde">Diet e Light</a><br />

<a href="categoria.asp?categoria=catFarmacia" class="menuverde">Farmácia</a><br />

<a href="categoria.asp?categoria=catHortifruti" class="menuverde">Feira</a></span></td>

</tr>

<tr>

<td height="15"></td>

<td></td>

<td></td>

</tr>

<tr>

<td height="14"></td>

<td colspan="2" valign="top"><div align="left"><span class="topmenu">LOGIN</span></div></td>

</tr>

<tr>

<td height="8"></td>

<td></td>

<td></td>

</tr>

<tr>

<td height="121"></td>

<td colspan="2" valign="top"><span class="menuverde"><a href="adm_SenhaAltera1.asp" class="menuverde">Alterar Senha </a><br />

<a href="adm_LoginExclui1.asp" class="menuverde">Excluir Login </a><br />

<a href="adm_LoginInclui1.asp" class="menuverde">Incluir Login </a><br />

<a href="logout.asp" class="menuverde">Sair</a></span></td>

</tr>

<tr>

<td height="135"></td>

<td> </td>

<td> </td>

</tr>

</table></td>

<td height="420"></td>

</tr>

 

<tr>

<td height="56"></td>

<td></td>

</tr>

<tr>

<td height="70"></td>

<td></td>

<td></td>

</tr>

<tr>

<td height="24"> </td>

<td></td>

<td></td>

<td></td>

</tr>

</table>

<%

'fecha a conexao

rsSelect.Close

Call fecha_conexao

Set rs = Nothing

Set rsSelect = Nothing

%>

</body>

</html>

Compartilhar este post


Link para o post
Compartilhar em outros sites

aparentemente o erro está em concatenar a variavel sqlInsert...tente assim

 

sqlInsert = "INSERT INTO Produto (Produto,Cod_Categoria,Cod_Subcategoria,Descricao,VLR_Unitario,URL_imagem,QTD_Estoque,Promo,Page)"sqlInsert = sqlInsert & " values ('"&varProduto&"','"&varCategoria&"',"&varSubcategoria&","&varDescricao&","&varVLR_Unitario&","&varURL_imagem&","&varQTD_Estoque&","& varPromo&","&varPage&"')"

Compartilhar este post


Link para o post
Compartilhar em outros sites

Valeu por responder.Más Praticamente tá dando o mesmo erro. Que era a mesma linha 104 agora 112O que é esse #40 ??Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)[MySQL][ODBC 3.51 Driver][mysqld-4.0.18-nt]You have an error in your SQL syntax. Check the manual that corresponds to your MySQL server version for the right syntax to use near '& #40;Produto,Cod_Categoria,Cod_Subcategoria,Descricao,VLR_Unit/supermercado/site/admin/adm_ProdutoInclui2.asp, line 112

Compartilhar este post


Link para o post
Compartilhar em outros sites

escreva na tela o valor da variavel antes de executar e post aqui

Compartilhar este post


Link para o post
Compartilhar em outros sites

Acho que é isso:A página do Formulário:--------------------------------------------------------------------------<!--#include file="restrito.asp"--><!--#include file="../connection/bib_conexao.asp"--><%Dim Conexao, rsCategoria, strSQL, rsSubcategoria, strSQL2'abre a conexaoCall abre_conexaostrSQL = "SELECT * FROM Categoria ORDER BY COD_Categoria"strSQL2 = "SELECT * FROM Subcategoria ORDER BY COD_Subcategoria"Set rsCategoria = Conexao.Execute(strSQL)Set rsSubcategoria = Conexao.Execute(strSQL2)%><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /><title>Untitled Document</title><style type="text/css"><!--body { margin-left: 0px; margin-top: 0px;}--></style><link href="menu.css" rel="stylesheet" type="text/css" /><link href="../estilo.css" rel="stylesheet" type="text/css" /><style type="text/css"><!--.style4 { font-size: 12px; font-family: Verdana, Arial, Helvetica, sans-serif; font-weight: bold;}.style5 { color: #FFFFFF; font-size: 14px; font-family: Verdana, Arial, Helvetica, sans-serif;}--></style></head><body><table width="751" border="0" cellpadding="0" cellspacing="0" bgcolor="#F4F4F4"> <!--DWLayoutTable--> <tr> <td width="142" height="19" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFCC"> <!--DWLayoutTable--> <tr> <td width="14" height="19"> </td> <td width="128" valign="top" class="topmenu"><%= UCase(varNome) %> </td> </tr> </table></td> <td width="4" rowspan="3" valign="top"><img src="../imagens/barra_vertical.gif" width="4" height="506" /></td> <td width="604" rowspan="4" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0"> <!--DWLayoutTable--> <tr> <td width="604" height="37"> </td> </tr> <tr> <td height="518" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0"> <!--DWLayoutTable--> <tr> <td width="604" height="501" valign="top"><form method="POST" action="adm_ProdutoInclui2.asp"> <table width="400" border="0" align="center" cellspacing="0"> <tr> <td bgcolor="#000000"><div align="center" class="style5">Incluir Produto</div></td> </tr> </table> <table width="400" border="0" align="center" cellspacing="0"> <tr> <td bgcolor="#99CC99"> </td> </tr> </table> <table width="400" border="0" align="center" cellspacing="0"> <tr> <td bgcolor="#99CC99"><div align="right"><span class="style4">Categoria:</span></div></td> <td bgcolor="#99CC99"><select name="txtcategoria" size="1" id="txtcategoria"> <% While not rsCategoria.EOF %> <option value="<%= rsCategoria("COD_Categoria")%>" selected="selected"> <%= rsCategoria("Categoria")%> </option> <% rsCategoria.MoveNext Wend %> </select></td> </tr> <tr> <td width="100" bgcolor="#99CC99"><div align="right" class="style4">Subcategoria:</div></td> <td width="296" bgcolor="#99CC99"><select name="txtSubcategoria" size="1" id="txtSubcategoria"> <% While not rsSubcategoria.EOF %> <option value="<%= rsSubcategoria("COD_Subcategoria")%>" selected="selected"> <%= rsSubcategoria("Subcategoria")%> </option> <% rsSubcategoria.MoveNext Wend %> </select></td> </tr> <tr> <td bgcolor="#99CC99"><div align="right"><span class="style4">Produto:</span></div></td> <td bgcolor="#99CC99"><input name="txtProduto" type="text" id="txtProduto" /></td> </tr> <tr> <td bgcolor="#99CC99"><div align="right"><span class="style4">Preço:</span></div></td> <td bgcolor="#99CC99"><input name="txtVLR_Unitario" type="text" id="txtVLR_Unitario" /></td> </tr> <tr> <td bgcolor="#99CC99"><div align="right"><span class="style4">Qtd Estoque:</span></div></td> <td bgcolor="#99CC99"><input name="txtQTD_Estoque" type="text" id="txtQTD_Estoque" /></td> </tr> <tr> <td bgcolor="#99CC99"><div align="right"><span class="style4">Url Imagem :</span></div></td> <td bgcolor="#99CC99"><input name="txtUrl_imagem" type="text" id="txtUrl_imagem" value="imagens/categoria/" size="30" maxlength="50" /></td> </tr> <tr> <td bgcolor="#99CC99"><div align="right"><span class="style4">Promoção:</span></div></td> <td bgcolor="#99CC99"><select name="txtPromo" id="txtPromo"> <option value="0" selected="selected">Não</option> <option value="1">Sim</option> </select> </td> </tr> <tr> <td bgcolor="#99CC99"><div align="right"><span class="style4">Pagina Inicial: </span></div></td> <td bgcolor="#99CC99"><select name="txtPage" id="txtPage"> <option value="0" selected="selected">Não</option> <option value="1">Sim</option> </select> </td> </tr> <tr> <td bgcolor="#99CC99"><div align="right"><span class="style4">Descrição:</span></div></td> <td bgcolor="#99CC99"><textarea name="txtDescricao" cols="23" rows="3" id="txtDescricao"></textarea></td> </tr> </table> <table width="400" border="0" align="center" cellspacing="0"> <tr> <td bgcolor="#99CC99"> </td> </tr> </table> <table width="400" border="0" align="center" cellspacing="0"> <tr> <td bgcolor="#99CC99"><table width="300" border="0" align="center" cellspacing="0"> <tr> <td width="195" bgcolor="#99CC99"><div align="center"> <input type="button" value="Retornar" onclick="java script:history.go(-1)" name="button" /> </div></td> <td width="195" bgcolor="#99CC99"><div align="center"> <input name="Submit" type="submit" id="Submit" value="Salvar" /> </div></td> </tr> </table></td> </tr> </table> <table width="400" border="0" align="center" cellspacing="0"> <tr> <td bgcolor="#000000"> </td> </tr> </table> </form></td> </tr> <tr> <td height="17"></td> </tr> </table></td> </tr> <tr> <td height="21"> </td> </tr> </table></td> <td width="1"></td> </tr> <tr> <td height="11" bgcolor="#FFFFCC"></td> <td></td> </tr> <tr> <td rowspan="2" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFCC"> <!--DWLayoutTable--> <tr> <td width="13" height="14"></td> <td width="129" valign="top"><div align="center" class="topmenu"> <div align="left">MENU PRINCIPAL </div> </div></td> </tr> <tr> <td height="12"></td> <td></td> </tr> <tr> <td height="15"></td> <td valign="top"><a href="adm_Categoria.asp" class="menuverde">Categoria</a></td> </tr> <tr> <td height="15"></td> <td valign="top" bgcolor="#FFCC00" class="menuapagado">Subcategoria</td> </tr> <tr> <td height="52"></td> <td valign="top"><font face="Verdana" size="-3"><a href="adm_SubcategoriaInclui.asp" class="menuverde3">  - Incluir</a><br /> <a href="adm_Subcategoria.asp" class="menuverde3">   - Alterar</a><br /> <a href="adm_SubcategoriaExclui1.asp" class="menuverde3">   - Excluir</a><br /> <a href="adm_EnviaFotoCategoria.asp" class="menuverde3">   - Enviar foto</a></font></td> </tr> <tr> <td height="150"></td> <td valign="top"><span class="menuverde"><a href="adm_Produto.asp" class="menuverde">Produto</a><br /> <a href="adm_ColocaPromocao.asp" class="menuverde">Colocar Promoção </a><br /> <a href="adm_RetiraPromocao.asp" class="menuverde">Retirar Promoção </a><br /> <a href="adm_Clientes.asp" class="menuverde">Clientes</a><br /> <a href="adm_Pedidos.asp" class="menuverde">Pedidos</a><br /> <a href="categoria.asp?categoria=catCestas" class="menuverde">Carnes</a><br /> <a href="categoria.asp?categoria=catPratoPronto" class="menuverde">Congelado</a><br /> <a href="categoria.asp?categoria=catDietLight" class="menuverde">Diet e Light</a><br /> <a href="categoria.asp?categoria=catFarmacia" class="menuverde">Farmácia</a><br /> <a href="categoria.asp?categoria=catHortifruti" class="menuverde">Feira</a></span></td> </tr> <tr> <td height="10"></td> <td></td> </tr> <tr> <td height="14"></td> <td valign="top"><div align="left"><span class="topmenu">LOGIN</span></div></td> </tr> <tr> <td height="8"></td> <td></td> </tr> <tr> <td height="121"></td> <td valign="top"><span class="menuverde"><a href="adm_SenhaAltera1.asp" class="menuverde">Alterar Senha </a><br /> <a href="adm_LoginExclui1.asp" class="menuverde">Excluir Login </a><br /> <a href="adm_LoginInclui1.asp" class="menuverde">Incluir Login </a><br /> <a href="logout.asp" class="menuverde">Sair</a></span></td> </tr> <tr> <td height="135"></td> <td> </td> </tr> </table></td> <td height="476"></td> </tr> <tr> <td height="70"></td> <td></td> </tr> <tr> <td height="24"> </td> <td></td> <td></td> <td></td> </tr></table><%rsCategoria.ClosersSubcategoria.CloseCall fecha_conexaoSet rsCategoria = NothingSet rsSubcategoria = Nothing%></body></html>

Compartilhar este post


Link para o post
Compartilhar em outros sites

caraca....não sei como, mas o post foi automaticamente modificado os caracterers...veja a mensagem do erro, tem uns caracteres loucos perdidos no sql

 

 

 

sqlInsert = "INSERT INTO Produto ( Produto,Cod_Categoria,Cod_Subcategoria,Descricao,VLR_Unitario,URL_imagem,QTD_Estoque,Promo,Page)"sqlInsert = sqlInsert & " values ('"&varProduto&"','"&varCategoria&"',"&varSubcategoria&","&varDescricao&","&varVLR_Unitario&","&varURL_imagem&","&varQTD_Estoque&","& varPromo&","&varPage&"')"

tenta esse sql acima.

 

o mario se refere a você dar o response.write na variavel sqlInsert, tipo assim...abaixo da variavel

 

response.write(sqlInsert)

 

response.end()

Compartilhar este post


Link para o post
Compartilhar em outros sites

isso mesmo tiozinhofica amis facil de tentar identificar o erro

Compartilhar este post


Link para o post
Compartilhar em outros sites

Obrigado a todos que me responderam.Eu já consegui descobrir o que era, tá faltando o ' Eu tava colocando só "Tem que ser '"Valeu!Maneira errada:sqlInsert = sqlInsert & "values ('" & varProduto & "','" & varCategoria & "',"sqlInsert = sqlInsert & varSubcategoria & "," & varDescricao & ","sqlInsert = sqlInsert & varVLR_Unitario & "," & varURL_imagem & ","sqlInsert = sqlInsert & varQTD_Estoque & "," & varPromo & ","sqlInsert = sqlInsert & varPage & "')"-----------------------------------------------------------------------------------Agora do jeito certo:sqlInsert = sqlInsert & "values ('" & varProduto & "','" & varCategoria & "','"sqlInsert = sqlInsert & varSubcategoria & "','" & varDescricao & "','"sqlInsert = sqlInsert & varVLR_Unitario & "','" & varURL_imagem & "','"sqlInsert = sqlInsert & varQTD_Estoque & "','" & varPromo & "','"sqlInsert = sqlInsert & varPage & "')"---------------------------------------------------------------------------------Encerrar Post

Compartilhar este post


Link para o post
Compartilhar em outros sites

parabens tiozinho http://forum.imasters.com.br/public/style_emoticons/default/clap.gif

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.