Estou com um erro ao conectar e enviar dados para um banco...

[PRISCILA STOCHINI 0]

Microsoft JET Database Engine error '80040e14'

 

Syntax error in INSERT INTO statement.

 

/ASP/envia_suporte.asp, line 18

 

 

sql = "INSERT Into suptec(codigo, email, software, versao, proc, release, win, versaoauto, tipo, duvida, pendencia) values ('"&Vcodigo&"','"&Vemail&"','"&Vsoftware&"', '"&Vversao&"', '"&Vproc&"','"&Vrelease&"','"&Vwin&"', '"&Vversaoauto&"','"&Vtipo&"','"&Vduvida&"', '"&Vpendencia&"')"[color=#FF0000]LINE 18[/color] Set rs = bco.Execute(sql)Response.Write(sql)bco.CloseSet bco = Nothing

[jrcardozo 4]

o campo número não é chave primaria do tipo auto numeração? se for você não pode incluir um valor a um campo auto numerador se o campo código é do tipo número retire os apósttrofos(aspas simples)

[PRISCILA STOCHINI 0]

O campo codigo não é de Auto Numeração...Tenho um campo pendencias que é do tipo True/False...tem alguma relação com isso???para escolher a opção eu coloquei um radiobutton...tem alguma problema???Todos os meus campos estão como texto...

[XuU 0]

seu campo de true/false recebe os valore sim/não, 1/0 ou true/false???que bd você está usando?

[jrcardozo 4]

faça o seguinte, coloque essa linha como comentário

 

 

 

'Set rs = bco.Execute(sql)

 

 

 

agora veja o que vai escrever do seu sql...provavelmente algum valor

como assim pendencas true/false? na tabela está como boolean ou string?

 

se na tabela está como boolea seu sql deve ficar isso:

 

sql = "INSERT Into suptec "sql = sql & "(codigo, email, software, versao, proc, release, win, versaoauto, tipo, duvida, pendencia) "sql = sql & "values "sql = sql & "('"&Vcodigo&"','"&Vemail&"','"&Vsoftware&"', '"&Vversao&"', '"&Vproc&"','"&Vrelease&"','"&Vwin&"', '"&Vversaoauto&"','"&Vtipo&"','"&Vduvida&"', "&Vpendencia&")"

[PRISCILA STOCHINI 0]

Assim, no meu BD(Access) tenho um campo pendencia e nesse coloquei como tipo de dados Sim/Não....como faço isso no meu código..????

 

MEU CODIGOS...

 

FORMULARIOS...

<form name="sim" action="envia_suporte.asp" method="post">		  <table border="1" cellspacing="0" cellpadding="6" width="781" align="center" bordercolor="#999999">			<tr>			  <td colspan="4" bgcolor="#C5C5C5"><div align="center"><span style="font-family: Arial, Helvetica, sans-serif; font-weight: bold">Suporte por Internet Multiplus - SIM </span></div></td>			</tr>			<tr>			  <td colspan="4"><p class="style56" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px">Os campos marcados com <img src="obrigatorio.gif" width="18" height="18" align="absmiddle"/> são obrigatórios. </p></td>			</tr>			<tr>			  <td width="103" bgcolor="#C5C5C5" class="rotulo_formulario"><div align="right" class="style7" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">Código SIM </div></td>			  <td width="251"><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">				<input name="codigo" type="text" class="formulario" id="codigo" size="20" maxlength="8" />				<img src="obrigatorio.gif" width="18" height="18" align="absmiddle"/></span></td>			  <td width="74" bgcolor="#C5C5C5"><div align="right" class="style7" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">Email</div></td>			  <td width="295"><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">				<input name="email" type="text" class="formulario" id="email" size="40" />				<img src="obrigatorio.gif" width="18" height="18" align="absmiddle"/></span></td>			</tr>			<tr>			  <td bgcolor="#C5C5C5" class="rotulo_formulario"><div align="right" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">Software</div></td>			  <td colspan="3"><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">				<select size="1" name="Software" id="Software">				  <option selected="selected">Cype Concreto</option>				  <option>Cype Metálicas</option>				  <option>M2*Arq</option>				  <option>Arquimedes</option>				  <option>PRO-Elétrica</option>				  <option>PRO-Hidráulica</option>				  <option>PRO-Ar Condicionado</option>				  <option>EPLANT</option>				  <option>TecnoMETAL</option>				  <option>TecnoSTEEL</option>				  <option>TecnoSOLID</option>				  <option>ArmaFACIL</option>				  <option>ArmaBLOCOS</option>				  <option>Pré - MOLDAR</option>				  <option>Pro - ALVENARIA</option>				</select>				<img src="obrigatorio.gif" width="18" height="18" align="absmiddle"/></span></td>			</tr>			<tr>			  <td bgcolor="#C5C5C5" class="rotulo_formulario"><div align="right" class="style7" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">Versão</div></td>			  <td><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">				<input name="versao" type="text" class="formulario" id="versao" size="10" maxlength="10" />				<span class="style56" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold"><img src="obrigatorio.gif" width="18" height="18" align="absmiddle"/></span><br>			  </span><span style="font-family: Arial, Helvetica, sans-serif; font-size: 10px">(Ex.: CYPECAD <span style="font-weight: bold; color: #0000FF">2005.1</span>.a, PRO-Elétrica <span style="font-weight: bold; color: #0000FF">4.0</span> b)</span></td>			  <td bgcolor="#C5C5C5"><div align="right" class="style7" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">Processador</div></td>			  <td><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">				<input name="proc" type="text" class="formulario" id="proc" size="20" maxlength="50" />				<img src="obrigatorio.gif" width="18" height="18" align="absmiddle"/></span></td>			</tr>			<tr>			  <td bgcolor="#C5C5C5" class="rotulo_formulario"><div align="right" class="style7" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">Release (letra)</div></td>			  <td><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">				<input name="release" type="text" class="formulario" id="release" size="15" />				<span class="style56" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold"><img src="obrigatorio.gif" width="18" height="18" align="absmiddle"/></span><br>			  </span><span style="font-family: Arial, Helvetica, sans-serif; font-size: 10px">(Ex.: CYPECAD 2005.1.<span style="font-weight: bold; color: #0000FF">a</span>, PRO-Elétrica 4.0 <span style="font-weight: bold; color: #0000FF">b</span>)</span></td>			  <td bgcolor="#C5C5C5"><div align="right" class="style7" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold"> Windows </div></td>			  <td><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">				<select name="win" id="win">				  <option value="95" selected="selected">95</option>				  <option value="98">98</option>				  <option value="2000">2000</option>				  <option value="XP">XP</option>				  <option value="ME">ME</option>				</select>				<img src="obrigatorio.gif" width="18" height="18" align="absmiddle"/></span></td>			</tr>			<tr>			  <td bgcolor="#C5C5C5" class="rotulo_formulario"><div align="right" class="style7" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">Versão AutoCAD</div></td>			  <td colspan="3"><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">				<select name="versaoauto" size="1" class="formulario" id="versaoauto">				  <option value="R14" selected="selected">R14</option>				  <option value="R2000">R2000</option>				  <option value="R2002">R2002</option>				  <option value="R2004">R2004</option>				  <option value="R2005">R2005</option>				  <option value="R2006">R2006</option>				  <option value="R2007">R2007</option>				</select>				<img src="obrigatorio.gif" width="18" height="18" align="absmiddle"/></span></td>			</tr>			<tr>			  <td bgcolor="#C5C5C5" class="rotulo_formulario"><div align="right" class="style7" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">Tipo da dúvida </div></td>			  <td colspan="3"><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">				<select size="1" name="tipo" id="tipo">				  <option selected="selected">Instalação</option>				  <option>Utilização</option>				  <option>Senha</option>				  <option>Outros</option>				</select>				<img src="obrigatorio.gif" width="18" height="18" align="absmiddle"/></span></td>			</tr>						<tr>			  <td bgcolor="#C5C5C5" class="rotulo_formulario"><div align="right" class="style7" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">Dúvida</div></td>			  <td colspan="3"><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">				<label>				<textarea name="duvida" cols="70" rows="3" id="duvida"></textarea>				<img src="obrigatorio.gif" width="18" height="18" align="absmiddle"/></label>			  </span></td>			</tr>			<tr>			  <td height="38" align="right" bgcolor="#C5C5C5" class="rotulo_formulario style7"><p align="right" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">Anexar</p></td>			  <td colspan="3"><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">Seu problema já foi resolvido?</span>				<span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px">				<label>				<select name="ativa">				  <option value="s"<%If rs("ynNoticia") = True then Response.Write ("selected")%>>Sim</option>				  <option value="n" <%If rs("ynNoticia") = False then Response.Write ("selected")%>>Não</option>				</select>				</label>				</span>				<p align="justify" style="font-family: Arial, Helvetica, sans-serif; font-size: 12px"><span style="font-weight: bold"><span style="color: #FF0000">Atenção!</span> Instruções para anexar   arquivos:</span><BR>  Para enviar  uma obra (arquivos CYP ou M3D), figuras (arquivos JPG e GIF) ou 				desenhos (arquivos DXF, DWG) anexe estes arquivos ao seu e-mail, informando   no assunto o seu Código de Acesso 				ao SIM e envie para o endereço <A href="mailto:multitecnico@multiplus.com" class="link02" style="font-weight: bold">obras@multiplus.com</A>. Este endereço   é de uso exclusivo para receber arquivos 				anexados. <span style="color: #FF0000">Atenção! </span>Dúvidas Técnicas somente serão respondidas através do formulário   acima.<br>				</p>			  </td>			</tr>		  </table>		  <p align="center">			<input name="Enviar" type="submit" class="formulario" value="Enviar" />			<input name="Apagar" type="reset" class="formulario" id="Apagar" value="Apagar Dados" />					  </p>		</form>

ENVIA SUPORTE...

<!--#include file="conectando.asp"--><%Vcodigo = Request.Form("codigo")Vemail = Request.Form("email")Vsoftware = Request.Form("software")Vversao = Request.Form("versao")Vproc = Request.Form("proc")Vrelease = Request.Form("release")Vversaoauto = Request.Form("versaoauto")Vwin = Request.Form("win")Vtipo = Request.Form("tipo")Vduvida = Request.Form("duvida")Vpendencia = Request.Form("pendencia")sql = "INSERT Into suptec(codigo, email, software, versao, proc, release, win, versaoauto, tipo, duvida, pendencia) values ('"&Vcodigo&"','"&Vemail&"','"&Vsoftware&"', '"&Vversao&"', '"&Vproc&"','"&Vrelease&"','"&Vwin&"', '"&Vversaoauto&"','"&Vtipo&"','"&Vduvida&"', '"&Vpendencia&"')"Set rs = bco.Execute(sql)Response.Write(sql)bco.CloseSet bco = NothingURL = "http://www.cype.com.br"response.redirect(URL) %>

CONECTA BANCO...

 

<%Dim bco, sql, rsSet bco = Server.CreateObject("ADODB.connection")bco.Open ("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("suporte.mdb"))%>

Ah, e quem puder neste mesmo codigo eu gostaria de estar enviando um email tipo resposta automatica...???

[PRISCILA STOCHINI 0]

please, help me!!!

[PRISCILA STOCHINI 0]

Outro problema....

 

Microsoft VBScript runtime error '800a01a8'

Object required: ''

 

/ASP/relatorio_suporte.asp, line 139

 

<td><div align="center"><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold">Dúvida</span></div></td>		  </tr>	   [b]LINE 39 [/b]   <%rs.MoveFirst : do while not rs.eof%>		  <tr>			<td width="28"><div align="center"><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px;"><%=rs("data")%></span></div></td>			<td nowrap="nowrap"><div align="center"><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px;"><%=rs("codigo")%></span></div></td>			<td nowrap="nowrap"><div align="center"><span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px;"><%=rs("email")%></span></div></td>

[Mário Monteiro 179]

voce criou o recorset?

[PRISCILA STOCHINI 0]

Como assim???

 

<!--#include file="conectando.asp"--><%Vcodigo = Request.Form("codigo")Vemail = Request.Form("email")Vsoftware = Request.Form("software")Vversao = Request.Form("versao")Vproc = Request.Form("proc")Vrelease = Request.Form("release")VversaoAUTO = Request.Form("versaoAUTO")Vwin = Request.Form("win")Vtipo = Request.Form("tipo")Vduvida = Request.Form("duvida")Vpendencia = Request.Form("pendencia")sql = "INSERT into suptec(codigo, email, software, versao, proc, release, win, versaoAUTO, tipo, duvida, pendencia) values ('"&Vcodigo&"','"&Vemail&"','"&Vsoftware&"', '"&Vversao&"', '"&Vproc&"','"&Vrelease&"','"&Vwin&"', '"&VversaoAUTO&"','"&Vtipo&"','"&Vduvida&"', '"&Vpendencia&"')"Set rs = bco.Execute(sql)Response.Write(sql)bco.CloseSet bco = NothingURL = "http://www.cype.com.br"response.redirect(URL) %>

[jrcardozo 4]

não é por nada não Priscila, mas você manja de asp?Você colocou várias perguntas e sempre colocando o código como um todo...a impressão qu tenho é que você está iniciando em asp e tem uma batata quente ai pra resolver!

[PRISCILA STOCHINI 0]

Desculpa...se você não tem vontade de ensinar e ajudar, mas sou iniciante em asp...SIM tá e dai...Eu não tenho culpa se você é bom ..eu não sou ainda...tá...Se quiser me ajuda, se não deixe que outra pessoa me auxilia...

[jrcardozo 4]

calma priscila, foi apenas uma pergunta, não questionei se se é ou não um problema você ser iniciante e estar aprendendo, muito menos estou me achando mais que alguem aqui no fórum...creio que ninguem é melhor que ninguem, a cada dia aprendo, assim como você também aprende.

 

Perguntei apenas para que o pessoal que vai te ajudar procure te explicar da melhor maneira possivel, se você está iniciando, o camarada que te ajuda já sabe que tem que te explciar passo a passo ao contrario quando a pessoa já tem um determinado dominio na linguagem em que os posts podem ser mais diretos

 

Desculpa se de alguma forma te agredi, minha intensão era apenas saber a melhor maneira de explicar

 

 

 

bom, continuando a questão que o mario abordou é o seguinte....

 

no arquivo conectando.asp ou em quanquer parte no inicio da página em que você insere os dados tem uma linha igual a essa:

 

Set rs = Server.CreateObject("ADODB.Recordset")

essa linha irá criar(setar) o objeto recordset responsavel pelo armazenamento e manipulação dos dados que estão no banco.

[PRISCILA STOCHINI 0]

Tudo bem...mas me ajud por favor..é mto importante eu terminar meu sisteminhas urgente...é caso de vida ou desempreog...

[jrcardozo 4]

se essa linha não estiver na página que grava os dados, coloque-a acima desta Set rs = bco.Execute(sql)Response.Write(sql)

[PRISCILA STOCHINI 0]

Ai que está a questão...isso eu já tenho no meu codigo....O problema está sendo na pagina que exibe o relatorio...ela estava funcionando....mexi em algo que parou...ai está o problema...

[jrcardozo 4]

mas as páginas que tem aqui são só para inserir e formulários!!você não fez backup antes de alterar?não achei a página do relatório neste post

[dark0 0]

Olá priscila

 

Me diga uma coisa ..

 

você mecheu no nome de algum campo do banco de dados .. ou criou algum novo:?

 

Esse erro de sintaxe .. eu tive .. quando coloquei no nome de um campo do banco de dados.. termos reservados ..

 

 

Não sei te dizer .. se algum dos nomes dos campos do seu banco é um termo reservado .. pois nao sei todos os termos reservados ..

 

Mas, para teste .. eu trocaria o nome dos campos q vou colocar em vermelho:

 

sql = "INSERT into suptec(codigo, email, software, versao, proc, release, win, versaoAUTO, tipo, duvida, pendencia) values ('"&Vcodigo&"','"&Vemail&"','"&Vsoftware&"', '"&Vversao&"', '"&Vproc&"','"&Vrelease&"','"&Vwin&"', '"&VversaoAUTO&"','"&Vtipo&"','"&Vduvida&"', '"&Vpendencia&"')"

Bem.. a principio.. seria mudar dentro do banco de dados o nome (renomear o campo ..) e mudar aí no codigo o nome.. rodar o codigo e ver se funciona.

 

Se nao funcionar.. desfaz as alterações .. e voltamos ao ponto de partida .. tentando procurar em outro lugar o erro.

 

Pode ser?

 

Testa, e poste o que aconteceu .. e qual erro você está tendo nesse exato momento.

 

Abraço