Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Recup valeur dans recordset

9 réponses
Avatar
xavier
Bonjour,

Je souhaite lancer une requete selection sans qu'elle=20
s'affiche =E0 l'ecran. Pour ca je tente de creer un=20
recordset avec les commandes suivantes.

Dim db As DAO.Database
Dim rst As DAO.Recordset
Set db =3D CurrentDb
Set rst =3D db.OpenRecordSet("TRANSFORM First(Nombre) AS=20
PremierDeNombre SELECT Pourcentage FROM [CompteGIR2]=20
GROUP BY Pourcentage PIVOT [Code Importance];")

Mais je ne sais pas comment recuperer les donnees de ma=20
requete. il doit normalement me renvoyer un=20
enregistrement avec 4 champs :
- Pourcentage,
- [NON STRATEGIQUE],
- [PRIORITAIRES],
- [STRATEGIQUES]

Access ne veut pas me prendre 'Me.Pourcent.Value =3D=20
rst.Pourcentage'. Comment faire pour recuperer la valeur=20
qui est dans un champs?

Merci d'avance

9 réponses

Avatar
Eric
Bonjour Xavier

Access ne veut pas me prendre 'Me.Pourcent.Value =
rst.Pourcentage'. Comment faire pour recuperer la valeur
qui est dans un champs?


il faut que tu mettes :
Me.Pourcent=rst!Pourcentage et non rst.Pourcentage

A+
Eric

"xavier" écrivait news:33e201c42941
$43b9a730$:

Bonjour,

Je souhaite lancer une requete selection sans qu'elle
s'affiche à l'ecran. Pour ca je tente de creer un
recordset avec les commandes suivantes.

Dim db As DAO.Database
Dim rst As DAO.Recordset
Set db = CurrentDb
Set rst = db.OpenRecordSet("TRANSFORM First(Nombre) AS
PremierDeNombre SELECT Pourcentage FROM [CompteGIR2]
GROUP BY Pourcentage PIVOT [Code Importance];")

Mais je ne sais pas comment recuperer les donnees de ma
requete. il doit normalement me renvoyer un
enregistrement avec 4 champs :
- Pourcentage,
- [NON STRATEGIQUE],
- [PRIORITAIRES],
- [STRATEGIQUES]

Access ne veut pas me prendre 'Me.Pourcent.Value =
rst.Pourcentage'. Comment faire pour recuperer la valeur
qui est dans un champs?

Merci d'avance


Avatar
xavier
J'ai essayé
Me.Pourcent = rst!Pourcentage
Me.Pourcent.Value = rst!Pourcentage

mais à chaqu efois, Access me repond comme message
d'erreur :
Impossible d'attribuer une valeur à cet objet

On ne pourrait pas recuperer de valeur avec un recordset?
J'y crois pas trop.

Merci d'avance pour toute aide

-----Message d'origine-----
Bonjour Xavier

Access ne veut pas me prendre 'Me.Pourcent.Value =
rst.Pourcentage'. Comment faire pour recuperer la
valeur


qui est dans un champs?


il faut que tu mettes :
Me.Pourcent=rst!Pourcentage et non rst.Pourcentage

A+
Eric

"xavier" écrivait
news:33e201c42941

$43b9a730$:

Bonjour,

Je souhaite lancer une requete selection sans qu'elle
s'affiche à l'ecran. Pour ca je tente de creer un
recordset avec les commandes suivantes.

Dim db As DAO.Database
Dim rst As DAO.Recordset
Set db = CurrentDb
Set rst = db.OpenRecordSet("TRANSFORM First(Nombre) AS
PremierDeNombre SELECT Pourcentage FROM [CompteGIR2]
GROUP BY Pourcentage PIVOT [Code Importance];")

Mais je ne sais pas comment recuperer les donnees de
ma


requete. il doit normalement me renvoyer un
enregistrement avec 4 champs :
- Pourcentage,
- [NON STRATEGIQUE],
- [PRIORITAIRES],
- [STRATEGIQUES]

Access ne veut pas me prendre 'Me.Pourcent.Value =
rst.Pourcentage'. Comment faire pour recuperer la
valeur


qui est dans un champs?

Merci d'avance


.




Avatar
Asterix
bonjour

il faudrait plutot essayer
.... = rst.fields("Pourcentage").Value
a mon avis

Astérix
Avatar
Pierre CFI [mvp]
tu es sur qu'il y a qq chose dedans
mets çà
if rst.eof then exit sub

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Asterix" a écrit dans le message de news:
bonjour

il faudrait plutot essayer
.... = rst.fields("Pourcentage").Value
a mon avis

Astérix




Avatar
Eric
re,

Si, tu récupères la valeur mais à mon avis le champ Pourcent est un champ
provenant d'une table, non ?

Car le message : "Impossible d'attribuer une valeur à cet objet" indique
que ce champ à sa propriété Source déja définie.

Es-tu sur qu'il s'agisse d'un champ indépendant ?
Eric



"xavier" écrivait news:35eb01c42945
$de78afb0$:

J'ai essayé
Me.Pourcent = rst!Pourcentage
Me.Pourcent.Value = rst!Pourcentage

mais à chaqu efois, Access me repond comme message
d'erreur :
Impossible d'attribuer une valeur à cet objet

On ne pourrait pas recuperer de valeur avec un recordset?
J'y crois pas trop.

Merci d'avance pour toute aide



Avatar
Eric
Xavier,

Essaies ce bout de code dans un module stantard de ta bd et tu verras que
tu récupères la valeur.

Sub Test01
Dim db As DAO.Database
Dim rst As DAO.Recordset
Set db = CurrentDb
Set rst = db.OpenRecordSet("TRANSFORM First(Nombre) AS
PremierDeNombre SELECT Pourcentage FROM [CompteGIR2]
GROUP BY Pourcentage PIVOT [Code Importance];")
while not rs.eof
debug.Print rs!Pourcentage
rs.MoveNext
wend
rst.Close: Set rst=Nothing
db.Close: Set db= Nothing
End Sub

Ca marche ?

Eric
Avatar
xavier
Ok, merci pour l'info.
Je pensais qu'on pouvait quand meme forcer le champ à
prendre une valeur.
Sinon pour le code que tu as envoyé, qu'est-ce qu'il fait
de particulier?

-----Message d'origine-----
re,

Si, tu récupères la valeur mais à mon avis le champ
Pourcent est un champ

provenant d'une table, non ?

Car le message : "Impossible d'attribuer une valeur à
cet objet" indique

que ce champ à sa propriété Source déja définie.

Es-tu sur qu'il s'agisse d'un champ indépendant ?
Eric



"xavier" écrivait
news:35eb01c42945

$de78afb0$:

J'ai essayé
Me.Pourcent = rst!Pourcentage
Me.Pourcent.Value = rst!Pourcentage

mais à chaqu efois, Access me repond comme message
d'erreur :
Impossible d'attribuer une valeur à cet objet

On ne pourrait pas recuperer de valeur avec un
recordset?


J'y crois pas trop.

Merci d'avance pour toute aide

.





Avatar
Eric
re,

Ca te permettait de voir qu'on pouvait sans probleme récuperer la valeur
d'un champ de recordset basé sur ta requete Analyse croisée.

"On ne pourrait pas recuperer de valeur avec un recordset?
J'y crois pas trop."




A+
Eric


"xavier" écrivait
news:428901c42b92$f1f08d70$:

Ok, merci pour l'info.
Je pensais qu'on pouvait quand meme forcer le champ à
prendre une valeur.
Sinon pour le code que tu as envoyé, qu'est-ce qu'il fait
de particulier?

-----Message d'origine----- re,

Si, tu récupères la valeur mais à mon avis le champ Pourcent est un
champ provenant d'une table, non ?

Car le message : "Impossible d'attribuer une valeur à cet objet"
indique que ce champ à sa propriété Source déja définie.

Es-tu sur qu'il s'agisse d'un champ indépendant ?
Eric



"xavier" écrivait news:35eb01c42945
$de78afb0$:

J'ai essayé
Me.Pourcent = rst!Pourcentage
Me.Pourcent.Value = rst!Pourcentage

mais à chaqu efois, Access me repond comme message
d'erreur :
Impossible d'attribuer une valeur à cet objet

On ne pourrait pas recuperer de valeur avec un recordset?
J'y crois pas trop.

Merci d'avance pour toute aide

.







Avatar
xavier
Ok, merci bien

-----Message d'origine-----
re,

Ca te permettait de voir qu'on pouvait sans probleme
récuperer la valeur

d'un champ de recordset basé sur ta requete Analyse
croisée.


"On ne pourrait pas recuperer de valeur avec un
recordset?




J'y crois pas trop."




A+
Eric


"xavier"
écrivait

news:428901c42b92$f1f08d70$:

Ok, merci pour l'info.
Je pensais qu'on pouvait quand meme forcer le champ à
prendre une valeur.
Sinon pour le code que tu as envoyé, qu'est-ce qu'il
fait


de particulier?

-----Message d'origine----- re,

Si, tu récupères la valeur mais à mon avis le champ
Pourcent est un



champ provenant d'une table, non ?

Car le message : "Impossible d'attribuer une valeur à
cet objet"



indique que ce champ à sa propriété Source déja
définie.




Es-tu sur qu'il s'agisse d'un champ indépendant ?
Eric



"xavier" écrivait
news:35eb01c42945



$de78afb0$:

J'ai essayé
Me.Pourcent = rst!Pourcentage
Me.Pourcent.Value = rst!Pourcentage

mais à chaqu efois, Access me repond comme message
d'erreur :
Impossible d'attribuer une valeur à cet objet

On ne pourrait pas recuperer de valeur avec un
recordset?




J'y crois pas trop.

Merci d'avance pour toute aide

.





.