Ir para conteúdo

POWERED BY:

Arquivado

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

berkowitz

Sempre apanhando

Por , em ASP Clássico

Recommended Posts

berkowitz    2

berkowitz
Postado

Pessoal, olá!

Estou desenvolvendo um sistema de notícias em um banco SQL SERVER.

O problema é que quando vou na página de EDITAR, ele não está trazendo os dados pra mim (isso na página de ADM), mas no site mesmo está aparecendo normal!

Alguém sabe o que pode ser galera?? Num sei mais o que fazer! eheheheh..

Tipo... num manjo muito, mas to tentando!!!!

Abaixo estou mandando a minha página de EDITAR (na área de ADM).

 

ASP [/tr][tr]<!-- #include file="../includes/config.asp" -->

<!-- #include file="includes/connection.asp" -->

<!-- #include file="includes/log.asp" -->

<html>

<head>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

<link rel="stylesheet" type="text/css" href="<%= siteRoot%>includes/css/estilos.css">

<script language="JavaScript" src="<%= siteRoot%>includes/metodos/metodos.js"></script>

<script language="JavaScript">

<!--

function tamanho() {

parent.alterSize('noticias',document.all.size.offsetHeight);

}

//-->

</script>

</head>

 

<body onLoad="tamanho();">

<div id="size">

<table width="97%" border="0" align="center" cellpadding="0" cellspacing="0">

<tr>

<td width="55%" valign="top" id="conteudo">

<%

If Request.QueryString("action") = "edit" Then

If Len(Request.Form("editNoticia_ishome")) Then

isHome = 1

Else

isHome = 0

End If

'••• Abrindo o RecordSet

Set rsConsNot = adoDataConn.Execute("UPDATE noticias SET preview = '" & Replace(Request.Form("editNoticia_preview"),"'","") & "', noticia = '" & Replace(Request.Form("editNoticia_noticia"),"'","") & "', descricao = '" & Replace(Request.Form("editNoticia_desc"),"'","") & "', addhome = '" & Trim(ishome) & "', idioma = '" & Trim(Request.Form("editNoticia_lang")) & "', data = getDate() WHERE iditem = " & Trim(Request.QueryString("item")))

Response.Write "<br><br><strong>Item atualizado.</strong><br><br>"

 

Set rsConsNot = Nothing

%>

<script language="JavaScript">setTimeout("this.location='visualizar.asp'",2000);</script>

<% Else %>

<%

'••• Abrindo o RecordSet

Set rsConsNot = adoDataConn.Execute("SELECT * FROM noticias WHERE iditem = " & Trim(Request.QueryString("item")))

Set rsConsInfo = adoDataConn.Execute("SELECT * FROM informativo WHERE id_informativo = " & Trim(Request.QueryString("item")))

%>

<form id="editNoticia" name="editNoticia" method="post" action="editar.asp?action=edit&item=<%= rsConsNot("iditem") %>">

<p>

Idioma:

<select id="editNoticia_lang" name="editNoticia_lang">

<option value="-" selected>Selecione o idioma</option>

<option value="0"<% If rsConsNot("idioma") = "0" Then %> selected<% End If %>>Português</option>

<option value="1"<% If rsConsNot("idioma") = "1" Then %> selected<% End If %>>English</option>

<option value="2"<% If rsConsNot("idioma") = "2" Then %> selected<% End If %>>Español</option>

</select>

<br><br>

Chamada na Home:

<input name="editNoticia_preview" type="text" id="editNoticia_preview" size="48" value="<%= rsConsNot("preview") %>">

<br>

<br>

Descrição:

<input name="editNoticia_desc" type="text" id="editNoticia_desc" size="48" value="<%= rsConsNot("descricao") %>" style='margin-left: 57;'>

<br>

<br>

Notícia na Íntegra:<br>

<textarea name="editNoticia_noticia" rows="10" id="editNoticia_noticia" style='width: 251; margin-left: 118; margin-top: -13;'><%= rsConsNot("noticia") %></textarea>

<br>

<br>

<span style='margin-left: 115;'><input type="checkbox" name="editNoticia_ishome" style='border: 0px;'<% If rsConsNot("addhome") > 0 Then %> checked<% End If %>>

<label onClick="if(document.editNoticia.editNoticia_ishome.checked==true){document.editNoti

cia.editNoticia_ishome.checked=false;}else{document.editNoticia.editNoticia_isho

me.checked=true;};"

>Inserir link na Home do Site</label></span>

<br>

<br>

<span style='margin-left: 118;'><a href="java script:document.editNoticia.submit();" class="botao" style='background-image: url(<%= siteRoot%>images/bg_botaoAmarelo.jpg);'>Salvar</a></span></p>

</form>

</td>

</tr>

</table>

<% End If %>

</div>

</body>

</html>

<%

Set rsConsNot = Nothing

Set rsConsInfo = Nothing

%>

<!-- #include file="includes/closeObject.asp" -->

[/tr]

 

VALEW GALERAA!

 

T +

 

BERKOWITZ http://forum.imasters.com.br/public/style_emoticons/default/devil.gif

Compartilhar este post

Link para o post
Compartilhar em outros sites

rOcKLoCo    0

rOcKLoCo
Postado

executa e dá uma verificada no HTML gerado pela página... veja se num está dando conflito do conteudo com o HTML..falows

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