Erro no Insert Into

[maurohpg 0]

O que seria esse erro??

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

 

[Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement.

 

/mauro/inserir2.asp, line 28

 

ASP

[*]set cmdInserir = Server.CreateObject("ADODB.Command")

 

[*]cmdInserir.ActiveConnection = MM_cobasi_STRING

 

[*]cmdInserir.CommandText = "INSERT INTO Noticias (site_area_ID, titulo, materia, fonte, url, data_de, data_ate, data_cadastro, publicado) VALUES (" + Replace(cmdInserir__varSeg, "'", "''") + ", '" + Replace(cmdInserir__varTitulo, "'", "''") + "','" + Replace(cmdInserir__varMateria, "'", "''") + "', '" + Replace(cmdInserir__varFonte, "'", "''") + "', '" + Replace(cmdInserir__varURL, "'", "''") + "', '" + Replace(cmdInserir__varData1, "'", "''") + "', '" + Replace(cmdInserir__varData2, "'", "''") + "', '" + Replace(cmdInserir__varData3, "'", "''") + "', '" + Replace(cmdInserir__varPublicado, "'", "''") + "') "

 

[*]cmdInserir.CommandType = 1

 

[*]cmdInserir.CommandTimeout = 0

 

[*]cmdInserir.Prepared = true

 

[*]cmdInserir.Execute() linha 28

[Luizgrs 0]

Esse teste que você fez foi com apóstrofo?Esse replaces ñ vão evitar o erro. Muda o replace.

[Mário Monteiro 179]

dá um response.write em"INSERT INTO Noticias (site_area_ID, titulo, materia, fonte, url, data_de, data_ate, data_cadastro, publicado) VALUES (" + Replace(cmdInserir__varSeg, "'", "''") + ", '" + Replace(cmdInserir__varTitulo, "'", "''") + "','" + Replace(cmdInserir__varMateria, "'", "''") + "', '" + Replace(cmdInserir__varFonte, "'", "''") + "', '" + Replace(cmdInserir__varURL, "'", "''") + "', '" + Replace(cmdInserir__varData1, "'", "''") + "', '" + Replace(cmdInserir__varData2, "'", "''") + "', '" + Replace(cmdInserir__varData3, "'", "''") + "', '" + Replace(cmdInserir__varPublicado, "'", "''") + "') "e posta o que aparecer... pois tem erro de sintaxe nisto...

[maurohpg 0]

Dei um Response.Write("INSERT INTO Noticias (site_area_ID, titulo, materia, fonte, url, data_de, data_ate, data_cadastro, publicado) VALUES (" + Replace(cmdInserir__varSeg, "'", "''") + ", '" + Replace(cmdInserir__varTitulo, "'", "''") + "','" + Replace(cmdInserir__varMateria, "'", "''") + "', '" + Replace(cmdInserir__varFonte, "'", "''") + "', '" + Replace(cmdInserir__varURL, "'", "''") + "', '" + Replace(cmdInserir__varData1, "'", "''") + "', '" + Replace(cmdInserir__varData2, "'", "''") + "', '" + Replace(cmdInserir__varData3, "'", "''") + "', '" + Replace(cmdInserir__varPublicado, "'", "''") + "') ")e nada apareceu na tela.

[Wallace.NET 0]

Não é melhor você tratar os dados que vão ser inseridos antes de concatenar com a SQL? Desse modo o código fica muito ruim para se entender... você pode estar colocando aspas simples onde não precisa... ou as esquecendo onde é necessário.

[maurohpg 0]

Olá, valeu pela dica!Não manjo muito de ASP e essa foi a forma que encontrei de tratar os dados. Mais você tem razão, vou estudar outras formas de tratar os dados.Obrigado!

[Mário Monteiro 179]

nada apareceu??mas como??

[maurohpg 0]

Nada ele redireciona para a outra página que é q que mostra os dados inseridos no BD. exatamente como está acima o Response eu deixei no arquivo e nada pareceu..estranho neh????

[Mário Monteiro 179]

então depois de escrever poe um response.ende veja se aparece algo...

[maurohpg 0]

Bom apareceu isso aqui agora:INSERT INTO Noticias (site_area_ID, titulo, materia, fonte, url, data_de, data_ate, data_cadastro, publicado) VALUES (, 'Teste de Noticia','Teste de envio de noticia!', 'Diário do Grande ABC', 'www.dgabc.com.br', '005-5--27', '2005-05-29', '2005-5-27', 'True')

[Mário Monteiro 179]

site_area_ID não esta tendo valoralgumas datas estão mal formatadas...corrija isso que funfa...

[maurohpg 0]

Bom o Insert Into já arrumei que estava dando pau era por que n tinha valor msm, mais a data não sei o que acontece! Logo que:Dim data1data1 = mid(Request("data_de"),7,4) & "-" & mid(Request("data_de"),4,2) & "-" & mid(Request("data_de"),1,2) Dim data2data2 = mid(Request("data_ate"),7,4) & "-" & mid(Request("data_ate"),4,2) & "-" & mid(Request("data_ate"),1,2) São iguais certo??? só que somente o data1 está com a data bagunçada!!! agora pq isso se os dois estão iguais????

[explore 3]

tenta assim!Dim data1, data2, reservadata1 = mid(Request("data_de"),7,4) & "-" & mid(Request("data_de"),4,2) & "-" & mid(Request("data_de"),1,2)reserva = mid(Request("data_de"),7,4) & "-" & mid(Request("data_de"),4,2) & "-" & mid(Request("data_de"),1,2)data2 = reserva--------------------------------------------------------Na verdade ai eu só estou jogando o segundo valor em uma variavel e depois jogo o valor para data 2, tenta assim deve ser BUG!!!!!!

[maurohpg 0]

cara não deu você acredita??? Antes tava assim a data:INSERT INTO Noticias (titulo, materia, fonte, url, data_de, data_ate, data_cadastro, publicado) VALUES (, 'Teste de Notícia','sssss', 'Estadão', 'www.estadao.com.br', '005-5--27', '2005-05-29', '2005-5-27', 'True') Agora ficou assim:INSERT INTO Noticias (titulo, materia, fonte, url, data_de, data_ate, data_cadastro, publicado) VALUES (, 'Teste de Notícia','sssss', 'Estadão', 'www.estadao.com.br', '005-5--27', '005-5--27', '2005-5-27', 'True')

[Mário Monteiro 179]

faz o seguinte antes de formatar verifica o que ta vindo em cada request de dataRequest("data_de")manda escrever na tela que nem você fez com a SQL e posta aqui tb...

[Luizgrs 0]

O último campo é um campo sim/não (boolean)?Se for joga só o valor True (Sem as aspas).Num tem nada a ver com erro mas...

[Mário Monteiro 179]

Bom o Insert Into já arrumei que estava dando pau era por que n tinha valor msm, mais a data não sei o que acontece! Logo que:

 

Dim data1

data1 = mid(Request("data_de"),7,4) & "-" & mid(Request("data_de"),4,2) & "-" & mid(Request("data_de"),1,2)

Dim data2

data2 = mid(Request("data_ate"),7,4) & "-" & mid(Request("data_ate"),4,2) & "-" & mid(Request("data_ate"),1,2)

 

São iguais certo??? só que somente o data1 está com a data bagunçada!!! agora pq isso se os dois estão iguais????

isso é porque elas devem estar vindo de forma diferentes...

 

por isso pedi pra verificar seus valores antes de formatar...

[Marcelo Barcellos 0]

Cara..

Eu sei q tem gente que acha que usar o Insert Into é mais facil, mas, eu sempre gostei mais dos recordsets.....

 

Faz assim

 

ASP

[*]

 

[*]ORs.Open "nome_da_tabela",Conexao,1,3,2

 

[*]ORs.AddNEw

 

[*]ORs("nome_do_campo1") = valor_do_campo1

 

[*]ORs("nome_do_campo2") = valor_do_campo2

 

[*]ORs("nome_do_campo3") = valor_do_campo3

 

[*]ORs("nome_do_campo4") = valor_do_campo4

 

[*]ORs.Update

 

[*]ORs.Close

 

[*]

 

Se der erro num campo, vai dar erro exatamente na linha do dado q estiver errado.

 

Falow !!

[Mário Monteiro 179]

Se der erro num campo, vai dar erro exatamente na linha do dado q estiver errado.

mas não eh dificil de ver onde está o erro...

[Marcelo Barcellos 0]

Se der erro num campo, vai dar erro exatamente na linha do dado q estiver errado.

mas não eh dificil de ver onde está o erro...

<{POST_SNAPBACK}>

Então porque o cara não achou até agora ?