Need to send attachments in the email

Question

Hi,
I'm trying to write lines in a file. Not all of my lines are not written into the file.
So I'm writing line by line into the file whcih its failed at say 350lines. after that its no more writing the data.
Please anybody let me know how i can write my data into a file (say 2GB) and send the same as an attachment in the mail.
Thanks in Advance.
[email protected]
Here is the sample code which i'm using
Declare
Cursor C1 is
Select * from my_table;
line1     Varchar2(32767);
heading1     Varchar2(32767);
end_of_line     Varchar2(32767);
fileHandler     UTL_FILE.FILE_TYPE;
file_name     VarChar2(100);
po_err_msg varchar2(1000);
Begin
--Open a file in my logical dir 'TEST_UTIL_DIR' for Write
     Select lpad(my_File_Seq.nextval,10,'0')||'.html' into file_name from dual;
     fileHandler     := UTL_FILE.FOPEN('TEST_UTIL_DIR', file_name, 'W');
     line1     := '<table border="1">';
--Writing first line
     Utl_File.Put_Line(fileHandler,line1,False);
     heading1 := '<tr><td><b>'||'Emp No'||'</b></td><td><b>'||'Employee Name'||'</b></td><td><b>'||'Age'||
'</b></td><td><b>'||'Gender'||'</b></td><td><b>'||'Relation'||'</b></td></tr>';
--writing second line
     Utl_File.Put_Line(fileHandler,heading1 ,False);
     For i in C1
     Loop
          Begin
               heading2      := '<tr><td>'||rpad(i.Emp_no,6,' ')||'</td><td>'||rpad(i.Emp_name,30,' ')||'</td><td>'||
               rpad(i.Age,5,' ')||'</td><td>'||rpad(i.Gender,3,' ')||'</td><td>'||rpad(i.Relation,8,' ')||'</td></tr>';
--in the loop
--for each record
--writing each record in the file
          Utl_File.Put_Line(fileHandler,heading2,False);
     Exception
          When Others Then
          Print(sqlerrm);
          End;
     End Loop;
     end_of_line     := '</table>';
     Utl_File.Put_Line(fileHandler,end_of_line,False);
     utl_file.fflush(fileHandler);
     UTL_FILE.FCLOSE(fileHandler);
--sending the file as an attachment.
demo_mail.send_email(
     P_DIRECTORY     =>'TEST_UTIL_DIR',
     P_SENDER     => 'From_user@my_Company.com',
     P_RECIPIENT     => 'to_user@my_Company.com',
     P_CC          => 'cc_user@my_Company.com',
     P_BCC          => 'bcc_user@my_Company.com',
     P_SUBJECT     => 'Testing in Development',
     P_BODY          => 'Please find the following attachments.',
     P_ATTACHMENT1     => file_name,
     P_ATTACHMENT2     => null,
     P_ATTACHMENT3     => null,
     P_ATTACHMENT4     => null,
     P_ERROR          => po_err_msg);
Exception
When others then
Print(sqlerrm);
End;
/

Answer 1

Numerous threads regarding this issue:
http://forums.oracle.com/forums/search.jspa?threadID=&q=attachments+in+the+email&objID=f75&dateRange=lastyear&userID=&numResults=15
Greetings...
Sim