probleme de récursivité entre deux appels de sub

Question

Bonjour, j'ai un petit souci avec deux subs qui s'appellent mutuellement dans le code ci-dessous. Une erreur de type StackOverflow (Err 28 : Espace de pile insufisant) arrête l'application au bout d'une dizaine de seconde (au bout de . Connaisseriez vous un appel spécial (ou un 'truc') demandant de terminer sub2 en appelant sub1 afin de permettre de pas accumuler ces subs dans la mémoire.

Public i As Long

Private Sub Command1_Click()
    sub1
End Sub


Private Sub sub1()
    Text1.Text = i
    DoEvents
    Debug.Print "sub1"
    i = i + 1
    if i < 10000 then sub2
End Sub

Private Sub sub2()
    Text1.Text = i
    DoEvents
    Debug.Print "sub2"
    i = i + 1
    sub1
End Sub

cs_Jack · Answer

Salut
Mais pourquoi relances-tu Sub1 &#224; la fin de Sub2 ?
Sub1 appelle Sub2.
Quand Sub2 est termin&#233;e, elle revient &#224; l'instruction qui suit celle qui l'a appel&#233;.

Que veux-tu faire exactement ?
C'est bizarre comme id&#233;e.

Vala
Jack, MVP VB
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)

saidelm · Answer

salut 
c'est le genre de code &#224; eviter. Essaie de revoir tes id&#233;es il y a surement d'autres fa&#231;ons de repenser le pb
Bonne chance

Utilisateur anonyme · Answer

Voila ce que ça doit donner dans l'appli :

Une requête cliente >> appelle une fonction qui lit x octets d'un fichier >> qui l'envoie sur le socket >> qui une fois terminé (socket_complete) >> appel la fonction qui lit x octets d'un fichier >> qui l'envoie sur le socket >>  ....... >> et arrete le tout lorsque la fin du fichier est atteinte

Avant j'avais un timer qui vérifiait tout les 1ms si l'envoi du socket était terminé (send_complete mettait une valeur à true) et si c'était le cas ce timer renvoyait des octets sur le socket, etc... Ca marchait bien mais c'était trés lent (1mo/sec contre 9mo/sec avec des appels récursifs, normal il n'y a plus d'instant d'attente). Je cherche donc le moyen de faire en sorte d'appeler dans send_complete la fonction qui enverra la suite des octets lu dans le fichier mais sans accumuler tout ces fonctions qui ne se décharge jamais en memoire et provoquer un dépassement de pile.

Probleme de récursivité entre deux appels de sub

3 réponses

Discussions similaires