Probleme Session/requete SQL
Bonjour à tous,
Je programme (enfin j'essaye) en vbScript dans des ASP.
J'essaye desespérément de trouver la faille dans mon code mais je ne la trouve pas :
En gros j'ai une authentification par login/mot de passe, ces données sont stockées dans une base de donnée ACCESS (2003)
J'aimerais que quand une personne se logue, il apparaisse son Nom, le nom du centre où elle se trouve et une photo de son centre.
j'utilise pour ça les Session("blablabla")
J'arrive à faire afficher son Nom mais pas les 2 autres données :?
Alors voici le code :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
set rs = server.CreateObject ("ADODB.Recordset")
rs.Open "SELECT * FROM tblRenseignements where Login='"& login &"'",conn
set rsNomCentre = Server.CreateObject("ADODB.Recordset")
rsNomCentre.Open "SELECT tblRenseignements.Nom, tblCentres.Nom, tblRenseignements.* FROM tblCentres INNER JOIN tblRenseignements ON tblCentres.ID_Centres = tblRenseignements.ID_Centres WHERE (([tblRenseignements]![Login]='"& login &"') AND ([tblRenseignements]![ID_Centres]=[tblCentres]![ID_centres]))", conn
Set rsPhotoCentre = Server.CreateObject("ADODB.Recordset")
rsPhotoCentre.Open "SELECT tblRenseignements.img_Centre, tblCentres.Nom, tblRenseignements.* FROM tblCentres INNER JOIN tblRenseignements ON tblCentres.ID_Centres = tblRenseignements.ID_Centres WHERE (([tblRenseignements]![Login]='"& login &"') AND ([tblRenseignements]![ID_Centres]=[tblCentres]![ID_centres]))", conn
if rs("mdp") = mdp then
Session("name") = rs("Nom")
Session("Centre") = rsNomCentre("tblCentres.Nom") Session("Photo") = rsPhotoCentre("tblRenseignements.img_Centre")
rs.Close
conn.Close
set rs=nothing
set conn=nothing
Response.Redirect("action.asp") |
Et voici l'erreur généré :
ADODB.Recordset error '800a0cc1'
Impossible de trouver l'objet dans la collection correspondant au nom ou à la référence ordinale demandé.
/portail/admin/verify.asp, line 35
La ligne 35 est celle en rouge dans le code.
En fait la session fonctionne pour mon
Code:
Session("name") = rs("Nom")
Mais ça coince au niveau des 2 autres :
-
Code:
Session("Centre") = rsNomCentre("tblCentres.Nom")
-
Code:
Session("Photo") = rsPhotoCentre("tblRenseignements.img_Centre")
Merci de ce que vous pourrez faire pour moi.
