EXPORT D'UN ETAT CRYSTAL EN FICHIER PDF PUIS ENVOIE PAR MAIL DE CE FICHIER
psnnomen
Messages postés
2
Date d'inscription
mardi 20 janvier 2004
Statut
Membre
Dernière intervention
23 février 2004
-
23 févr. 2004 à 13:10
a123a Messages postés 3 Date d'inscription jeudi 12 mars 2009 Statut Membre Dernière intervention 20 mars 2009 - 18 mars 2009 à 10:44
a123a Messages postés 3 Date d'inscription jeudi 12 mars 2009 Statut Membre Dernière intervention 20 mars 2009 - 18 mars 2009 à 10:44
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/20579-export-d-un-etat-crystal-en-fichier-pdf-puis-envoie-par-mail-de-ce-fichier
https://codes-sources.commentcamarche.net/source/20579-export-d-un-etat-crystal-en-fichier-pdf-puis-envoie-par-mail-de-ce-fichier
18 mars 2009 à 10:44
crystalreport1.ExportToDisk(CrystalDecisions.Shared.ExportFormatType.WordForWindows, SaveFileDialog1.FileName & ".doc ")
20 mai 2008 à 11:49
14 nov. 2007 à 10:45
pour les création de pdf: crxf_pdf.dll,crxf_pdf_res_fr.dll,u2dapp.dll,u2DDISK.DLL,u2DMAPI.DLL (mail)
en espérant que ça vous aide...
14 nov. 2007 à 10:39
Votre idées de mettre les indication qui me sont utiles dans l'objet du mail peut être une solution alternative.
Toute fois je reviens sur le fait que mon etat crystal n'est pas un fichier rpt, il est directement contenu dans mon executable je passe par des feuilles .DSR ce qui m'empeiche aussi de changer le nom de mon rapport.
En tout cas je pense que je vais m'orienter soit vers votre solution(objet du mail) soit vers un enregistrement du fichier en pdf et ensuite de sont envoye ce qui devrait me permettre de lui donner le nom que je desire.
13 nov. 2007 à 08:22
exemple :.ExportOptions.MailSubject = "etat crystal datant du "& Now en
.ExportOptions.MailSubject = "La facture d'achat (du) "& Now comme titre du courrier si vous avez besoin d'ajouter un quelconque numéro, vous pouvez passer directement des valeurs à ces variables au niveau de votre report,car outlook n'intervient que pour l'envoi or l'application qui se charge de conversion de format c'est toujours crystal
ensuite, referer vous déjà en amont vous avez passer des instructions pour dire ce qui suit
Set rep = appl.OpenReport("\\chemin\exemple.rpt", 1)
en precisant le chemin d'acces d'un fichier .rpt
et ensuite changer de format à ce stade
.ExportOptions.FormatType = crEFTPortableDocFormat
ce qui fait que l'envoi du courrier se joue sur le nom physique du rpt dont le chemin d'accès est déjà determiner. or par la méthode que vous voulez utiliser cela reviendrait à rénommer le fichier et et pour cela il faudrait trouver un moyen de rediriger le chemin,si ça peut être faisable mais pas avec ce script,
humblement c'est la petite idée que je puis que vous apporter, merci
12 nov. 2007 à 17:34
12 nov. 2007 à 13:59
12 nov. 2007 à 12:20
Cependant ce qui m'interesse c'est de nommé dynamiquement le nom du fichier pdf fournit en piece jointe.
Independament du nom du rapport car mes rapports sont inclus dans l'application est ne sont donc pas des fichier séparé.
Merci d'avance...
10 nov. 2007 à 08:34
Set rep = appl.OpenReport("\\chemin\exemple.rpt", 1)
à la place de exemple tu pzeut mettre "KORNENE" par exemple
pour le probleme que j'ai eu à soumettre à l'intention des membres j'ai pû trouver un e solution à ce problème, merci
Didhens Mbuyamba Bukasa
9 nov. 2007 à 16:56
Je voudrai savoir s'il existe un moyen de nommé le fichier que l'on met en piece jointe du mail?
20 sept. 2007 à 15:13
mon nom c'est Didhens M.bukasa...
j'ai utiliser avec succés le code que les amis ont partager,j'y ai ajouter une petite routine,mais la difficulté que j'epprouve c'est de pouvoir faire tourner l'éxé de l'application sur les postes ou il n' ya pas crystal report, ni visual basic,c'est à dire en réseau,le comble c'est que ça ne réagis pas du tout quand je lance le bouton envoyer le message, est-ce un problème de dll qui me manque dans le package que j'utilise ou comment,j'espère que ma préoccupation retiendra votre attention.
NB:j'utilise crystal version 8.5, les autres poste ont des versions inférieure à celui du développement, merci
11 mai 2007 à 13:00
30 avril 2007 à 16:19
10 oct. 2006 à 16:30
Pour faire fonctionner ce programme avec la version 8.0, il faut que vous charger un package sur le site de Crystal Reports.
http://technicalsupport.businessobjects.com/KanisaSupportSite/supportcentral/supportcentral.do;jsessionid=8FB316851933A5966D6E12E8420FB2B3?id=m1
Cela de compose de :
u2fpdf.dll " ce composant s'intégre dans le répertoire Windows\Crystal"
ExportModeller.dll
TSLV.dll
Amicalement.
Bernard.
7 oct. 2006 à 16:55
31 mai 2006 à 12:43
21 avril 2005 à 15:41
20 avril 2005 à 19:33
'debut = FirstDayOfMonth(Now) & "/" & Month(Now) & "/" & Year(Now
'.ParameterFields.GetItemByName("datedeb").AddCurrentValue #12/8/2005#
'.ParameterFields.GetItemByName("datefin").AddCurrentValue #2/5/2003#
'.ParameterFields.GetItemByName("details").AddCurrentValue details
j'ai eu des erreurs sur ces lignes
16 juin 2004 à 14:30
je ne sais po trop ce qu'il ne va po mais essai d'ajouter toute les références concernant crystal report dans projet > références. Il t'en manque une.
16 juin 2004 à 14:22
j'ai inseré l'OCX de crystal dans le projet mais il me sort une erreur sur les ligne :
Dim appl As New CRAXDRT.Application
Dim rep As New CRAXDRT.Report
merci pour votre aide
27 févr. 2004 à 12:27
Quel .dll ou .ocx doit être ajoutés pour que l'exportation marche ? ça correspondant a quel composant VB ?
Merci.
25 févr. 2004 à 08:29
23 févr. 2004 à 13:10
Et quel composant faut-il ajouter dans le projet?
Merci !