[À§·Î]

<CDO ¸¦ »ç¿ëÇÑ ¸ÞÀÏ ¹ß¼Û Á¤º¸ >

/*

EXEC dbo.pSendMail 'cskwak@interpark.com', 'cskwak@interpark.com','Á¦¸ñ','³»¿ë'
*/

alter PROCEDURE [dbo].[pSendMail]
@From varchar(100) ,
@To varchar(100) ,
@Subject varchar(100)=" ",
@Body varchar(4000) =" "
as
Declare @iMsg int
Declare @hr int
Declare @source varchar(255)
Declare @description varchar(500)
Declare @output varchar(1000)

EXEC @hr = sp_OACreate 'CDO.Message', @iMsg OUT
EXEC @hr = sp_OASetProperty @iMsg, 'To', 'cskwak@interpark.com'
EXEC @hr = sp_OASetProperty @iMsg, 'From', 'cskwak@interpark.com'
EXEC @hr = sp_OASetProperty @iMsg, 'Subject', 'TEST'
EXEC @hr = sp_OASetProperty @iMsg, 'TextBody', 'TEST1'
EXEC @hr = sp_OAMethod @iMsg, 'Send', NULL

IF @hr <>0
begin
select 'No' AS Result
end

else
begin
select 'OK' AS Result
end