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
joyeux atchoum
Bonjour
Etant donné que tu souhaite réagir en fonction du résultat de ta requete, je te suggére de regarder du coté de DAO ou ADO.
Pour DAO cela pourrait donnée
Dim rst as DAO.recordset Dim strSql as String
strSql = blabla set rst = currentdb.opentrecordset("strSQL")
if rst.eof AND rst.Bof then 'agir selon cas vide else 'se position sur le premier enregistrement rst.movefirst 'tant que le dernier enregistrement n'est pas atteint wile not rst.eof 'agir sur l'enregistrement 'passe à l'enregistrement rst.movenext loop end if
Au lieu du do loop, tu peux faire aussi un foreach.
Quant a ta question concernant ton code, il se trouve, et l'aide le dit trés bien, qu'il n'est possible d'utiliser une requete Selection avec docmd.runsql Avec runsql tu ne peux faire que des requetes actions, c'est à dire suppression, création, modification de table, d'index,...
ja qui doit reveiller ses neurones de bon matin
Bonjour
Etant donné que tu souhaite réagir en fonction du résultat de ta
requete, je te suggére de regarder du coté de DAO ou ADO.
Pour DAO cela pourrait donnée
Dim rst as DAO.recordset
Dim strSql as String
strSql = blabla
set rst = currentdb.opentrecordset("strSQL")
if rst.eof AND rst.Bof then
'agir selon cas vide
else
'se position sur le premier enregistrement
rst.movefirst
'tant que le dernier enregistrement n'est pas atteint
wile not rst.eof
'agir sur l'enregistrement
'passe à l'enregistrement
rst.movenext
loop
end if
Au lieu du do loop, tu peux faire aussi un foreach.
Quant a ta question concernant ton code, il se trouve, et l'aide le dit
trés bien, qu'il n'est possible d'utiliser une requete Selection avec
docmd.runsql
Avec runsql tu ne peux faire que des requetes actions, c'est à dire
suppression, création, modification de table, d'index,...
Etant donné que tu souhaite réagir en fonction du résultat de ta requete, je te suggére de regarder du coté de DAO ou ADO.
Pour DAO cela pourrait donnée
Dim rst as DAO.recordset Dim strSql as String
strSql = blabla set rst = currentdb.opentrecordset("strSQL")
if rst.eof AND rst.Bof then 'agir selon cas vide else 'se position sur le premier enregistrement rst.movefirst 'tant que le dernier enregistrement n'est pas atteint wile not rst.eof 'agir sur l'enregistrement 'passe à l'enregistrement rst.movenext loop end if
Au lieu du do loop, tu peux faire aussi un foreach.
Quant a ta question concernant ton code, il se trouve, et l'aide le dit trés bien, qu'il n'est possible d'utiliser une requete Selection avec docmd.runsql Avec runsql tu ne peux faire que des requetes actions, c'est à dire suppression, création, modification de table, d'index,...