case a cocher dans Formulaire ASP avec ACCESS

**db48752b** · 13/11/2008, 22h45

Bonjour

je voudrai faire un accés a une base access depuis un formulaire en ASP sur un reseau intranet avec la possibilitée de modifier les données depuis ASP
tout fonctionne a part pour les champs des "cases a cocher"
Ou c'est réinitialiser à Zero par ma page ASP
voic mon code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
 
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Document sans titre</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
 
<body>
  <table align="center" border="1">
  <tr>
   <td align="left" width="50%">N°</td>
   <td align="left" width="50%"><%=(Recordset1.Fields.Item("N°").Value)%></td>
  </tr>
  <tr>
   <td align="left" width="50%">Réference</td>
   <td align="left" width="50%"><%=(Recordset1.Fields.Item("Réference").Value)%></td>
  </tr>
  <tr>
   <td align="left" width="50%">Intitulé</td>
   <td align="left" width="50%"><%=(Recordset1.Fields.Item("Intitulé").Value)%></td>
  </tr>
  <tr>
   <td align="left" width="50%">choix</td>
   <td align="left" width="50%"><%=(Recordset1.Fields.Item("choix").Value)%>
     <form ACTION="<%=MM_editAction%>" METHOD="POST" name="form1">
       <input <%If (CStr((Recordset1.Fields.Item("choix").Value)) = CStr("x")) Then Response.Write("checked") : Response.Write("")%> name="choix" type="checkbox" id="choix">       
       <input type="hidden" name="MM_update" value="form1">
<input type="submit" name="Submit" value="Envoyer">
<input type="hidden" name="MM_recordId" value="<%= Recordset1.Fields.Item("N°").Value %>">
     </form></td>
  </tr>
  <tr>
   <td align="left" width="50%">choix_appareil</td>
   <td align="left" width="50%"><%=(Recordset1.Fields.Item("choix_appareil").Value)%></td>
  </tr>
  </table>
 
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>

merci d'avance pour votre aide

j'ai donc essayer de mettre FALSE TRUE YES NO -1 0 1

c'est pareil dans tous les cas la case reviens non cocher

**vva** · 14/11/2008, 08h09

ok je vais tenter une réponse bien que je sois assez surpris par cette syntaxe de l'asp que je ne connais pas du tout

1 / je ne vois pas d'où viennent les données. La requête se trouve probablement du code que tu n'as pas mis.

2 / as tu des valeurs par exemple pour référence ?

3 / peut être est ce du à cette syntaxe mais normalement le response.write ne nécessite pas de () -> response.write "checked"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
<input <%If (CStr((Recordset1.Fields.Item("choix").Value)) = CStr("x")) Then Response.Write("checked") : Response.Write("")%> name="choix" type="checkbox" id="choix">

**roro06** · 14/11/2008, 10h10

Bonjour

C'est une syntaxe "dreamweaverienne", qui marche bien, sauf dans ces cas là, justement, il faut mettre un peu les mains dedans.

Ton champs "choix" (plus facile à écrire qu'à prononcer, çà !) est-il de type texte ou booleen ("Oui/Non" sous ACCESS) ? Dans le premier cas, ça doit marcher, vérifie les données de ta base. Dans le second cas remplace par :

<% if
Recordset1.Fields.Item("choix").Value=true then response.write(" checked ") %>

**db48752b** · 14/11/2008, 12h58

merci ca marche avec la 2ème solution

je vous dis surement a très bientot, car je suis vraiement un novice la dedant

Merci encore pour l'aide de tous
ca fait 4 jours que je cherche quand meme ...

case a cocher dans Formulaire ASP avec ACCESS

ASP

Discussions similaires

Partager

Partager