Ir para conteúdo

POWERED BY:

Arquivado

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

Evilkenzera

É impossível esse erro!

Por , em ASP Clássico

Recommended Posts

Evilkenzera    0

Evilkenzera
Postado

Não estou conseguindo achar o erro.

Já verifiquei várias vezes, más não acho o erro.

 

Tipo de erro:

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 'de hollywood, BAIRRO = 'potiguara', CIDADE = Los Angeles, TELEF

/isopor/clienteAltera2.asp, line 50

 

 

 

clienteAltera2.asp

'------------------------------------------------------------------

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

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

<%

Dim Conexao, rs, sqlUpdate

 

Dim varID, varCliente, varFantasia, varEndereco, varBairro, varCidade, varTelefone

Dim varEnderecoEntrega, varBairroEntrega, varCidadeEntrega

 

 

'Recupera os dados do formulário

varID = Request.Form("cli")

varCliente = Request.Form("txtCliente")

varFantasia = Request.Form("txtFantasia")

varEndereco = Request.Form("txtEndereco")

varBairro = Request.Form("txtBairro")

varCidade = Request.Form("txtCidade")

varTelefone = Request.Form("txtTelefone")

varEnderecoEntrega = Request.Form("txtEnderecoEntrega")

varBairroEntrega = Request.Form("txtBairroEntrega")

varCidadeEntrega = Request.Form("txtCidadeEntrega")

 

 

varCliente = replace(varCliente, "'", "")

varFantasia = replace(varFantasia, "'", "")

varEndereco = replace(varEndereco, "'", "")

varBairro = replace(varBairro, "'", "")

varCidade = replace(varCidade, "'", "")

varTelefone = replace(varTelefone, "'", "")

varEnderecoEntrega = replace(varEnderecoEntrega, "'", "")

varBairroEntrega = replace(varBairroEntrega, "'", "")

varCidadeEntrega = replace(varCidadeEntrega, "'", "")

 

 

sqlUpdate = "UPDATE cliente SET "

sqlUpdate = sqlUpdate & "NOME = '" & varCliente & "', "

sqlUpdate = sqlUpdate & "FANTASIA = '" & varFantasia & "', "

sqlUpdate = sqlUpdate & "ENDERECO = " & varEndereco & ", "

sqlUpdate = sqlUpdate & "BAIRRO = '" & varBairro & "', "

sqlUpdate = sqlUpdate & "CIDADE = " & varCidade & ", "

sqlUpdate = sqlUpdate & "TELEFONE = '" & varTelefone & "', "

sqlUpdate = sqlUpdate & "ENDERECO_ENTREGA = '" & varEnderecoEntrega & "', "

sqlUpdate = sqlUpdate & "BAIRRO_ENTREGA = '" & varBairroEntrega & "', "

sqlUpdate = sqlUpdate & "CIDADE_ENTREGA = '" & varCidadeEntrega & "', "

sqlUpdate = sqlUpdate & "WHERE COD_CLIENTE = " & varID

 

'abre a conexao

Call abre_conexao

 

'executa a instrução SQL

line 50 Set rs=Conexao.Execute(sqlUpdate)

 

%>

 

<!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>

</head>

 

<body>

<%

 

Response.write "Alteração efetuada com sucesso!!! "

%>

</body>

<%

'fecha a conexao

Call fecha_conexao

Set rs = Nothing

%>

</html>

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

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

 

O formulário de alteração

 

clienteAltera1.asp

 

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

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

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

 

<%

Dim strSQL, Conexao, rs, varID

 

varID = Request.QueryString("cli")

strSQL = "SELECT * FROM cliente WHERE COD_cliente = " & varID

 

 

'abre a conexao

Call abre_conexao

 

'executa a instrução SQL

Set rs = Conexao.Execute(strSQL)

 

%>

<!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;

}

.form { border: 1px solid #990000;

background-color: #FFFFFF;

font-family: verdana;

font-size: 12px;

color: #000000;

}

.style8 {font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 9pt; font-weight: bold; color: #FFFFFF; }

.style15 {color: #FFFFFF; font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 9pt; }

.style16 {font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 9pt; font-weight: bold; color: #CCCCCC; }

-->

</style></head>

 

<body>

<table width="750" border="0" align="center" cellpadding="0" cellspacing="0">

<!--DWLayoutTable-->

<tr>

<td width="750" height="400" valign="top"><form id="form1" name="form1" method="post" action="clienteAltera2.asp">

<div align="center"><br>

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

</div>

<table width="700" border="0" align="center" cellspacing="0" bordercolor="#000000">

<tr>

<td valign="top"><table width="100%" border="0" bgcolor="#0066CC">

<tr>

<td width="34%"><div align="center" class="style8">Cliente</div></td>

<td width="33%"><div align="center" class="style8"> Fantasia </div></td>

<td width="33%"><div align="center" class="style8">Endereço</div></td>

</tr>

<tr>

<td height="34" bgcolor="#E9E9E9"><label>

<div align="center">

<input name="txtCliente" type="text" class="form" id="txtCliente" value="<%= rs("Nome") %>" size="30" />

</div>

</label></td>

<td bgcolor="#E9E9E9"><label>

<div align="center">

<input name="txtFantasia" type="text" class="form" id="txtFantasia" value="<%= rs("fantasia") %>" size="30" />

</div>

</label></td>

<td bgcolor="#E9E9E9"><label>

<div align="center">

<input name="txtEndereco" type="text" class="form" id="txtEndereco" value="<%= rs("endereco") %>" size="30" />

</div>

</label></td>

</tr>

</table>

<table width="100%" border="0" bgcolor="#0066CC">

<tr>

<td width="29%"><div align="center"><strong><span class="style15">Bairro</span></strong></div></td>

<td width="29%"><div align="center"><strong><span class="style15">Cidade</span></strong></div></td>

<td width="25%"><div align="center"><strong><span class="style15">Telefone</span></strong></div></td>

</tr>

<tr>

<td height="36" bgcolor="#E9E9E9"><div align="center">

<input name="txtBairro" type="text" class="form" id="txtBairro" value="<%= rs("bairro") %>" size="25" />

</div></td>

<td bgcolor="#E9E9E9"><div align="center">

<input name="txtCidade" type="text" class="form" id="txtCidade" value="<%= rs("cidade") %>" size="25" />

</div></td>

<td bgcolor="#E9E9E9"><div align="center">

<input name="txtTelefone" type="text" class="form" id="txtTelefone" value="<%= rs("telefone") %>" size="15" />

</div></td>

</tr>

</table>

<table width="100%" border="0">

<tr>

<td> </td>

</tr>

</table>

<table width="100%" border="0" bgcolor="#0066CC">

<tr>

<td><div align="center" class="style16">Endereço de Entrega </div></td>

</tr>

</table>

<table width="100%" border="0" bgcolor="#0066CC">

<tr>

<td width="29%"><div align="center"><strong><span class="style15">Endereço</span></strong></div></td>

<td width="29%"><div align="center"><strong><span class="style15">Bairro</span></strong></div></td>

<td width="25%"><div align="center"><strong><span class="style15">Cidade</span></strong></div></td>

</tr>

<tr>

<td height="36" bgcolor="#E9E9E9"><div align="center">

<input name="txtEnderecoEntrega" type="text" class="form" id="txtEnderecoEntrega" value="<%= rs("endereco_entrega") %>" size="30" />

</div></td>

<td bgcolor="#E9E9E9"><div align="center">

<input name="txtBairroEntrega" type="text" class="form" id="txtBairroEntrega" value="<%= rs("bairro_entrega") %>" size="25" />

</div></td>

<td bgcolor="#E9E9E9"><div align="center">

<input name="txtCidadeEntrega" type="text" class="form" id="txtCidadeEntrega" value="<%= rs("cidade_entrega") %>" size="25" />

</div></td>

</tr>

</table>

<table width="100%" border="0" align="center">

<tr>

<td> </td>

</tr>

<tr>

<td><div align="center">

<label>

<input type="submit" name="Submit" value="Salvar Alteração" />

</label>

<input name="cli" type="hidden" class="form" id="cli" value="<%= rs("cod_cliente") %>" size="30" />

</div></td>

</tr>

</table></td>

</tr>

</table>

</form>

</td>

</tr>

</table>

<%

'fecha a conexao

Call fecha_conexao

Set rs = Nothing

%>

</body>

</html>

Compartilhar este post

Link para o post
Compartilhar em outros sites

jothaz    1

jothaz
Postado

Camarada,

 

 

Pelo que puder verificar estava faltando ' (plic´s) nos campos ENDEREÇO e CIDADE. Todos os campos alfa devem vir delimitados por ' (plic´s).

 

 

Altere seu código assim:

<%sqlUpdate = "UPDATE cliente SET "sqlUpdate = sqlUpdate & "NOME = '" & varCliente & "', "sqlUpdate = sqlUpdate & "FANTASIA = '" & varFantasia & "', "sqlUpdate = sqlUpdate & "ENDERECO = '" & varEndereco & "', "sqlUpdate = sqlUpdate & "BAIRRO = '" & varBairro & "', "sqlUpdate = sqlUpdate & "CIDADE =	" & varCidade & "	, "sqlUpdate = sqlUpdate & "TELEFONE = '" & varTelefone & "', "sqlUpdate = sqlUpdate & "ENDERECO_ENTREGA = '" & varEnderecoEntrega & "', "sqlUpdate = sqlUpdate & "BAIRRO_ENTREGA = '" & varBairroEntrega & "', "sqlUpdate = sqlUpdate & "CIDADE_ENTREGA = '" & varCidadeEntrega & "', "sqlUpdate = sqlUpdate & "WHERE COD_CLIENTE = " & varID %>

QQ coisa estamos ai.

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

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

  Aceito