Discussion :

[wizo_nac]

Bonjour!
Je suis un débutant en windev et je suis présentement confronté à un problème d'importation de fichiers word et pdf que je dois stocker dans une base de donnée hyperfile classic (qui va bientôt migrer vers HF C/S). Ce que je veux c'est stocké le contenu même de ces fichiers dans une rubrique mémo binaire que j'ai prévu à cet effet. Après des recherches et lecture de doc, j'ai utilisé la fonction HAttacheMémo() mais quand je vais voir dans mes tables, je ne vois pas le fichier.
Voici un peu mon code:

//sRes est le chemin complet du fichier
sRes est une chaîne = ""
sRes = fSélecteur("", "","Sélectionnez un fichier...", "Fichier word"+TAB+"*.doc"+RC+"Fichier pdf"+TAB+"*.pdf"+RC+"Tous fichiers (*.*)"+TAB+"*.*", //Choix des extensions
"pdf",fselOuvre)

SI sRes <> "" ALORS
// Attache le fichier spécifié par sRes à l'enregistrement
HAttacheMémo(Rapport,FichierRapport,sRes,hMémoBin)
EcranVersFichier()
// Ajoute l'enregistrement
HAjoute(Rapport)
SINON
Info("Aucun fichier sélectionné")
FIN

Je compte vraiment sur votre aide pour décoller car là je suis un peu perdu!

[Louis Griffont]

En lecture, il faut que réaffecte ton champ mémo dans un fichier temporaire, pour le faire lire ensuite à l'application qui lui correspond. Je te conseille d'avoir dans ta base un champ type, contenant l'extension du fichier afin de pouvoir l'ouvrir avec le bon outils !

Si je peux me permettre un conseil, je préfère de loin stocker dans la base le nom des fichiers et placer les fichiers dans des dossiers spécifiques.

[wizo_nac]

Merci Louis de m'ouvrir vers d'autres solutions que je trouve effectivement plus intéressantes quand la migration ce fera. Pour l'instant j'ai tenté d'utiliser la fonction HExtraitMémo() avec les paramètres HExtraitMémo(Rapport,FichierRapport,"Chemin complet du fichier") mais ça ne me donne toujours rien je me demande si je suis sur la voie au moins! Maintenant je ne vois pas où et comment je dois utiliser le fichier temporaire dont vous parler. Encore merci d'épauler les débutants

[Louis Griffont]

En prenant par exemple un fichier HF contenant (entre autres) les rubriques TypFichMemo chaine de 4 et FichierMemo MemoBinaire

Code :

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

1
2
3
4
5
6
 
HLitRecherche( MonFichier, MaClef, MaValeurClef)
Si HTrouve( MonFichier) alors
 si HExtraitMémo(MonFichier, FichierMemo ,RepTemp+"\"+VersChaine( DonneIdentifiant(), "010d")+MonFichier.TypFichMemo) alors
    LanceAppliAssociée( RepTemp+"\"+VersChaine( DonneIdentifiant(), "010d")+MonFichier.TypFichMemo)
fin

En supposant que TypFichMemo contienne l'extension du fichier d'origine (ex : .doc pour un fichier Word ) et que le fichier doc soit stocké dans FichierMemo par HAttacheMemo, ce bout de code devrait te servir à lancer le programme avec un le fichier stocké !

Toutefois, je te conseillerai de faire comme je te l'ai indiqué sur ma premère réponse. Et il est beaucoup plus facile à mettre la solution en place au départ que de devoir la changer apres !