Mise en forme d'un champ textarea

Contenu du snippet

Tout est dans le titre...
Si vous saisissez un paragraphe avec saut de ligne dans un TEXTAREA, vous pourrez grâce à cette fonction afficher le contenu du champs tout en sauvegardant les sauts de ligne...

Source / Exemple :


<%
	function rdb_txt(champ)
		If champ <> "" Then
			chn = Server.HTMLEncode(champ)
	
			tab = Split(chn, vbCrLf)
			n = UBound(tab)
	        
			For i = 0 to n
	        	chaine = chaine + tab(i) 
	        	chaine = chaine + "<BR>"
			Next
	
			rdb_txt = chaine	
		End If
	end function
	
%>

<html>
<head>
	<title>Test Textarea</title>
</head>
<body>
	<%
		if len(request.form("TEXTAREA")) > 0 then 
			message = rdb_txt(request.form("TEXTAREA"))
			response.write message
		else	
	%>	
			<form action = "test.asp" method="post">
				<textarea rows="4" name="TEXTAREA" cols="55"></textarea>
				<input name="validation" type="submit" value="Validez">
			</form>	
		<% end if %>
		
</body>
</html>

Conclusion :


Si vous avez une fonction plus simple, n'hésitez pas à m'en faire part...

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.