Bonjour

Informations diverses :
Version : Oracle Database 10g Enterprise Edition Release 10.2.0.1.0 - Production
Os Poste client: Winxp
Os Poste serveur: Win2003 server
Schema : system


Le code ci-dessous fonctionne parfaitement sauf que lorsque je clique sur le fichier attaché (coté récepteur) j'obtiens une boite de dialogue pour selectionner un fichier excel,donc pas de fichier "excel.csv" a ouvrir ou à enregistrer bienque j'ai en attachement une trombone "excel.csv".

comment modifier le code pour :

1- Avoir le fichier excel.csv contenant des données (issu de c:\dir)
2- spécifier plusieurs fichiers attachés

Merci pour votre aide.


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
 
DECLARE
   v_From       VARCHAR2(80) := 'sender@yahoo.fr';
   v_Recipient  VARCHAR2(80) := 'recipeint@hotmail.com';
   v_Subject    VARCHAR2(80) := 'test subject';
   v_Mail_Host  VARCHAR2(30) := 'smtp.societe.fr';
   v_Mail_Conn  utl_smtp.Connection;
   crlf         VARCHAR2(2)  := chr(13)||chr(10);
BEGIN
  v_Mail_Conn := utl_smtp.Open_Connection(v_Mail_Host, 25);
 
  utl_smtp.Helo(v_Mail_Conn, v_Mail_Host);
 
  utl_smtp.Mail(v_Mail_Conn, v_From);
 
  utl_smtp.Rcpt(v_Mail_Conn, v_Recipient);
 
  utl_smtp.Data(v_Mail_Conn,
    'Date: '   || to_char(sysdate, 'Dy, DD Mon YYYY hh24:mi:ss') || crlf ||
    'From: '   || v_From || crlf ||
    'Subject: '|| v_Subject || crlf ||
    'To: '     || v_Recipient || crlf ||
 
    'MIME-Version: 1.0'|| crlf ||	-- Use MIME mail standard
    'Content-Type: multipart/mixed;'|| crlf ||
    ' boundary="-----SECBOUND"'|| crlf ||
    crlf ||
 
    '-------SECBOUND'|| crlf ||
    'Content-Type: text/plain;'|| crlf ||
    'Content-Transfer_Encoding: 7bit'|| crlf ||
    crlf ||
    'some message text'|| crlf ||	-- Message body
    'more message text'|| crlf ||
    crlf ||
 
    '-------SECBOUND'|| crlf ||
    'Content-Type: text/plain;'|| crlf ||
    ' name="excel.csv"'|| crlf ||
    'Content-Transfer_Encoding: 8bit'|| crlf ||
    'Content-Disposition: attachment;'|| crlf ||
    ' filename="excel.csv"'|| crlf ||
    crlf ||
    'CSV,file,attachement'|| crlf ||	-- Content of attachment
    crlf ||
 
    '-------SECBOUND--'			-- End MIME mail
  );
 
  utl_smtp.Quit(v_mail_conn);
EXCEPTION
  WHEN utl_smtp.Transient_Error OR utl_smtp.Permanent_Error then
    raise_application_error(-20000, 'Unable to send mail: '||sqlerrm);
END;
/
J'ai crée un dircetory :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
create or replace directory dir as 'c:/dir';
J'ai crée fichier excel.csv dans c:\dir

Ou dois-je mettre le chemin "c:\dir\excel.xls" dans le code pour prendre en compte mon fichier excel.csv dans l'attachement?

J'ai fait des essais, mais ca ne marche pas