Insertion textarea dans base de données access

Version imprimable

Bonjour,

J'ai un formulaire avec une textarea. La valeur de la textarea doit être enregistré dans une base de données access.
Quand je clique sur le bouton "Enregistrer" de mon formulaire, des retour chariot se créés et dans ma table j'ai ça :

Citation:

</br> </br>

Mon code :
la textarea en question :

Code:

1
2
3
4
5
6
7
 
	<p class="ctrl_gauche">Commentaire : <FONT size="2">(255 caractères maximum)</FONT>	</br>
	<textarea name="general_comment" rows="3" cols="35">
	<%if Request.Form("general_comment")<>"" then
		Response.Write Request.Form("general_comment")
	end if%>
	</textarea></p>

traitement de la textarea

Code:

1
2
3
4
5
6
7
8
9
10
11
			if len(Request.Form("general_comment"))=>3 then					'insertion du commentaire
				comment_general=Trim("" & Request.Form("general_comment"))
				comment_general=replace(comment_general, vbcrlf,"</br>")
				comment_general=replace(comment_general,"'","''")
				insert_comment="INSERT INTO tb_commentaire (hor_horaire, commentaire, date_com, heure_com) "
				insert_comment= insert_comment & "VALUES('"& hor & "', '" & comment_general & "', '" & date_du_jour & "', '" & heure_reel & "');"
				connexion.execute(insert_comment)
				if err<>0 then
					Response.Write err.Description & "</br>"
				end if
			end if

Merci d'avance.

29/10/2008, 20h23
Immobilis

Salut,

C'est quoi la question?

A+
30/10/2008, 09h15
Konami15

Ah désolé, j'avais pas eu le temps de relire mon post.

Je voudrai que quand la textarea est vide, enfin que l'utilisateur n'a rien entré, ça n'enregistre pas la valeur

Citation:

</br> </br>

.
30/10/2008, 11h31
vva

il faut remplacer le retour chariot par du vide

Txt = Replace(request.form("matextarea"),Chr(13), "")
30/10/2008, 11h53
Konami15

J'y ai pensé mais je fais déjà ça :

Code:

comment_general=replace(comment_general, vbcrlf,"</br>")

si je fait ce que tu m'as dit à ce moment là dans ma db je n'aurai plus les br, et quand je voudra le réafficher il n'y aura plus de mise en forme.
30/10/2008, 11h56
roro06

Bonjour

Juste une remarque :

Citation:

</br>

Si tu mettais plutôt (non, pas le chien) :

Code:

<br/>
30/10/2008, 12h05
roro06

D'autre part :

Citation:

<textarea name="general_comment" rows="3" cols="35">
<%if Request.Form("general_comment")<>"" then
Response.Write Request.Form("general_comment")
end if%>
</textarea>

écrit comme tu l'as écrit, si tu testes ton code, et si ton Request.Form("general_comment") est vide, tu remarquera que ton textarea n'est pas vide, il contient des tabulations et deux retours chariots, que tu retrouve donc après la soumission de ton formulaire. Par contre, si tu mets tout sur une seule ligne :

Code:

<textarea name="general_comment" rows="3" cols="35"><%if Request.Form("general_comment")<>"" then Response.Write Request.Form("general_comment") end if%></textarea>

ton problème devrait s'arranger.
30/10/2008, 12h11
Konami15

Merci beaucoup, ça c'est arrangé effectivement.:king: