OVH Cloud OVH Cloud

recordset

4 réponses
Avatar
frederic
Bonjour,

je n'arrive pas a inclure un parametre dans l'ouverture
d'un recordset. J'ai un message du type " too few
parameters". Pouvez vous m'aider ?
Le parametre vient d'une inputbox

Voici mon code

Dim ib As String
Dim Rs As Recordset

ib = InputBox("pswd")

Set Rs = CurrentDb.OpenRecordset("select login from logon
where pswd = ib ;")
MsgBox Rs(0)

4 réponses

Avatar
3stone
Salut,

"frederic"
je n'arrive pas a inclure un parametre dans l'ouverture
d'un recordset. J'ai un message du type " too few
parameters". Pouvez vous m'aider ?
Le parametre vient d'une inputbox

Voici mon code

Dim ib As String
Dim Rs As Recordset

ib = InputBox("pswd")

Set Rs = CurrentDb.OpenRecordset("select login from logon
where pswd = ib ;")



Il ne connait pas ib, ni sa valeur...


Where pswd=" & ib & ";")



--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------

Avatar
Raymond [mvp]
bonjour;

essaie:
Set Rs = CurrentDb.OpenRecordset("select login from logon where pswd = '" &
ib & "'" )

ib doit être alpha je pense, sinon enlève les '
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"frederic" a écrit dans le message de
news:1670a01c447cd$0d5fb3a0$
Bonjour,

je n'arrive pas a inclure un parametre dans l'ouverture
d'un recordset. J'ai un message du type " too few
parameters". Pouvez vous m'aider ?
Le parametre vient d'une inputbox

Voici mon code

Dim ib As String
Dim Rs As Recordset

ib = InputBox("pswd")

Set Rs = CurrentDb.OpenRecordset("select login from logon
where pswd = ib ;")
MsgBox Rs(0)






Avatar
frederic
Merci Raymond

Ca marche.
j'ai essaye aussi celle de 3stone mais elle ne marche pas.

A bientot
Et merci pour ton site VBA, je m'en sert tous les jours.

-----Message d'origine-----
Bonjour,

je n'arrive pas a inclure un parametre dans l'ouverture
d'un recordset. J'ai un message du type " too few
parameters". Pouvez vous m'aider ?
Le parametre vient d'une inputbox

Voici mon code

Dim ib As String
Dim Rs As Recordset

ib = InputBox("pswd")

Set Rs = CurrentDb.OpenRecordset("select login from logon
where pswd = ib ;")
MsgBox Rs(0)




.



Avatar
3stone
"frederic"

... mais elle ne marche pas.


Lui faudrait des jambes ;-)))


s'cuses... manquait les quotes...



--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------