Bonjour Samy,

Pour ajouter un enregistrement dans une table utilisée par plusieurs postes de travail, il y a de nombreuses méthodes (comme d'habitude avec VFP).

Je te propose de poster ici le bout de code par lequel tu ajoutes un enregistrement actuellement (en monoposte), et on fera les vérifications dessus, et les modifs pour que ça tourne sans problème en réseau (précise si tous les postes sont en réseau local, ou bien s'il y a des postes distants)

Globalement, il faut bien sur ouvrir les tables en shared, bien choisir son buffermode, la façon dont on va verrouiller les fichiers pour la mise à jour, et bien utiliser le tableupdate.

Dès que tu auras donné plus d'infos sur ton code actuel, on voit tout ça en détail.

Si ton appli devient lente en réseau, vérifie en premier la qualité de ton réseau physique (cartes, switches, etc...) et surtout, surtout, sois certain que ton antivirus ne scanne pas les dossiers où sont tous tes fichiers de données.

Bonjour Samy,

Si tu le veux bien, on va commencer par le début !

en premier, ta table ref_pers : il ne me semble pas logique de recréer l'index à chaque fois que tu fais un load du formulaire.
il serait préférable de créer un index structurel, qui serait automatiquement ouvert en même temps que ta table, et surtout, mis à jour automatiquement. Parceque là, comme tu le fais, ton index est faux! Et c'est long, une indexation sur un idx en réseau!

en fenêtre de commande:

use ref_pers exclusive in 0
sele ref_pers
modif struct

if indexseek ;
        (w_matr , .F. , "ref_pers" , "pers_matr")

        update ("ref_pers") ;
             set pers_noma=w_noma ;
             where pers_matr = w_matr

else

        insert into ("ref_pers") ;
            (pers_matr, pers_noma) ;
            values ;
            (w_matr, w_noma) 

endif

if indexseek ;
(w_matr , .T. , "ref_pers" , "pers_matr")
replace ;
pers_noma with w_noma
else
insert into ("ref_pers") ;
(pers_matr, pers_noma) ;
values ;
(w_matr, w_noma) 
endif

Bonjour Samy,

Le gros avantage d'un index structurel, c'est qu'il contient plusieurs clé d'index (les tag).

Tu les crées soit avec un modif struc (qui ouvre le générateur de table), soit par la commande INDEX ON Expression TAG nom_de_repère

Tu crées les tag qui te sont nécessaires, avec les expression qui te vont bien. Et quand tu en as besoin, SET ORDER TO nom_de_repère, ou set key to... , ou indexseek...

Si tu veux qu'on regarde tes index nécessaires, fais passer la structure de ta table.

Autre chose, pour l'accès en réseau, le plus simple est d'ouvrir les tables dans l'environnement de données des formulaires, et d'utiliser un unvironnement de données privé pour chaque formulaire (propriété DataSession du Formulaire mise à 2).

Michel
PS: bienvenue dans l'assoc!

Pas de problème, Samy

pour me faire passer ton projet, tu zippes tout, et tu me l'envoies par mail (mon adresse est visible sur le site de l'assoc).

Michel

Bien reçu

Salut monsieur
je v'en prie de m'aider
svp suis debutant en programmation vfp 6
j'ai cree une vue distante vue1 qui accede a la base de donnees qui se trouve dans le serveur, dans le bouton ENREGISTRER du formulaire j'ai ecrie le code suivant:
select 1
use vue1
locate for id_employer= m.id_employer
if .not.found()
insert into vue1 from memvar
else
update vue1 set nom=m.nom, prenom=m.prenom where id_employer=m.id_employer
endif
= tableupdate(.T.)
thisforme.annuler.valid

** commentaire
vue1: est une vue distante (avec une connexion reussie au serveur)qui accede à une table employer qui se trouve dans la base de donnees "gestion" creee dans le serveur
par le gestionnaire de la base de donnees visual fp6
pour les variable à saisir dans le formulaire j'ai gardé les champs de la table et j'ai leur ajeter le prefix m.(exp: le nom du champ est nom et la variable à saisir est m.nom)
LE PROBLEME qui se pose c'est la vue1 est mise à jour mais la table EMPLOYER qui se trouve dans le serveur n'est pas mise a jour
svp si vous pouvez m'aider la desuus et merci infiniment