Discussion :

[cedric/copy]

Bonjour,

Mon problème est le suivant.
J'ouvre ma page "congres_specialite.asp", je selectionne ma spécialité (ex. Cancérologie).
Une liste de congrès s'affiche et chaque congrès possède un bouton "détail".
Si je clique sur le bouton "détail" du 2ème, 3ème, 4ème... congrès de ma liste, j'obtiens le détail du 1er congrès de ma liste.
Pouvez vous, m'aider à résoudre se problème.
Merci d'avance.

Cédric
PS : je vous joins ma page "congres_specialite.asp".

[TekP@f]

Salut,

J'ai regardé le code de te page, c'est un peu fouilli tout ça. Tu devrais au moins séparer la page de recherche et la page de formulaire, ça éviterait ce genre de problème notamment. Mais ce n'est qu'un conseil.

Sinon, pour ton problème, ça se situe vers là :

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
 
	Select Case Request.Querystring("Direction")
		Case "","Premier"
			strRequete="SELECT * FROM Tbl_Congres WHERE Specialite='" & Request.Querystring("Specialite") & "' ORDER BY id_num ASC"
		Case "Suivant"
			strRequete="SELECT * FROM Tbl_Congres WHERE Specialite='" & Request.Querystring("Specialite") & "' AND id_num >" & Request.Querystring("numCongres")
		Case "Précédent"
			strRequete="SELECT * FROM Tbl_Congres WHERE Specialite='" & Request.Querystring("Specialite") & "' AND id_num <" & Request.Querystring("numCongres") & " ORDER BY id_num DESC"
		Case "Dernier"				
			strRequete="SELECT * FROM Tbl_Congres WHERE Specialite='" & Request.Querystring("Specialite") & "' ORDER BY id_num DESC"
	End Select	
	Str_Specialite = Request.QueryString("Specialite")
	strRequete="SELECT * FROM Tbl_Congres WHERE Valid=1 AND Specialite_fr='" & Str_Specialite & "'"
	Set RsCongres=Server.CreateObject("ADODB.Recordset")
	RsCongres.Open strRequete,Connexion

Dans tous les cas, ta variable strRequete recherche tous les congres (tu écrases tout le traitement fait par le case). Du coup, tu te récupères toujours le même à l'affichage détaillé.
Solution 1 : tu appliques mon conseil est créant 2 pages distinctes.
Solution 2 : fais un case sur "modeAff" pour définir la requête à exécuter

[cedric/copy]

Bonjour TekP@f,

Je choisi la solution 2 pour l'instant.

Mais ou dois-je placer le modeAff dans mon code.

A+

Cédric

[TekP@f]

Début de solution :

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
 
	Select Case Request.Querystring("modeAff")
	case "LaFiche"
		strRequete="SELECT * FROM Tbl_Congres WHERE Valid=1 AND Specialite='" & Str_Specialite & "' AND id_num =" & Request.Querystring("numCongres") 
	case "LaListe"
		Str_Specialite = Request.QueryString("Specialite")
		Select Case Request.Querystring("Direction")
			Case "","Premier"
				strRequete="SELECT * FROM Tbl_Congres WHERE Valid=1 AND Specialite='" & Str_Specialite & "' ORDER BY id_num ASC"
			Case "Suivant"
				strRequete="SELECT * FROM Tbl_Congres WHERE Valid=1 AND Specialite='" & Str_Specialite & "' AND id_num >" & Request.Querystring("numCongres")
			Case "Précédent"
				strRequete="SELECT * FROM Tbl_Congres WHERE Valid=1 AND Specialite='" & Str_Specialite & "' AND id_num <" & Request.Querystring("numCongres") & " ORDER BY id_num DESC"
			Case "Dernier"				
				strRequete="SELECT * FROM Tbl_Congres WHERE Valid=1 AND Specialite='" & Str_Specialite & "' ORDER BY id_num DESC"
		End Select	
	End Select
 
	Set RsCongres=Server.CreateObject("ADODB.Recordset")
	RsCongres.Open strRequete,Connexion

A la place de ton pavé que j'avais mis précédemment.