Erro com EOF....

[dark0 0]

você tem aí o codigo de envio de e-mail com o CDONTS?Posta ele, que a gente adapta com o email do usuario..que nada mais é do que um Request ..

[PRISCILA STOCHINI 0]

<!--#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) %>

Esse é o codigo que deveria estar enviando os dados para um BD(que por acaso estou com problema), e enviar o email de confirmação de cadastro.

 

Pessoal, estou com o seguinte problema...Preciso fazer um "sisteminha" no qual o usuario preenche um formulario de duvidas e ao dar o submit os dados sejam enviados a um banco e envia eu email tipo resposta automatica para o usuario....Depois disso tenho que fazer um tipode acesso interno da empresa, que possa acessar os dados que possuem um valor de pendencia igual a true. Depois ainda tenho que ter o possibilidade de alterar o status da duvida para pendente e não pendente.

 

Os meus problemas estão sendo:

- Ao enviar os dados para o banco estou com erro que não faço a minima ideia do que seja.

- Necessito enviar, por um campo hidden, um valor true.

- Necessito enviar o email de confirmação de cadastro.

- E fazer a parte de UPDATE no banco.

 

O que já tenho:

- A pagina de acesso para o relatorio de pendencia.

- O relátorio de pendencia = true.

- O banco.

[PRISCILA STOCHINI 0]

Alguém pode me Ajudar!!!! Preciso terminar esse sisteminha HOJE sem falta!!

[PRISCILA STOCHINI 0]

me ajudem....por favor...

[Mário Monteiro 179]

qual o erro que ta dando na hora de inserir?

[PRISCILA STOCHINI 0]

  Citar

Microsoft JET Database Engine error '80040e14' Syntax error in INSERT INTO statement. /ASP/envia_suporte.asp, line 19

ESTE É O ERRO...

[...]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][b]LINE 19[/b] [/color] Set rs = bco.Execute(sql)[...][/b]

[Mário Monteiro 179]

bora ver se é erro de palavras reservadas

 

nao vi nenhuma que seja comum mas vamos fazer o teste

 

troque

 

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&"')"

por

 

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&"')"

e teste

[PRISCILA STOCHINI 0]

Deu esse erro...

  Citar

Microsoft JET Database Engine error '80040e07' Data type mismatch in criteria expression. /ASP/envia_suporte.asp, line 20

sql = "INSERT into suptec ([data],[codigo], [email], [software], [versao], [proc], [release], [win], [versaoAUTO], [tipo], [duvida], [pendencia])  values ('"&Vdata&"','"&Vcodigo&"','"&Vemail&"','"&Vsoftware&"', '"&Vversao&"', '"&Vproc&"','"&Vrelease&"','"&Vwin&"', '"&Vversaoauto&"','"&Vtipo&"','"&Vduvida&"', '"&Vpendencia&"')"LINE 20 Set rs = bco.Execute(sql)

[Mário Monteiro 179]

entao ja eliminou o erro da possivel palavra reservadaestes campos todos sao do tipo texto em seu DB?porque seu codigo esta de um jeito como se fossem

[PRISCILA STOCHINI 0]

O campo data é do tipo Data/Hora;E o campo pendencia é do tipo Sim/Não.

[Mário Monteiro 179]

entao no ('"&Vdata&"',poe(#"&Vdata&"#,no campo pendencia tira as aspas simples

[PRISCILA STOCHINI 0]

Outra coisa eu queira pegar a data do servidor para colocar no banco tb...pensei em colocar dentro de um input tipo hidden....pode ser??? Ou existe alguma forma mais facil???

  Citar

Microsoft VBScript compilation error '800a0400' Expected statement /ASP/suporte.asp, line 125 &Date&^

<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. 				<label>			   LINE 125 <input name="data" type="hidden" value="<%&Date&%>" id="data">				</label>			  </p></td>			</tr>

[Mário Monteiro 179]

na hora de inserir voce grava o date sem problemas

[PRISCILA STOCHINI 0]

sql = "INSERT into suptec ([data], [codigo], [email], [software], [versao], [proc], [release], [win], [versaoAUTO], [tipo], [duvida], [pendencia])  values (#"&Vdata&"#,'"&Vcodigo&"','"&Vemail&"','"&Vsoftware&"', '"&Vversao&"', '"&Vproc&"','"&Vrelease&"','"&Vwin&"', '"&Vversaoauto&"','"&Vtipo&"','"&Vduvida&"', "&Vpendencia&")"Set rs = bco.Execute(sql)

 

O Erro Não muda!!!

[Mário Monteiro 179]

mas a mesnagem ali foi outraqual que ta dando agora?? e onde?

[PRISCILA STOCHINI 0]

  Citar

Microsoft JET Database Engine error '80040e14' Syntax error in INSERT INTO statement. /ASP/envia_suporte.asp, line 20

sql = "INSERT into suptec ([data], [codigo], [email], [software], [versao], [proc], [release], [win], [versaoAUTO], [tipo], [duvida], [pendencia])  values (#"&Vdata&"#,'"&Vcodigo&"','"&Vemail&"','"&Vsoftware&"', '"&Vversao&"', '"&Vproc&"','"&Vrelease&"','"&Vwin&"', '"&Vversaoauto&"','"&Vtipo&"','"&Vduvida&"', "&Vpendencia&")"Set rs = bco.Execute(sql)

[Mário Monteiro 179]

antes do execute de um response.write sql e ponha aqui o que aparecer na tela

[PRISCILA STOCHINI 0]

INSERT into suptec ([data], [codigo], , [software], [versao], [proc], [release], [win], [versaoAUTO], [tipo], [duvida], [pendencia]) values (##,'','','Cype Concreto', '', '','','95', 'R14','Instalação','', )

Microsoft JET Database Engine error '80040e14'

 

Syntax error in INSERT INTO statement.

 

/ASP/envia_suporte.asp, line 21

[Mário Monteiro 179]

hãtem alguns campos vaziosiclusive os campso data e o pendenciao erro é pelo campo pendencia pois nao tem nada depois da virgula ai parece que o numro de campos é diferente do numero de valorestem qeu fazer com que este valores sempre venham senao vai dar erro

[PRISCILA STOCHINI 0]

E como eu faço isso...???