Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

CREER UNE TABLE CONTENANT LA LITES COMPLÈTE DES OBJETS CONTENUS DANS UN FORMULAIRE


Information sur la source

Catégorie :Formulaires Classé sous : création, table, objet, formulaire, liste Niveau : Initié Date de création : 14/12/2005 Vu : 7 109

Note :
9 / 10 - par 1 personne
9,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (2)
Ajouter un commentaire et/ou une note

Description

23/11/2005

Bonjour à toutes et à tous

Pour faire suite à la demande de Mohamed et Samir, voici un bout de code à mettre dans un bouton d'un formulaire, qui permettra d'obtenir la liste complète des objets   avec leur référence parentale.

Bonne prog à tous

Atoutfoxement bien sur

 

Source

  • create table objliste.dbf free (nom c(50),parent c(50))
  • index on nom tag nom
  • index on parent tag parent
  • thisform.saveas("lstobj.dbf")
  • use lstobj.dbf in 0
  • select lstobj
  • locate
  • scan
  • select objliste
  • append blank
  • replace nom with lstobj.objname
  • replace parent with lstobj.parent
  • select lstobj
  • endscan
  • select lstobj
  • use
  • select objliste
  • use
create table  objliste.dbf free (nom c(50),parent c(50))
 index on nom tag nom
 index on parent tag parent

 thisform.saveas("lstobj.dbf")
 use lstobj.dbf in 0
 select lstobj
 locate
 scan
select objliste
append blank
replace nom with lstobj.objname
replace parent with lstobj.parent
select lstobj
 endscan
select lstobj
use
select objliste
use

Commentaires et avis

signaler à un administrateur
Commentaire de dhardy le 20/12/2005 08:47:35

Bonjour,

Est-ce possible de le faire pour toutes les formulaires ouverts ?
Si oui, comment ?

Merci

signaler à un administrateur
Commentaire de tmcuh le 01/09/2006 09:28:16

Function SearchForms
Parameters psNameForm
Local i
i = 0
For Each oFrm In _Screen.Forms && boucle sur chaque fenêtre
i = i +1
If(Alltrim(Upper(oFrm.Name)) = Alltrim(Upper(psNameForm))) && la feuille est trouvé
Exit
Endif
Next
Return i
Endfunc

après tu n'a plus qu'à faire _screen.Forms[SearchForms("nomdelafeuille")].saveas("lstobj.dbf")

Sinon bien joué aumeric, j'avais pas pensé à cette technique xD

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Formulaire [ par Domatreal ] Salut J'aimerais savoir comment on peut creer (a l'aide d'un programme) un formulaire en fonction de la structure d'une table quelconque.En d'aut combobox dans un formulaire [ par brunaux ] Bonjour à tous !utilisant VFP 6.0 occasionnellement pour faire des écrans de saisie,je voudrais savoir comment l'on fait dans un combobox(donc avec un Centrer un objet par rapport au formulaire [ par Limack ] Bonjour les amis! Quelqu'un peut-il me dire comment centrer un objet par rapport au formulaire actif ? Notez que l'objet est créé sur le form.Merci Gestion d'objet [ par spoutnic_37 ] Salutation,     Mon probleme est le suivant : comment faire un ensemble de formulaire grace à visual foxpro 6, et gérer les Formulaire premier niveau et enfant . [ par spoutnic_37 ] aloha !!!   Je voudrais faire apparaitre des formulaires enfants dans un formulaire parent. Je parametre donc avec showWindow et mdifor formulaire-->Excel [ par Domatreal ] Salut J'ai creer un formulaire et j'aimerais savoir si on pouvait exporter le resultat (tel qu'il apparait) dans un fichier excel. Merci bie a faire et ne pas faire en VFP [ par brunaux ] Je suis utilisateur occasionnel et en lisant une contribution dans ATOUTFOX il y a un article qui s'intitule ' a faire et ne pas faire en VFP' j'aimer pb d'exe ! [ par spoutnic_37 ] aloha ,       j'ai un probleme avec mon executable. En fait j'ai un formulaire qui possede les bonnes tables dans l Différents formats de dbf [ par pledoux ] Bonjour,J'ai une table (dont je ne maitrise pas le format) dans laquelle je dois mettre à jour des champs. Sous VB ma propiété CONNECT vaut "FoxPro 3. modifier la structure d'un table sous VB [ par pledoux ] Bonjour,J'utilise le VFPOLEDB que m'a indiqué ThierryPerretier et cela fonctionne bien. Je dois maintenant modifier une table. J'ai fait le code suiva


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 2,293 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.