Tableau multi-dimentionnel associatif [Résolu]

[bdaboah]

Bonjour,
j'aurais voulu savoir s'il était possible de faire un tableau multidimensionnel et associatif.

Un truc du genre : !D

Code :

1
2
3
4
5
6
7
8
9
10
 
var spy = new Array();
while(!RS.Eof)
 {
	id = RS.Fields("id") ;
        spy[id] = RS.Fields("id");
	spy[id]["champ1"] = RS.Fields("champ1") ; // line 40
 
	RS.MoveNext(); 
 };

Erreur d'exécution Microsoft JScript error '800a01b6'
Cet objet ne gère pas cette propriété ou cette méthode
/ldsSpy/stat.asp, line 40

Merci.

Nicolas

[Matthieu2000]

Code :

spy[id]=new Array();

[bdaboah]

Effectivement cela fonctionne de cette manière

Code :

1
2
3
4
5
6
7
8
9
10
while(!RS.Eof)
	{
			id = RS.Fields("id") ;
			Response.Write(id) ;
			spy[id] = RS.Fields("id");
			spy[id] = new Array() ;
			spy[id]["champ1"] = RS.Fields("champ1") ; 
			Response.Write(spy[id]["champ1"]) ;			
			RS.MoveNext(); 
	};

Lorsque je sors les Response.Write de la boucle, j'ai ce message

BOF ou EOF est égal à True ou l'enregistrement actuel a été supprimé. L'opération demandée nécessite un enregistrement actuel.

Une idée ?

[E.Bzz]

Bonjour,

Envoyé par bdaboah

Lorsque je sors les Response.Write de la boucle, j'ai ce message

Normal, en sortant de la boucle tu n'es plus dans le recordset (vu que c'est la condition de fin de boucle )

Mais c'est de l'ASP et non du Javascript ...

Déplacé, donc

A+

[bdaboah]

Normal ?
J'ai stocké toute les infos dans mon tableau spy[id][champ...] non ?

[E.Bzz]

Envoyé par bdaboah

Normal ?
J'ai stocké toute les infos dans mon tableau spy[id][champ...] non ?

Faudrait voir ton code modifié : les spécialistes ASP t'éclaireront

A+

[bdaboah]

Code :

1
2
3
4
5
6
7
8
9
10
11
12
while(!RS.Eof)
	{
		id = RS.Fields("id") ;
		Response.Write(id + " - ") ;
		spy[id] = RS.Fields("id");
		spy[id] = new Array() ;
		spy[id]["champ1"] = RS.Fields("champ1") ; 
		Response.Write(spy[id]["champ1"]) ;					
		Response.Write("<br>") ;					
		RS.MoveNext(); 
	};	
	Response.Write(spy[1]["champ1"]) ; // line48

Les affichages dans la boucle fonctionnent correctement ; celui hors du While non.

1 - test
6 - a

Erreur de compilation Microsoft VBScript error '800a0401'

Fin d'instruction attendue

/iisHelp/common/500-100.asp, line 11

Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP Dim strMethod, lngPos, datNow, strQueryString, strURL
--------------------------------------------------------------------------^

ADODB.Field error '80020009'

BOF ou EOF est égal à True ou l'enregistrement actuel a été supprimé. L'opération demandée nécessite un enregistrement actuel.

/ldsSpy/stat.asp, line 48

[E.Bzz]

Visiblement, il faut d'abord corriger la 1° erreur :

Code :

Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP Dim strMethod, lngPos, datNow, strQueryString, strURL

Manque un retour chariot.

A+

[Immobilis]

Salut,

La veritable erreur se trouve ici

Code :

1
2
3
4
5
ADODB.Field error '80020009'
 
BOF ou EOF est égal à True ou l'enregistrement actuel a été supprimé. L'opération demandée nécessite un enregistrement actuel.
 
/ldsSpy/stat.asp, line 48

C'est quoi à la ligne 48?

Celle-ci est due à un fichier "500-100.asp" buggé dont il faut récupérer une copie sur Internet.

Fin d'instruction attendue

/iisHelp/common/500-100.asp, line 11

Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP Dim strMethod, lngPos, datNow, strQueryString, strURL
--------------------------------------------------------------------------^

A+

[bdaboah]

Merci, je vois ça dès demain
Bonne soirée

Edit : Ligne 48 :

Code :

Response.Write(spy[1]["champ1"]) ; // line48

[bdaboah]

J'ai remplacer le fameux fichier : toujours pareil :p

1 - test
6 - a

Erreur de compilation Microsoft VBScript error '800a03f6'

'End' attendu

/iisHelp/common/500-100.asp, line 368

ADODB.Field error '80020009'

BOF ou EOF est égal à True ou l'enregistrement actuel a été supprimé. L'opération demandée nécessite un enregistrement actuel.

/ldsSpy/stat.asp, line 48

[roro06]

Bonjour

spy[id]["champ1"] = RS.Fields("champ1")

Mets plutot :

Code :

spy[id]["champ1"] = RS.Fields.Item("champ1").value

devrait mieux le faire

[bdaboah]

Envoyé par roro06

Bonjour



Mets plutot :

Code :

spy[id]["champ1"] = RS.Fields.Item("champ1").value

devrait mieux le faire

Niquel, Merci

Merci a tous de vous etre pencher sur mon cas

Bonne journée

[Immobilis]

ou plus court

Code :

spy[id]["champ1"] = RS("champ1")

A+