[access2003 ]probleme de recordset sur état

Fermé
Milyshyn Messages postés 38 Date d'inscription jeudi 24 janvier 2008 Statut Membre Dernière intervention 16 février 2010 - 17 avril 2008 à 15:09
Milyshyn Messages postés 38 Date d'inscription jeudi 24 janvier 2008 Statut Membre Dernière intervention 16 février 2010 - 17 avril 2008 à 16:03
Bonjour à tous,
j'ai un petit soucis au sujet de la génération d'un état : le principe est simple je m'occupe d'un base de donnée de formation qui gère en autre les stages des salariés. Un état est généré, grâce à une requête sql (recordset), ou l'on trouve la liste des stagiaires, matricule, nom, prénom, etc.

Je voudrais calculer un taux de participation, qui doit apparaître sur mon état :

Voila la formule je ne m'abuse ..

nbParticipants
__________ x 100
Nb Inscrits

je gere ceci dans du code, grace à des requêtes
Set rst = CurrentDb.OpenRecordset("select NomSal from RQ_EtatTaux where LibSoc='" & Me.NomSoc & "' and NumStag=" & Me.NumStag & "")


Voici ma requete ou me.NomSoc et me.NumStag sont des zones de texte de l'état ... Elle me permet de récupéré le nombre de salarié inscrit par société par stage

l'erreur est la suivante :
erreur d'exécution 2127, expression sans paramètre...

Quelqu'un pourrait-il m'aider ????

merciiiii

12 réponses

salut,

mettre Me.NomSoc.Text et Me.NumStag.Text
0
Milyshyn Messages postés 38 Date d'inscription jeudi 24 janvier 2008 Statut Membre Dernière intervention 16 février 2010 3
17 avril 2008 à 15:18
EUUH non toujours la même erreur, mais il faut savoir que Me.NomSoc et Me.NumStag sont des zones de texte et non des étiquettes....

merci comme même....
0
ah pardon ok...

alors mettre Set rst = CurrentDb.OpenRecordset("select NomSal from RQ_EtatTaux where LibSoc='" & Me.NomSoc & "' and NumStag=" & Me.NumStag & "", dbOpenDynaset, dbReadOnly)
0
Milyshyn Messages postés 38 Date d'inscription jeudi 24 janvier 2008 Statut Membre Dernière intervention 16 février 2010 3
17 avril 2008 à 15:23
Décidement elle est tétu cette requête !!! mdr
Toujours la même chose, même erreur, je me demande si ce ne serait pas un problème de cote ...???
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
essaye avec des valeurs bidons :

Set rst = CurrentDb.OpenRecordset("select NomSal from RQ_EtatTaux where LibSoc='toto' and NumStag=1000", dbOpenDynaset, dbReadOnly)
0
Milyshyn Messages postés 38 Date d'inscription jeudi 24 janvier 2008 Statut Membre Dernière intervention 16 février 2010 3
17 avril 2008 à 15:31
Set rst = CurrentDb.OpenRecordset("select NomSal from RQ_EtatTaux where LibSoc='bjr' and NumStag=1")
La ça marche !!!!
Donc c'est une erreur au niveau des zones de texte de l'Etat, pourtant, sauf erreur de ma part, j'ai bien fait attention au fautes de frappe etc...
Bizard, Bizard ....
0
oui...
essaye de passer par un string

dim sql as strign

sql = "select NomSal from RQ_EtatTaux where LibSoc='" & Me.NomSoc & "' and NumStag=" & Me.NumStag

Set rst = CurrentDb.OpenRecordset(sql)
0
Milyshyn Messages postés 38 Date d'inscription jeudi 24 janvier 2008 Statut Membre Dernière intervention 16 février 2010 3
17 avril 2008 à 15:39
NON, il lache pas l'affaire mdr... peut être avec un docmd.runsql ????
0
dim sql as string

sql = "select NomSal from RQ_EtatTaux where LibSoc='" & Me.NomSoc & "' and NumStag=" & Me.NumStag

Set rst = CurrentDb.OpenRecordset(sql, dbOpenDynaset, dbReadOnly)
0
Milyshyn Messages postés 38 Date d'inscription jeudi 24 janvier 2008 Statut Membre Dernière intervention 16 février 2010 3
17 avril 2008 à 15:52
non ça bug toujours, mais il y a un problème au niveau des champs je pense, car il ne passe même pas par
Set rst = CurrentDb.OpenRecordset(sql, dbOpenDynaset, dbReadOnly)
Il s'arrete à la requête donc il doit y avoir une erreur de syntaxe, peut être que j'ai mal paramètré les champs en lès créeant... Il ont pour source de contrôle le nom d'un champs d'une table...C'est peut être ça qui bug ???
0
oui c'est surement ça...
il doit y avoir une propriété pour Me.NumStag qui renvoie la valeur en string...

NumStag = "zone de texte" = textBox ??
0
Milyshyn Messages postés 38 Date d'inscription jeudi 24 janvier 2008 Statut Membre Dernière intervention 16 février 2010 3
17 avril 2008 à 16:03
Tiens on avait raison c'est une erreur avec ces zones de texte, j'arrive même pas a récupérer la valeur :
 Me.NomSoc = valeur1

il me dit : 'Erreur d'execution -2147352567(80020009)' Impossible d'attribuer la valeur a cet objet
0