Forum AtoutFox : Programmer en automatique l'association d'une table de données DBF à un conteneur de bases de données DBC   

lun. 31 mars 2014, 09h51
DoumDoum58
France
atoutfox.public.association

Programmer en automatique l'association d'une table de données DBF à un conteneur de bases de données DBC

Bonjour à tous,

Je vous remercie tous de vos interventions (FoxInCloud, GLS, Jean, Francis Faure, eddymaue,...).

Suite à vos remarques et conseils, j'ai essayé d'intégrer le petit programme dans mon application mais rien de concluant en est ressorti.
Il faut vous dire que je ne programme plus depuis bien longtemps.

J'ai essayé de faire marche arrière c'est à dire de replacer la table de données qs_angle1.DBF en indépendante dans l'application à partir du projet mais lorsque je lance l'écran qui ouvre la table, il y a un plantage à l'ouverture.

Et je dois distribué la modification du logiciel dans les plus brefs délais.

Je suis incapable de créer le programme dans le projet qui me permet de placer automatiquement la table de données nommée qs_angle1.DBF dans le conteneur de base de données soudeurs1.DBC

Je vous demande donc un grand service :
Pourriez vous m'écrire un programme exécutable que chacun lancera sur son ordinateur
Cet exécutable permettra de placer et de lier automatiquement sur les cinquante ordinateurs la table indépendante qs_angle1.DBF dans le conteneur de la base de données soudeurs1.DBC afin que l'application fonctionne correctement.

Ou bien pourriez vous me donner SVP une solution viable pour que la table indépendante nommée qs_angle1.DBF qui est placée sur chaque installation du logiciel (une cinquantaine d'ordinateurs répartis dans toute la France) soit automatiquement associée au conteneur de base de données
Je participe financièrement à votre implication par PayPal.

Vous m'avez donné les infos suivantes :
ADD TABLE TableName | ? [NAME LongTableName]

Ainsi que la routine ci-dessous :
local aa[1], cTable, lTable
set database to soudeurs1.dbc
if ADBObjects(aa,"TABLE") > 0
for each cTable in aa
lTable = m.cTable == upper('qs_angle01')
if m.lTable
exit
endif
endfor
endif
if !m.lTable
ADD TABLE qs_angle01.dbf NAME qs_angle01
endif

Mais je suis incapable d'exploiter vos infos.

Merci d'avance de votre aide précieuse.

Bien cordialement,

Permalink : http://www.atoutfox.org/nntp.asp?ID=0000014310