bonjour tlm

j'ai une question simple : peut t'on faire un sub dans un sub ?

Euh ... pas à ma connaissance. Et quand bien même ce serait possible, quel peut bien être l'intérêt ??



Manu

et bien je créer su une page une fonction assez grande, mais jaimerai quelle appelle elle meme dautre fonction. pour linteret et bien c'est que c plus clair, je ne vois pas trop comment faire autrement

Alors dans ce cas, l'autre Sub n'est pas dans la première, mais en dehors.
Et celà est parfaitement faisable.


Manu

Salut !

On peut effectivement faire une sub dans une sub.

ex light d'un de mes codes :

Private Sub ViewPost(i_Type)
  SQL_Query = "Select * from tblCategoriePost where CategoriePost_Type = '" & i_Type & "' order by CategoriePost_Number"

  CreateRs rsItem, 1, 1
  rsItem.Open SQL_Query, session("strCon")
  
  ...

   do while not rsItem.eof
    ...

    'ici 2 sub appelé
    RecupCountOffre rsItem("CategoriePost_Id"), i_CountOffre
    RecupCountAppel rsItem("CategoriePost_Id"), i_CountAppel
    
    ...

    rsItem.movenext 
   loop
   
  CloseRS(rsItem) 'call de la sub pour fin du recordset
 End Sub
 
 Private Sub RecupCountOffre(i_Type, o_CountOffre)
  SQL_Query = "Select Offre_Id, Offre_IdCategorie from tblOffre where Offre_IdCategorie = '" & i_Type & "'"

  CreateRs rsItemCount, 1, 1
  rsItemCount.Open SQL_Query, session("strCon")
  
  If rsItemCount.recordcount < 0 Then
   o_CountOffre = "0"
  else
   o_CountOffre = rsItemCount.recordcount
  end if
  CloseRS(rsItemCount) 'call de la sub pour fin du recordset
 End Sub

merci beaucoup pour vos reponse.

mon objectif etait en fait de créer un fonction d'initialisation des paramètres de connexion d'une BD sous access, car je n'ai pas réussi a faire une connexion qui n'aurais besoins d'être appeler une seule fois. pour le moment je dois a chaque fois faire le schema suivant :

call connexio_BD()
  modele=  "select modèle from [détails] where [N° de tri]=" & tri &""
  rs.open modele,conn
  modele= rs("modèle")
  rs.close
  conn.close

et cela parfois 4 ou 5 fois dans la page si je dois faire beaucoup de requete.
une idée pour eviter les call et close a répétition ? 

Euh ... pour moi, faire une Sub dans une Sub, çà ressemblait à ceci :


Sub toto()
[...]
Sub titi()
End Sub
[...]
End Sub

S'il s'agit d'un simple appel de Sub dans une Sub (appelons un chat ... un chat), alors OUI, c'est bien sûr réalisable et super facile.


Manu