Arabic characters issue in smtp email csv attachment

Question

Hi all,
the below email extracts the output of a query and sends it as an attachment in csv format.
but the arabic characters are coming as question marks in the attachment, can someone kindly help, below is hte code
procedure test   is
        smtp    UTL_SMTP.connection;
        reply   UTL_SMTP.reply;
                      csvContent      clob;---added
        procedure W( line varchar2 default null ) is
        begin
                UTL_SMTP.write_data(
                        smtp,
                        line || utl_tcp.CRLF
        end;
begin
        smtp := UTL_SMTP.open_connection('test.domain.com',25);
        --// IMPORTANT: specify the hostname of the plaform sending the mail!
        UTL_SMTP.helo( smtp,'test.domain.com');
        UTL_SMTP.mail( smtp,'[email protected]' );
       UTL_SMTP.rcpt( smtp,'[email protected]' );
        UTL_SMTP.open_data( smtp );
        --// mail header
        W( 'MIME-Version: 1.0' );
        W( 'Content-Type: multipart/mixed; boundary="----_=_NextPart_001_01C87DCB.CD85F300"');
        W( 'Subject: test' );
        W( 'From: test' );
        --// mail text body
        W();
        W( '------_=_NextPart_001_01C87DCB.CD85F300' );
        W( 'Content-Transfer-Encoding: 8bit' );
        W( 'Content-Type: text/plain' );
         W( 'Charset: AL32UTF8' );
         W();
        W( 'Dear All' );
        W();
        W( 'test' );
        W();
        --// mail attachment
        W();
        W( '------_=_NextPart_001_01C87DCB.CD85F300' );
        W( 'Content-Disposition: attachment; filename="test.csv"' );
        W( 'Content-Type: text/plain' );      
        W( 'Charset: AL32UTF8' );   
        W();
        W( 'EMPNO'||','||'ENAME       );
        for c in( SELECT EMPNO,ENAME FROM EMPLOYEES ) loop
                W( c.EMPNO||','||c.ENAME  );
        end loop;
        W( '------_=_NextPart_001_01C87DCB.CD85F300' );
        UTL_SMTP.close_data( smtp );
        UTL_SMTP.quit( smtp );
end;

Answer 1

thanks srini, i am using microsoft excel,
i think it is a character conversion issue, i had tested by sending the below message without charset=AL32UTF8 and arabic was displayed as junk, after giving the value of charset its working.
begin
utl_mail.send(
sender => '[email protected]',
recipients => '[email protected]',
subject => 'Subject',
message => 'إلاق فرع (ح',
mime_type => 'text; charset=AL32UTF8');
end;I think in the code i am not passing charset value correctly, can you kindly tell me where i can give the charset in the below code
procedure test   is
        smtp    UTL_SMTP.connection;
        reply   UTL_SMTP.reply;
                      csvContent      clob;---added
        procedure W( line varchar2 default null ) is
        begin
                UTL_SMTP.write_data(
                        smtp,
                        line || utl_tcp.CRLF
        end;
begin
        smtp := UTL_SMTP.open_connection('test.domain.com',25);
        --// IMPORTANT: specify the hostname of the plaform sending the mail!
        UTL_SMTP.helo( smtp,'test.domain.com');
        UTL_SMTP.mail( smtp,'[email protected]' );
       UTL_SMTP.rcpt( smtp,'[email protected]' );
        UTL_SMTP.open_data( smtp );
        --// mail header
        W( 'MIME-Version: 1.0' );
        W( 'Content-Type: multipart/mixed; boundary="----_=_NextPart_001_01C87DCB.CD85F300"');
        W( 'Subject: test' );
        W( 'From: test' );
        --// mail text body
        W();
        W( '------_=_NextPart_001_01C87DCB.CD85F300' );
        W( 'Content-Transfer-Encoding: 8bit' );
        W( 'Content-Type: text/plain' );
         W( 'Charset: AL32UTF8' );
         W();
        W( 'Dear All' );
        W();
        W( 'test' );
        W();
        --// mail attachment
        W();
        W( '------_=_NextPart_001_01C87DCB.CD85F300' );
        W( 'Content-Disposition: attachment; filename="test.csv"' );
        W( 'Content-Type: text/plain' );      
        W( 'Charset: AL32UTF8' );   
        W();
        W( 'EMPNO'||','||'ENAME       );
        for c in( SELECT EMPNO,ENAME FROM EMPLOYEES ) loop
                W( c.EMPNO||','||c.ENAME  );
        end loop;
        W( '------_=_NextPart_001_01C87DCB.CD85F300' );
        UTL_SMTP.close_data( smtp );
        UTL_SMTP.quit( smtp );
end;