afficher une liste en fonction de la lettre tapée

**Theolediable** · 15/03/2007, 14h58

Tu pourrais poster tout le code stp?
(pour voir ce qui cloche)

Invité · 15/03/2007, 15h01

Sans code pas d'aide possible, il faudrait envisager de commencer à intégrer ce fait

**mademoizel** · 15/03/2007, 15h08

Voici mon code concernant ma page qui permet à l'utilisateur de saisir la 1er lettre du nom qu'il souhaite chercher:

<form name="FormInvent" action="Recherche.asp" method="post"><br><br>
<center><b>Veuillez saisir votre nom et prénom s'il vous plaît</b></center><br><br>
<center><table border="0">
<tr>
<td width="74" height="30"><b> Nom</b></td>
<td width="224"><input type="text" name="TxtNom" size="30" /></td>
<input type="hidden" name="TxtNom" />
<td><input type="submit" name= "Rechercher" value="rechercher" /></td>

</tr>

</table></center>
<p><br>
<br>
<br>
</p>
<center><table>

<tr>

td>
</tr>

</table></center>
<p><br>
</p>
<p><br>
<br>

</p>
<center><b>Souhaitez-vous Modifier cette liste?<a href="AjoutInventaire.asp">cliquer ici</a></b></center><br><br><br>

</form></center>

Voici le code qui permet de traiter la recherche:

set cnx= Server.CreateObject( "ADODB.Connection" )
cnx= connexion_PLA

TxtNom =request.Form("TxtNom")

Sql = "SELECT NOM, Libelle FROM Personne" & _
" WHERE NOM LIKE '" & TxtNom & "%'"

set objRs = server.CreateObject ( "ADODB.Recordset" )
objRs.Open Sql, cnx

c'est au niveau du recordset que ça bloque

**Theolediable** · 15/03/2007, 15h24

Etrange, ta syntaxe me semble good.
Tu peux envoyer un print de l'erreru stp?

**mademoizel** · 15/03/2007, 15h27

Le problème, c'est qu'a chaque fois que j'ai une erreur dans mon code le message d'erreur est le même autrement dit on me dit qu'il manque une guillemet à la ligne 58.

**Theolediable** · 15/03/2007, 15h33

Le mieux ça serais d'utiliser des guillements simples. SQL merde de temps en temps quand tu manipules les chînes avec des guillements doubles: esssaye en remplaçant ta requete par:

Code :

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

1
2
 
Sql = 'SELECT NOM, Libelle FROM Personne WHERE NOM LIKE '''& TxtNom &'%'''

**mademoizel** · 15/03/2007, 15h38

C'est pas possible, car les simple cote en ASP puisque c'est pour mettre des lignes en commentaire

**Theolediable** · 15/03/2007, 15h45

Exact, je suis bête!!
Désolé, je suis à fond dans les procédures stockées en ce moment, c'est pour ça!

Essayes tout de même de le mettre en une fois, sans césure...

Au fait, le coup de la virgule de tout à l'heure, c'est une faute de frappe?

Au fait, ta ligne 58, c'est la quelle?

**mademoizel** · 15/03/2007, 15h56

Pour la virgule je ne sais pas, il l'affiche alors que je n'ai pas mis de virgule lorsque je récupère la lettre que l'utilisateur à tapé.

Concernant la ligne 58, il y aucune ligne de code.

En tout, je sais maintenant où est l'erreur mais je n'arrive pas à voir c'est quoi. Tout à l'heure je me suis trompé, l'erreur est a cause de mon tableau lorsque j'affiche le résultat de ma requête.

Voici le tableau dans lequel j'affiche le résultat de ma requête.

Quand je retire le tableau, la page s'affiche et quand je le met le message d'erreur apparaît.

**sab_etudianteBTS** · 15/03/2007, 15h59

Dsl je m'incruste, mais essaye de mettre ca a la place :

Code :

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

1
2
3
4
5
6
7
 
<TABLE>
<TR>
<td><%=objRs("NOM")%></td>
<td><%=objRs("Libelle")%></td>
</tr>
</table>

On ne sait jamais

**mademoizel** · 15/03/2007, 16h01

ça ne fonctionne pas non plus

**sab_etudianteBTS** · 15/03/2007, 16h10

Re,
En analysant ton code, j'ai remarqué qq chose de curieux :

Code :

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

1
2
<input type="text" name="TxtNom" size="30" />
<input type="hidden" name="TxtNom" />

Pq met tu un champ caché TxtNom alors que tu as dja un champ pour ca?! En plus ton champs caché ne sert a rien ici puisque tu ne lui met pas de value...

**Theolediable** · 15/03/2007, 16h15

Envoyé par sab_etudianteBTS

Re,
En analysant ton code, j'ai remarqué qq chose de curieux :

Code :

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

1
2
<input type="text" name="TxtNom" size="30" />
<input type="hidden" name="TxtNom" />

Pq met tu un champ caché TxtNom alors que tu as dja un champ pour ca?! En plus ton champs caché ne sert a rien ici puisque tu ne lui met pas de value...

Ah! en effet, j'étais passé à côté de ça!
Sinon, n'oublies pas de parcourir tout ton recordSet:

Code :

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

1
2
3
4
5
6
7
8
9
10
<TABLE>
<%objRs.MoveFirst
DO WHILE not objRs.eof%>
<tr>
    <td><%=objRs("NOM")%></td>
    <td><%=objRs("Libelle")%>
    </td>
  </tr>
<%ObjRs.MoveNext
loop%>

A part ça, je sèche, dslé.

**mademoizel** · 15/03/2007, 16h16

Ecoute merci de m'avoir fait cette remarque, je n'avais pas fait attention sur le coup, c'est pour cette raison qu'il y avait tout le temps la virgule aprés la lettre qui était saisie par la personne.

En tous cas, ceci n'a pas résolu le problème

J'essaye de faire plusieurs manipulation mais c'est toujours pareil

**mademoizel** · 15/03/2007, 16h21

Merci pour toutes vos solution, mais sa fonctionne pas.

Même moi je chercher de mon côté mais je ne trouve pas n'ont plus je n'arrive pas à comprendre pourquoi ça ne veut pas afficher le resultat de ma requête

**sab_etudianteBTS** · 15/03/2007, 16h24

Bon on va repartir de zéro, pcq je t'avoue ke je sèche aussi!!

Ton formulaire

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
 
<form name="FormInvent" action="Recherche.asp" method="post">
<center><b>Veuillez saisir votre nom et prénom svp</b></center>
<br><br>
<center>
<table border="0">
<tr>
   <td width="74" height="30"><b> Nom<b></td>
   <td width="224"><input type="text" name="TxtNom" size="30"></td>
   <td><input type="submit" value="rechercher"></td>
</tr>
</table>
</center>
 
<center><b>Souhaitez-vous Modifier cette liste?<a href="AjoutInventaire.asp">cliquer ici</a></b></center>

Page qui permet de traiter la recherche:

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
 
set cnx= Server.CreateObject("ADODB.Connection")
cnx= connexion_PLA
 
TxtNom =request.Form("TxtNom")
 
Sql = "SELECT NOM, Libelle FROM Personne WHERE NOM LIKE '" & TxtNom & "%'"
 
set objRs = server.CreateObject ( "ADODB.Recordset" )
objRs.Open Sql, cnx
 
<TABLE>
<%objRs.MoveFirst
DO WHILE not objRs.eof%>
<tr>
    <td><%=objRs("NOM")%></td>
    <td><%=objRs("Libelle")%></td>
</tr>
<%ObjRs.MoveNext
loop%>
</table>

Ca ché moi (avec mon application bien sur), ca fonctionne parfaitement, je ne vois pas pq ca ne fonctionnerais pas pour toi...