Ir para conteúdo

POWERED BY:

Arquivado

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

Ry_des

insert into

Recommended Posts

Aí gente sou novo com ASP e estou fazendo um scrip para inserir informações em um bd acess. Porém deu erro. O código está abaixo, se alguém pude ajudar obrigado.

 

<% Dim rs, sql Dim codnoticia,data,titulo,noticiasabreconexaoif Request ("enviado")="1" then 	codnoticia=trim(Request("codnoticia"))	data="data"	titulo=trim(Request("titulo"))	noticias=trim(Request("noticias"))		if codnoticia="" then  sql="INSERT into noticias(data, titulo, noticias) VALUES ('" & data & "', '" & titulo & "', " & _ 	 noticias & " )"  	end if		oConexao.Execute sql	Response.Redirect("cadnoticia.asp")	end if	%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Cara qual o erro gerado...posta ae para a gente ver...

Compartilhar este post


Link para o post
Compartilhar em outros sites

bom diaveja o tipo do campo datapois se você colocou no seu bd, como campo datequando for executar o sql, não é no tipo: '"& variavel &"'tira a aspa simples...

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tenta assim:

Verifique a inserção agora, acrecentei "#".

 

<% Dim rs, sql Dim codnoticia,data,titulo,noticiasabreconexaoif Request ("enviado")="1" then codnoticia=trim(Request("codnoticia"))data="data"titulo=trim(Request("titulo"))noticias=trim(Request("noticias"))if codnoticia="" then sql="INSERT into noticias(data, titulo, noticias) VALUES ('#"& data & "#', '" & titulo & "', " & _  noticias & " )" end ifoConexao.Execute sqlResponse.Redirect("cadnoticia.asp") end if %>

Acho que dessa forma pode dar certo...

 

Ythalo Rossy

Compartilhar este post


Link para o post
Compartilhar em outros sites

Acredito que o erro foi causado pq você nao colocou aspas simples entre a variavel NOTICIAS.

Tenta assim, contando com oq o ythalorossy acrescentou:

<% Dim rs, sql Dim codnoticia,data,titulo,noticiasabreconexaoif Request ("enviado")="1" then codnoticia=trim(Request("codnoticia"))data="data"titulo=trim(Request("titulo"))noticias=trim(Request("noticias"))if codnoticia="" thensql="INSERT into noticias(data, titulo, noticias) VALUES ('#"& data & "#', '" & titulo & "', '" & _ noticias & "')"end ifoConexao.Execute sqlResponse.Redirect("cadnoticia.asp") end if %>

Qualquer coisa grita. ^_^

Compartilhar este post


Link para o post
Compartilhar em outros sites

Pow brother...assim fica difícil...posta aí o erro e a linha com erro... ;)

Compartilhar este post


Link para o post
Compartilhar em outros sites

Olha o erro aí Juca.

 

Tipo de erro:Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)[Microsoft][Driver ODBC para Microsoft Access] Tipo de dados imcompatível na expressão de critério./bmp/admin/cadnoticia.asp, line 25

Compartilhar este post


Link para o post
Compartilhar em outros sites

Pow cara, Este erro aí não é de linha de conexão naum. Isso acontece quando você tenta inserir um valor em um campoque seja numérico por exemplo em um campo texto... Provavelmente o problema está no seu campo data. Se ele tiver do tipo data/hora você tenta fazer assim:sql="INSERT into noticias(data, titulo, noticias) VALUES (#"& data & "#, '" & titulo & "', ' "noticias & " ')" Tenta ae e dá um post dizendo se está certo ok? Até + Juliano

Compartilhar este post


Link para o post
Compartilhar em outros sites

Juliano:

 

Agora deu esse erro.

 

Microsoft OLE DB Provider for ODBC Drivers error '80004005' [Microsoft][Driver ODBC para Microsoft Access] O campo 'noticias.titulo' não pode ser uma seqüência de caracteres de comprimento nulo. /bmp/cadnoticia.asp, line 26

Compartilhar este post


Link para o post
Compartilhar em outros sites

Esse erro é pq o campo 'noticias.titulo' não aceita valor NULO, e você esta tentando colocar um valor nulo nele.Deve se algum nome de variavel, objeto que vai no Insert que está errado, ou simplismente você esta tentando jogar NULO neste campo e não pode. ;)

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.