Discussion :

[popofpopof]

bonjour,

je souhaiterai remplace ceci "[Forms]![Reunion de chantier]![CHEMIN] " qui est dans ma requete par l équivalant de ceci Array(GetDbPathOfLinkedTable("tblAdmin") & "DOC\" & NUM_OPERATION & "\REUNION_CHANTIER\" & "Réunion chantier n " & NUM_REUNION & ".pdf")

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 DoCmd.RunSQL "UPDATE OPERATION_ARCHIVAGE SET OPERATION_ARCHIVAGE.CHEMIN_PDF_REUNION = [Forms]![Reunion de chantier]![CHEMIN] WHERE (((OPERATION_ARCHIVAGE.DATE_REUNION)=[Forms]![Reunion de chantier]![DATE_REUNION0]) AND ((OPERATION_ARCHIVAGE.NUM_REUNION)=[Forms]![Reunion de chantier]![NUM_REUNION0]) AND ((OPERATION_ARCHIVAGE.TYPE_REUNION)='REUNIONCHANTIER') AND ((OPERATION_ARCHIVAGE.NUM_OPERATION)=[Forms]![Reunion de chantier]![NUM_OPERATION0]));"

il y a une solution?

Merci a vous

[Jeannot45]

Je t'avoue ne pas comprendre ta démarche, pourquoi remplacer la valeur qui se trouve dans ton champ de formulaire

1. Pourquoi remplacer la valeur qui se trouve dans ton champ de formulaire
2. A quoi correspond la valeur Array(GetDbPathOfLinkedTable("tblAdmin")

[popofpopof]

salut

sur un bouton

j'ai mis ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
    ' Nom de base du fichier PDF à crée
 strFichier = Array(GetDbPathOfLinkedTable("tblAdmin") & "DOC\" & rst("NUM_OPERATION") & "\REUNION_CHANTIER\" & "Réunion chantier n " & rst("NUM_REUNION") & ".pdf")
 CHEMIN = strFichier

strFchier me sert a crée un pdf et CHEMIN est une zone de texte que je cache sur mon formulaire qui me pert de stock la valeur de strFichier pour ensuite l'envoyé dans ma requete suivante avant de stocké le nom de l'adresse ou touvé le fichier

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 DoCmd.RunSQL "UPDATE OPERATION_ARCHIVAGE SET OPERATION_ARCHIVAGE.CHEMIN_PDF_REUNION = [Forms]![Reunion de chantier]![CHEMIN] WHERE (((OPERATION_ARCHIVAGE.DATE_REUNION)=[Forms]![Reunion de chantier]![DATE_REUNION0]) AND ((OPERATION_ARCHIVAGE.NUM_REUNION)=[Forms]![Reunion de chantier]![NUM_REUNION0]) AND ((OPERATION_ARCHIVAGE.TYPE_REUNION)='REUNIONCHANTIER') AND ((OPERATION_ARCHIVAGE.NUM_OPERATION)=[Forms]![Reunion de chantier]![NUM_OPERATION0]));"

ceci fonctionné pendant quelque jour mais maintenant mon champ CHEMIN est bien alimenté par contre quand je fais même une requete simple pour affiche le contenu du champ il me dis qu'il est vide

enfin pour ta question A quoi correspond la valeur Array(GetDbPathOfLinkedTable("tblAdmin") ceci me renvoié l'adresse ou ce trouve ma base "\\Serveurs8\ACCESBASE$\BASETABLE"
donc pour mon fichier sa donnerai "\\Serveurs8\ACCESBASE$\BASETABLE\DOC\201\REUNION_CHANITER\Rèunion chantier n°10.pdf par exemple

[Jeannot45]

As-tu vérifié le contenu de ta variable strFichier ?

Ajoute l'instruction

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Debug.Print strFichier

comme ci-dessous

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
    ' Nom de base du fichier PDF à crée
 strFichier = Array(GetDbPathOfLinkedTable("tblAdmin") & "DOC\" & rst("NUM_OPERATION") & "\REUNION_CHANTIER\" & "Réunion chantier n " & rst("NUM_REUNION") & ".pdf")
Debug.Print strFichier
 CHEMIN = strFichier

Met un point d’arrêt sur l'instruction strFichier
Lorsque le programme stoppe sur ton instruction, affiche la fenetre d'exécution puis fais F8. Tu retrouveras la valeur de strFichier
Tu sauras alors si ta variable est bien renseignée.

[popofpopof]

il me dis <Incompatibilité de type> j'ai mis des espion sur
GetDbPathOfLinkedTable("tblAdmin")
rst("NUM_OPERATION")
rst("NUM_REUNION")
ceci est bien renseigné mais apres il me dis <Incompatibilité de type>

[Jeannot45]

La fonction Array() définit un tableau. L'indice placé () permet de récupérer la valeur stocké dans le tableau.

Je vois que l'instruction GetDbPathOfLinkedTable("tblAdmin") te renvoie bien le chemin

La fonction Array est-elle nécessaire ?

ci-dessous, le code simplifié

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
    ' Nom de base du fichier PDF à crée
 strFichier = GetDbPathOfLinkedTable("tblAdmin") & "DOC\" & rst("NUM_OPERATION") & "\REUNION_CHANTIER\" & "Réunion chantier n " & rst("NUM_REUNION") & ".pdf"
 CHEMIN = strFichier

[popofpopof]

ok super cela fonctionne

par contre sa plante maintenant apres mais c'est du a la demandé d'un tableau je pense avoir trouvé sa ne plante plus je test

merci encore