Ir para conteúdo

POWERED BY:

Arquivado

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

Holyspear

Inserir e Resgatar Formatação...

Por , em ASP Clássico

Recommended Posts

Holyspear    0

Holyspear
Postado

Bem gente, eu sou iniciante em programação de ASP e me encontrei com um probleminha aqui que eu acho que muitos jah devam ter enfrentado: Como recuperar um texto de um banco de Dados com sua formatação Original, ou seja, da maneira que foi inserido.

 

Eh mais ou menos assim: Eu produzi uma página dinâmica que recupera textos de um banco de dados para ser exibida. Esses textos possuem um administrador para serem inseridos corretamente. Todavia, Quando o texto é exibido na página ele fica sem as Quebras, ou seja, fica escrito direto... sem quebras de linha e sem parágrafos.

 

Eh estranho mostrar uma página com um texto sem quebras e sem parágrafos. Vou aqui disponibilizar o código com as duas páginas responsáveis pelo Processo de Atualizar o Conteúdo da no Banco de Dados... quem puder ajudar, estarei grato.

 

Página para Inserir os dados

 

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /><title>Untitled Document</title><style type="text/css"><!--#form1 textarea {	height: 200px;	width: 200px;}--></style></head><body><form id="administrador" name="administrador" method="get" action="proc.asp">  <table width="234" height="139" border="0" align="center" cellpadding="0" cellspacing="3">	<tr>	  <td width="228"><div align="left">Digite aqui o Título da Página <br />		  <input type="text" name="titulo" id="titulo" />		  <br />		  <br />		  Digite aqui o Assunto do Conteúdo <br />		  <textarea name="conteudo" id="conteudo"></textarea>		  <br />	  </div>		<div align="center">		  <input type="submit" name="envia" value="envia" id="envia" />	  </div></td>	</tr>  </table></form></body></html>

Página para Processar os dados

 

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /><title>Untitled Document</title></head><body><% 	dim titulo, conteudo	titulo= request.QueryString("titulo")	conteudo= request.QueryString("conteudo")		if titulo ="" or conteudo="" then		response.write "Por favor, coloque dados para serem inseridos na página"	response.write "<br>"	response.write "Você deixou de preencher algum dado."	response.write "<br>"	response.write "<a href='adm.asp'> Clique aqui para retornar </a>"		Else		instrucao= "UPDATE sobrenos SET titulo ='" & titulo & "', conteudo ='" & conteudo & "' WHERE sobrenos.Código = 1"	Set conn = Server.CreateObject("ADODB.Connection")conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & server.mappath("subpaginas.mdb") & ""conn.execute(instrucao)Response.Write "Dados alterados com sucesso!!!"response.write "<br>"response.Write "<a href='adm.asp'> Clique aqui para retornar </a>"  End If%></body></html>

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