Poser une question

Afficher une ligne d'une table par rapport à l'ID du visiteur

Bonjour le forum,

J'ai créé un formulaire HTML avec un champ ID et un champ mot de passe + 1 bouton envoyer.

Lorsque je rentre un ID et ou un mot de passe incorrect, il émet un message d'erreur au visiteur, jusque là ça tourne.

Quand un ID et un mot de passe sont correcte, il met "Adhérent identifié : 123456".

Le formulaire HTML travaille avec un script .asp

Ce que j'aurais bien voulu, c'est que lorsque la personne met son identifiant, cette identifiant soit enregistré dans une variable (c'est toujours un nombre à 6 chiffres) et qu'ensuite ma table "Grade" souvre et choisisse la ligne qui correspond à l'ID.

Exemple :

Ma table grade à ces données :

123456 Dupont A. Satisfaisant
136996 Dubois V. Distinction

Lorsque Dupont met comme ID 123456, j'aurai aimé que la table "Grade" s'ouvre mais que seulement la ligne correspondant à l'ID 123456 soit affichée.

Pensez-vous que c'est possible ?

Voici le code que j'utilise pour identifier le visiteur :

Code:
<%
dim cnn
dim rst

Set cnn = Server.CreateObject("ADODB.Connection")
Set rst = Server.CreateObject("ADODB.Recordset")
cnn.Open "DSN=PharmacieTest"

' Construction de la chaîne SQL
strSQL = "SELECT [Identifiant] FROM [tbl Identifiant]"

' Filtre sur les valeurs fournies par le visiteur
strSQL = strSQL & " WHERE Identifiant='" & Request.Form("txtIdentifiant") & "'"
strSQL = strSQL & " AND [MDP]='" & Request.Form("txtMotDePasse") & "'"
rst.Open strSQL, cnn

' A-t-on trouvé un adhérent ?
If rst.EOF Then
Response.Redirect ("identification.html")
Else
Response.Write "Adhérent identifié : " & rst("identifiant")
End If

rst.Close
Set rst = Nothing
Set cnn = Nothing
%>


Et voici un script .asp qui me permet de montrer le contenu d'une table



Code:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim cnn
dim rst

'Ouverture d'une connexion
set cnn = Server.CreateObject("ADODB.Connection")
cnn.open "DSN=PharmacieTest"
set rst = Server.CreateObject("ADODB.Recordset")
rst.open "Select * FROM [Grade];", cnn

While Not rst.EOF
%>
<table width="75%" border="1">
<tr>
<td><%response.Write rst("MoyPonderee2002(P5)")%></td>
</tr>

</table>
<%



rst.movenext
WEND

Rst.close
set rst = nothing
cnn.close
set cnn = Nothing
%>




Merci d'avance pour l'aide.
Bg's

Réponses

Re: Afficher une ligne d'une table par rapport à l'ID du visiteur  Oznog 16/8/2005