Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Groups and sub-groupe with SFR
Message
De
21/03/2005 13:06:17
 
 
À
21/03/2005 10:22:40
Information générale
Forum:
Visual FoxPro
Catégorie:
Stonefield
Versions des environnements
Visual FoxPro:
VFP 7 SP1
Database:
Visual FoxPro
Divers
Thread ID:
00997069
Message ID:
00997902
Vues:
13
Hi Denis.

>But when it gets to the addition of the "Test2" group then I receive the error that I mentioned in my original post. loGroup is not initialized properly. So if I understand this error correctly it tells me that no node for "Test" was not created but what I don't get is why I did'nt get an error message for the creation of that "Test" group.

It looks like the code in AddGroup isn't adding the parent node if it doesn't exist. Try replacing the assignment to loParent with the following:
if type('toTree.Nodes[lcParent]') <> 'O'
  loParent = toTree.Nodes.Add(, 1, lcParent, substr(lcParent, 2), 1)
else
  loParent = toTree.Nodes[lcParent]
endif type('toTree.Nodes[lcParent]') <> 'O'
Doug
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform