Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
823 connectés 

  FORUM HardWare.fr
  Programmation
  ASP

  ASP et access champ memo probleme

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

ASP et access champ memo probleme

n°1855160
XFOE
Posté le 25-02-2009 à 16:35:57  profilanswer
 

Bonjour à tout et à toutes, j'ai un gros probleme j'essais de me faire un box de commentaire avec ma page ASP mes les  apostrophe et les point sont prise en charge par la base Access alors voilà mon problème.
 
Il y a t'il un moyen de dire a ma base de prendre tous ce qui est écrie dans textarea sens en prendre compte comme une commande???
 
ma page ASP:
 
<% Response.Buffer=True %>
 
<HTML>
<HEAD>
  <TITLE>Carnet d'adresses</TITLE>
</HEAD>
 
<center><h1>Appréciation du site</h1></center>
 
<%
 
Dim Rs, Con, lenom, leprenom, lecommentaire
 
'Création de l'objet de connexion
Set Con=Server.CreateObject("ADODB.Connection" )
'Chemin d'accès à la BD
dbPath=Server.MapPath("./carnet.mdb" )
'Connexion
ConStr="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & dbPath
Con.open Constr
 
set rs=con.execute("Select * FROM Carnet ORDER BY Prenom" )
If (Not rs.EOF) or (Not rs.BOF) Then
 rs.MoveFirst
End If
 
%>
<center>
<table border="2">
<tr>
<td width="40" align="center"><b>Nom</b></a></td>
<td width="40" align="center"><b>Prenom</b></a></td>
<td width="100" align="center"><b>Commentaires</b></a></td>
</tr>
</center>
<%
If Not rs.EOF Then
 While Not rs.EOF
  Response.Write("<tr>" )
  Response.Write("<td>" )
  Response.Write(rs("Nom" ))
  Response.Write("</td>" )
  Response.Write("<td>" )
  Response.Write(rs("Prenom" ))
  Response.Write("</td>" )
  Response.Write("<td>" )
  Response.Write(rs("Commentaires" ))
  Response.Write("</td>" )
  Response.Write("</tr>" )
  rs.MoveNext
 Wend
Else
 Response.Write "pas d'enregistrement"
End If
Response.Write("</table>" )
 
rs.Close
Set rs=Nothing
con.close
set con=nothing
 
%>
<br><br><br>
<TABLE BORDER="0" cellpadding="0" cellspacing="0">
<tr>
<TD Width="150">
<FORM method=post action="carnet2.asp">
<center><b>Nouveau Nom</b></center><br></td>
 
<tr>
 <td>Prenom :</td>
 <td><INPUT type=test name="Nom" ></td>
</tr>
<tr>
 <td>Nom :</td>
 <td><INPUT type=text name="Prenom"></td>
</tr>
<tr>
 <td>Exprimer votre opinion :</td>
 <td><textarea name="commentaires" rows=4 cols=24 size=55></textarea></td>
 
</tr>
</tr>
 
 
 
</table>
 
<input type="submit" name="action" value="Ajouter">  <input type="submit" name="action" value="Supprimer un numéro">
 
 
</FORM>
</html>
 
 
Ma page qui connecte a ma base et ma page ASP:
 
<% Response.Buffer = true %>
<HTML>
<Head>
<TITLE>Enregistrement d'un nom</title>
</HEAD>
<Body>
<%
'initialisation des variables
 
Dim sql_insert, Con, constr, lenom, leprenom, lecommentaire
 
if lcase(request.form("action" ))="ajouter" then
 leNom=Request.Form("Nom" )
 lePrenom=request.form("Prenom" )
 leCommentaire=request.form("Commentaires" )
 
 sql_insert = "insert into Carnet (Nom,Prenom,Commentaires) values ('" & leNom & "','" & lePrenom & "','" & leCommentaire & "')"
end if  
 
if lcase(request.form("action" )) = "supprimer un numéro" then
 lePrenom=request.form("Prenom" )
 if lePrenom <> "" then
  sql_insert = "delete * FROM carnet WHERE Prenom = '" & lePrenom & "' "
 end if
end if
 
Set Con= server.CreateObject("ADODB.Connection" )
dbPath=server.MapPath("./carnet.mdb" )
constr= "DRIVER={MICROSOFT ACCESS DRIVER (*.mdb)};DBQ=" & dbpath
Con.open constr
 
Con.Execute sql_insert
 
Con.Close
Set Con=Nothing
Response.Redirect"./Carnet.asp"
%>
</body>
</html>  
 
 
Ci il y a des erreure gener vous pas je prend pas ca perso !!
Merci d'avance
 

mood
Publicité
Posté le 25-02-2009 à 16:35:57  profilanswer
 

n°1855223
XFOE
Posté le 25-02-2009 à 19:25:33  profilanswer
 

Ci vous avez autre moyen de faire un box et de faire afficher des commentaire je suis ouvert aussie Merci :'(

n°1867971
francois c​right
Posté le 31-03-2009 à 19:16:30  profilanswer
 

Lorsque tu insert ou modifie des champs texte, fait toujours un Replace des apostrophes comme ceci :
 
nom = Replace(Request("nom" ),"'","''" )

n°2073086
adoNet
Posté le 01-05-2011 à 20:09:28  profilanswer
 

slt je ss debutante en asp.net et j'ai trouvé de difficulté d'utiliser dataGrid view : j'ai ajouter un colonne de type button link dans le dataGridview je veux lorsque je clik sur le button link enregistre les informations  c urgent j'ai un controle demain

n°2073089
adoNet
Posté le 01-05-2011 à 20:15:21  profilanswer
 

g developpe en c#

n°2073138
adoNet
Posté le 01-05-2011 à 23:38:05  profilanswer
 

aucune reponse!!!!!!


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  ASP

  ASP et access champ memo probleme

 

Sujets relatifs
[Access] Regrouper plusieurs résultats d'1 requête sur 1 seule ligne?Problème avec URL rewriting
problème #IND et #INF ,C++[Projet] Problème avec automatisation de bouton
[Pascal / SDL] Problème pour gérer les ThreadsAccess, bouton case a cocher
Problème application client/server, envoie et reception de bytesprobleme en c
[Java] Probleme de castproblème surcharge opérateur
Plus de sujets relatifs à : ASP et access champ memo probleme


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR