bonjour
j'ai defini cela
Dim Rs As DAO.Recordset
Dim Rs1 As DAO.Recordset
Dim Rs2 As DAO.Recordset
Dim Rs3 As DAO.Recordset
Dim Rs4 As DAO.Recordset
Dim Rs5 As DAO.Recordset
Dim Rs6 As DAO.Recordset
Dim Rs7 As DAO.Recordset
puis j'ai créé une procédure du type suivant
Private Sub init_menu_suite(num As Integer, Optional numrs As String)
numrs doit prendre les valeurs suivantes 1,2,3,4,5,6,7
et lorsque je veux rs1 j'essaie d'associer en faisant une concatenation de
rs et de la valeur numrs
afin d'ecrire dans ma procédure set rs + numrs=bd.openrecordset("toto")
mais le code n'est pas content et se met en rouge
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
G.Genier
Bonjour, Au mieux se serait : set rs & numrs½.openrecordset("toto")
Mais je crois qu'on puisse mettre une variable en tant que nom de variable.
"michel_bdx" a écrit dans le message de news:
bonjour j'ai defini cela Dim Rs As DAO.Recordset Dim Rs1 As DAO.Recordset Dim Rs2 As DAO.Recordset Dim Rs3 As DAO.Recordset Dim Rs4 As DAO.Recordset Dim Rs5 As DAO.Recordset Dim Rs6 As DAO.Recordset Dim Rs7 As DAO.Recordset
puis j'ai créé une procédure du type suivant
Private Sub init_menu_suite(num As Integer, Optional numrs As String)
numrs doit prendre les valeurs suivantes 1,2,3,4,5,6,7 et lorsque je veux rs1 j'essaie d'associer en faisant une concatenation de rs et de la valeur numrs
afin d'ecrire dans ma procédure set rs + numrs½.openrecordset("toto") mais le code n'est pas content et se met en rouge
merci michel
Bonjour,
Au mieux se serait : set rs & numrs½.openrecordset("toto")
Mais je crois qu'on puisse mettre une variable en tant que nom de variable.
"michel_bdx" <michelbdx@discussions.microsoft.com> a écrit dans le message
de news:885301B9-9AF6-40D0-800A-8AA4A0CE7DFA@microsoft.com...
bonjour
j'ai defini cela
Dim Rs As DAO.Recordset
Dim Rs1 As DAO.Recordset
Dim Rs2 As DAO.Recordset
Dim Rs3 As DAO.Recordset
Dim Rs4 As DAO.Recordset
Dim Rs5 As DAO.Recordset
Dim Rs6 As DAO.Recordset
Dim Rs7 As DAO.Recordset
puis j'ai créé une procédure du type suivant
Private Sub init_menu_suite(num As Integer, Optional numrs As String)
numrs doit prendre les valeurs suivantes 1,2,3,4,5,6,7
et lorsque je veux rs1 j'essaie d'associer en faisant une concatenation de
rs et de la valeur numrs
afin d'ecrire dans ma procédure set rs + numrs½.openrecordset("toto")
mais le code n'est pas content et se met en rouge
Bonjour, Au mieux se serait : set rs & numrs½.openrecordset("toto")
Mais je crois qu'on puisse mettre une variable en tant que nom de variable.
"michel_bdx" a écrit dans le message de news:
bonjour j'ai defini cela Dim Rs As DAO.Recordset Dim Rs1 As DAO.Recordset Dim Rs2 As DAO.Recordset Dim Rs3 As DAO.Recordset Dim Rs4 As DAO.Recordset Dim Rs5 As DAO.Recordset Dim Rs6 As DAO.Recordset Dim Rs7 As DAO.Recordset
puis j'ai créé une procédure du type suivant
Private Sub init_menu_suite(num As Integer, Optional numrs As String)
numrs doit prendre les valeurs suivantes 1,2,3,4,5,6,7 et lorsque je veux rs1 j'essaie d'associer en faisant une concatenation de rs et de la valeur numrs
afin d'ecrire dans ma procédure set rs + numrs½.openrecordset("toto") mais le code n'est pas content et se met en rouge
