Ir para conteúdo

POWERED BY:

Arquivado

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

douglasmesquita

[Resolvido] Erro no cadastro ao banco de dados

Por , em ASP Clássico

Recommended Posts

douglasmesquita    0

douglasmesquita
Postado

Bom dia, estou testando o sistema de noticias asp que eu fiz. Me deparei com um erro. Qd altero uma foto, no campo foto_chamadas o cadastro não é feito. Ele insere o caminho da foto no campo foto. Pior é que fica os dois caminhos cadastrados no campo foto. O que pode tá havendo? Outro coisa, qd eu altero uma noticia,por exemplo quero que ela só vire chamada da capa, é acrescentado uma virgula no campo foto, se a noticia tem foto ou não.

 

altera.asp

 

<!--#include file="cookies.asp" -->
<% 
'Criando variáveis
Dim rsTipos, rsNoticia, selecionada

set rsTipos=server.createobject("adodb.recordset")
set rsNoticia=server.createobject("adodb.recordset")

'Esta SELECT irá selecionar todos os tipos de notícias
rsTipos.Open "SELECT * from noticias_tipo order by tipo", meubd

'Selecionaremos todos os campos do registro onde o código é igual ao do registro selecionado na página anterior
rsNoticia.Open "SELECT * from noticias WHERE codnoticia="& request.querystring("cod") &"", meubd
%>

<html>
<head>
<title>aQui Notícias</title>
<script language="JavaScript">
	 function InserirTag(tag)
	{
		var conteudo_selecionado = document.selection.createRange().text;
		var conteudo_novo = "";
				
		if(conteudo_selecionado != "")
		{
			conteudo_novo = (document.frm.conteudo.value.replace( (new RegExp(conteudo_selecionado, "g")), '<'+tag+'>'+conteudo_selecionado+'</'+tag+'>'));
			document.frm.conteudo.value = conteudo_novo;
		}
		else {
			document.frm.conteudo.value = '<'+tag+'></'+tag+'>';
		}	
	}
</script>
</head>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="778" border="0" cellspacing="3" cellpadding="0">
  <tr valign="middle">
	<td height="70" colspan="3" bgcolor="fcfcfc"><font size="6" face="Arial, Helvetica, sans-serif">Administrativo
		- aQui Notícias</font></td>
  </tr>
  <tr>
	<td colspan="3" bgcolor="f0f0f0"><font face="Arial, Helvetica, sans-serif"> </font></td>
  </tr>
  <tr>
	<td width="126" height="277" valign="top" bgcolor="#FF0000"><table width="135px" border="0" cellspacing="2" cellpadding="1">
	  <tr>
		<td bgcolor="#FFFFFF"><a href="incluir.asp">
		  <div align="center"><font size="2" face="Arial, Helvetica, sans-serif"><strong>Incluir
				Notícia</strong></font></div>
		</a></td>
	  </tr>
	</table></td>
	<td width="450" align="left" valign="top" bgcolor="#FFFFFF"><blockquote>
	  <p><font face="Arial, Helvetica, sans-serif"><strong><font size="4">
		Alterar Notícias</font></strong></font></p>
	  <form name="form1" method="post" action="alterar2.asp">
	  <table width="432" height="899" border="0" align="center" cellpadding="0" cellspacing="3">
		<tr>
		  <td width="68"><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Edição:</font></div>
		  </td>
		  <td width="355"><div align="left"><font face="Arial, Helvetica, sans-serif"><font size="2">
			<input name="edicao" type="text" id="edicao" value="<%=rsNoticia("edicao")%>" size="40">
		  </font></font></div>
		  </td>
		</tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Antetítulo:</font></div>
		  </td>
		  <td><div align="left"><font face="Arial, Helvetica, sans-serif"><font size="2">
			<input name="antetitulo" type="text" id="antetitulo" value="<%=rsNoticia("antetitulo")%>" size="40">
		  </font></font></div>
		  </td>
		</tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Subtítulo:</font></div>
		  </td>
		  <td><div align="left"><font face="Arial, Helvetica, sans-serif"><font size="2">
			<input name="subtitulo" type="text" id="subtitulo" value="<%=rsNoticia("subtitulo")%>" size="40">
		  </font></font></div>
		  </td>
		</tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Título:</font></div>
		  </td>
		  <td><div align="left"><font face="Arial, Helvetica, sans-serif"><font size="2">
			<input name="titulo" type="text" id="titulo" value="<%=rsNoticia("titulo")%>" size="40">
		  </font></font></div>
		  </td>
		</tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Título Manchete:</font></div>
		  </td>
		  <td><div align="left"><font face="Arial, Helvetica, sans-serif"><font size="2">
			<input name="titulo_manchete" type="text" id="titulo_manchete" value="<%=rsNoticia("titulo_manchete")%>" size="40">
		  </font></font></div>
		  </td>
		</tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Autor:</font></div>
		  </td>
		  <td><div align="left"><font face="Arial, Helvetica, sans-serif"><font size="2">
			<input name="autor" type="text" id="autor" value="<%=rsNoticia("autor")%>" size="40">
		  </font></font></div>
		  </td>
		</tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Crédito:</font></div>
		  </td>
		  <td><div align="left"><font face="Arial, Helvetica, sans-serif"><font size="2">
			<input name="credito" type="text" id="credito" value="<%=rsNoticia("credito")%>" size="40">
		  </font></font></div>
		  </td>
		</tr>
		<tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Foto:</font></div>
		  </td>
		  <td><div align="left"><font face="Arial, Helvetica, sans-serif"><font size="2">
			<input name="foto" type="text" id="foto" value="<%=rsNoticia("foto")%>" size="40">
		  </font></font></div>
		  </td>
		</tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Tipo de Foto:</font></div>
		  </td>
		  <td>
			<table width="100" border="0" cellspacing="0" cellpadding="1">
			  <tr>
				<% 
				dim horizontal, vertical
				horizontal=""
				vertical=""
				'Iremos fazer aqui a mesma coisa que fizemos com o listmenu
				'Mas neste caso é com um botão de seleção
				'Se o destaque da notícia for 1 a variavel sim terá o valor Checked
				'Senão, a variável não terá o valor checked
				if rsNoticia("tipofoto")= 1 then 
					horizontal="checked"
				else
					vertical="checked"
				end if
				%>
				<td><font size="2" face="Arial, Helvetica, sans-serif">
				<input name="tipofoto" type="radio" value="1" <%=horizontal%>></font></td>
				<td><font size="2" face="Arial, Helvetica, sans-serif">Horizontal</font></td>
				<td><font size="2" face="Arial, Helvetica, sans-serif">
				  <input name="tipofoto" type="radio" value="0" <%=vertical%>></font></td>
				<td><font size="2" face="Arial, Helvetica, sans-serif">Vertical</font></td>
				</tr>
			</table></td>
		</tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Legenda:</font></div>
		  </td>
		  <td><div align="left"><font face="Arial, Helvetica, sans-serif"><font size="2">
			<input name="legenda" type="text" id="legenda" value="<%=rsNoticia("legenda")%>" size="40">
		  </font></font></div>
		  </td>
		</tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Foto Chamada:</font></div>
		  </td>
		  <td><div align="left"><font face="Arial, Helvetica, sans-serif"><font size="2">
			<input name="foto" type="text" id="foto" value="<%=rsNoticia("chamadas_foto")%>" size="40">
		  </font></font></div>
		  </td>
		</tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Tipo:</font></div>
		  </td>
		  <td><font size="2" face="Arial, Helvetica, sans-serif">
			<select name="tipo" id="tipo">
			<% while NOT rsTipos.EOF %>
			<% 
			'Aqui será feito uma condição para que o sistema selecione no listmenu justamente
			'o tipo desta notícia
			selecionada=""
			'Se o codigo da notícia for igual ao tipo, declararemos a variável selecionada com o valor selected
			if rsTipos("codtipo")=rsNoticia("tipo") then
				selecionada="selected"
			end if
			'Chamaremos abaixo a variável para que selecione o item correto
			%>
			<option value="<%=rsTipos("codtipo")%>" <%=selecionada%>><%=rsTipos("tipo")%></option>
			<%
			rsTipos.movenext
			wend
			%>
			</select>
		  </font></td>
		</tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Chamada:</font></div>
		  </td>
		  <td><font face="Arial, Helvetica, sans-serif"><font size="2">
			<textarea name="chamada" cols="40" rows="7" id="chamada"><%=rsNoticia("chamada")%></textarea>
		  </font></font></td>
		</tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Conteúdo:</font></div>
		  </td>
		  <td><font face="Arial, Helvetica, sans-serif"><font size="2">
			<input type='button' onClick="InserirTag('b')" value='N'>
			<input type='button' onClick="InserirTag('i')" value='I'>
			<input type='button' onClick="InserirTag('u')" value='S'>
			<input type='button' onClick="InserirTag('h3')" value='Entretítulo'>
			<br>
			<textarea name="conteudo" cols="40" rows="20" id="conteudo"><%=rsNoticia("conteudo")%></textarea>
		  </font></font></td>
		</tr>
			<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Assinatura:</font></div>
		  </td>
		  <td><div align="left"><font face="Arial, Helvetica, sans-serif"><font size="2">
			<input name="assinatura" type="text" id="assinatura" value="<%=rsNoticia("assinatura")%>" size="40">
		  </font></font></div>
		  </td>
		</tr>
		<tr>
		  <td><div align="right"><font size="2" face="Arial, Helvetica, sans-serif">Destaque:</font></div></td>
		  <td><table width="355" border="0" cellspacing="0" cellpadding="1">
		  <tr>
		 	<td><font size="2" face="Arial, Helvetica, sans-serif">
			<% 
				dim nenhum, chamada, manchete, foto_chamadas
				nenhum=""
				chamada=""
				manchete=""
				foto_chamadas=""
				'Iremos fazer aqui a mesma coisa que fizemos com o listmenu
				'Mas neste caso é com um botão de seleção
				'Se o destaque da notícia for 1 a variavel sim terá o valor Checked
				'Senão, a variável não terá o valor checked
				if rsNoticia("destaquecapa")= 2 then 
					manchete="checked"
				else
					if rsnoticia("destaquecapa") = 1 then
					chamada="checked"
					else
						if rsnoticia("destaquecapa") = 3 then
						foto_chamadas="checked"
						else
						end if
					end if
				nenhum="checked"
				end if
			%>
			<input type="radio" name="destaquecapa" value="0" <%=nenhum%>></font></td>
			<td><font size="2" face="Arial, Helvetica, sans-serif">Nenhum</font></td>
			<td><font size="2" face="Arial, Helvetica, sans-serif">
			<input type="radio" name="destaquecapa" value="1" <%=chamada%>></font></td>
			 <td><font size="2" face="Arial, Helvetica, sans-serif">Chamada</font></td>
			 <td><font size="2" face="Arial, Helvetica, sans-serif">
			  <input name="destaquecapa" type="radio" value="2" <%=manchete%>></font></td>
			  <td><font size="2" face="Arial, Helvetica, sans-serif">Manchete</font></td>
			  <td><font size="2" face="Arial, Helvetica, sans-serif">
			  <input name="destaquecapa" type="radio" value="3" <%=foto_chamadas%>></font></td>
			  <td><font size="2" face="Arial, Helvetica, sans-serif">Chamada foto</font></td>
		   </tr>
		   </table></td>
		 </tr>
		<tr>
		  <td colspan="2"><div align="right">
			<input name="cod" type="hidden" id="cod" value="<%=request.querystring("cod")%>">
			<input type="submit" name="Submit" value="Alterar">
		  </div></td>
		  </tr>
	  </table>
	  </form>
	  <p> </p>
	</blockquote></td>
	<td width="150px" bgcolor="#FF0000"><font face="Arial, Helvetica, sans-serif"> </font></td>
  </tr>
  <tr>
	<td colspan="3" bgcolor="f0f0f0"><div align="right"><font color="#666666" size="2" face="Arial, Helvetica, sans-serif">aQui </font><font color="#666666" size="2" face="Arial, Helvetica, sans-serif">Notícias</font></div></td>
  </tr>
</table>
<p> </p>
</body>
</html>

altera2.asp

 

<% 
Option Explicit

'Criando variáveis
Dim localbd, meubd

'Indicando local do Banco de dados
localbd="driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("../bd/bd_aqui.mdb")

'Setando conexões
set meubd=server.createobject("adodb.connection")
meubd.Open localbd

dim edicao, antetitulo, subtitulo, titulo, titulo_manchete, autor, foto, legenda, chamadas_foto, chamada, tipo, conteudo, entretitulo, txtentretitulo, assinatura, destaquecapa, tipofoto, credito, cod

edicao=request.form("edicao")
antetitulo=request.form("antetitulo")
subtitulo=request.form("subtitulo")
titulo=request.form("titulo")
autor=request.form("autor")
foto=request.form("foto")
legenda=request.form("legenda")
chamadas_foto=request.form("chamadas_foto")
chamada=request.form("chamada")
tipo=request.form("tipo")
conteudo=request.form("conteudo")
assinatura=request.form("assinatura")
destaquecapa=request.form("destaquecapa")
tipofoto=request.form("tipofoto")
credito=request.form("credito")
cod=request.form("cod")
titulo_manchete=request.form("titulo_manchete")

meubd.EXECUTE "UPDATE noticias SET edicao='"& edicao &"', antetitulo='"& antetitulo &"', subtitulo='"& subtitulo &"', titulo='"& titulo &"', titulo_manchete='"& titulo_manchete &"', autor='"& autor &"', foto='"& foto &"', legenda='"& legenda &"', chamadas_foto='"& chamadas_foto &"', chamada='"& chamada &"', conteudo='"& conteudo &"', tipo="& tipo &", assinatura='"& assinatura &"', tipofoto='"& tipofoto & "', credito='"& credito &"', destaquecapa='"& destaquecapa &"' where codnoticia="& cod &""

response.write "<script>location = 'principal.asp';alert('Notícia alterada com sucesso!')</script>"
%>

Compartilhar este post

Link para o post
Compartilhar em outros sites

Jow Xavier    0

Jow Xavier
Postado

ñ entendi legal a sua dúvida ... O q está acontecendo é q você manda alterar a foto, e está inserindo um novo caminho junto com o caminho q já tinha no campo ???

 

Qd você vai inserir sem novidadades né, funciona perfeito, correto ?

Compartilhar este post

Link para o post
Compartilhar em outros sites

douglasmesquita    0

douglasmesquita
Postado

Exemplo. cadastrei todas as noticias de uma determinada edição. Agora preciso alterá-las, para que uma seja manchete, outras sejam chamadas da capa e outras chamadas com foto. Só que qd eu altero para uma dessas formas, o campo noticia com foto acrescenta uma virgula, sem que haja alteração alguma nele. E qd eu vou alterar o campo foto_chamadas (esse campo irá ter o caminho da foto que irá aparecer na capa) ele acrescenta esse caminho ao campo foto e não ao campo correto.

Compartilhar este post

Link para o post
Compartilhar em outros sites

Jow Xavier    0

Jow Xavier
Postado

Ok ... para você fazer a alteração com a imagem ... você irá precisar fazer um novo upload ... conforme foi feito para adicionar ...

Compartilhar este post

Link para o post
Compartilhar em outros sites

douglasmesquita    0

douglasmesquita
Postado

mas eu não uso upload... só coloco o caminho da imagem. Eu só quero saber pq dá dando esse erro. Eu não estou conseguindo entender. Fiz tudo da msm forma, verifiquei os nomes dos campos, mas continua dando o tal erro.

 

 

Já consegui resolver resolver o problema. Tinha duplicado um nome, por isso estava fazendo a alteração no msm campo.

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