| how to send email through Form 6i using oracle 8.1.5 as backend [message #85799] |
Thu, 29 July 2004 20:52  |
Ritesh
Messages: 38
Registered: November 2001
|
Member |
|
|
hello friends
i wants to send email through forms 6i.
i am writing the following code on when-button-pressed trigger. it is running fine but don't send any mail to destination.
Please give any solution.
********My Code is********
DECLARE
objOutlook OLE2.OBJ_TYPE;
objMail OLE2.OBJ_TYPE;
objArg OLE2.LIST_TYPE;
BEGIN
objOutlook := OLE2.CREATE_OBJ('Outlook.Application');
objarg := OLE2.CREATE_ARGLIST;
OLE2.ADD_ARG(objarg,0);
objMail := OLE2.INVOKE_OBJ(objOutlook,'CreateItem',objarg);
OLE2.DESTROY_ARGLIST(objarg);
OLE2.SET_PROPERTY(objmail,'To',:TO);
OLE2.SET_PROPERTY(objmail,'Subject',:SUBJECT);
OLE2.SET_PROPERTY(objmail,'Body',:BODY);
OLE2.INVOKE(objmail,'Send');
OLE2.INVOKE(objmail,'Display');
OLE2.RELEASE_OBJ(objmail);
OLE2.RELEASE_OBJ(objOutlook);
Message('Your mail sent successfully..............');
Message('Your mail sent successfully..............');
END;
i have also written a procedure using SMTP but it is giving an error, since oracle 8.1.5 does not support SMTP.
|
|
|
|
|
|
] 
Blog
Search
Help
Members
Register
Login
Home
