Απ: Procedure στον SQL Server για αποστολή Mail

nsouflis — Wed, 25 Oct 2006 23:49:16 GMT

Χρησιμοποιώντας την παρακάτω procedure μπορείτε να βάλετε και attachment στο mail . προσοχή το path του attachment είναι relative του sqlserver σας
.

SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO

CREATE procedure sp_sendmailwithattchment
@from varchar(500) ,
@to varchar(500) ,
@subject varchar(500),
@body varchar(4000) ,
@smtpserver varchar(25),
@bodytype varchar(10) ,
@attach varchar(100)
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,
'configuration.fields("http://schemas.microsoft.com/cdo/configuration/sendusing").value','2'

exec @hr = sp_oasetproperty @imsg,
'configuration.fields("http://schemas.microsoft.com/cdo/configuration/smtpserver").value',
@smtpserver

exec @hr = sp_oamethod @imsg, 'configuration.fields.update', null
exec @hr = sp_oasetproperty @imsg, 'to', @to
exec @hr = sp_oasetproperty @imsg, 'from', @from
exec @hr = sp_oasetproperty @imsg, 'subject', @subject
--exec @hr = sp_oasetproperty @imsg, 'AddAttachment', @attach

exec @hr = sp_OAMethod @imsg, 'AddAttachment',null, @Attach
-- if you are using html e-mail, use 'htmlbody' instead of 'textbody'.

exec @hr = sp_oasetproperty @imsg, @bodytype, @body
exec @hr = sp_oamethod @imsg, 'send', null

-- sample error handling.
if @hr <>0
select @hr
begin
exec @hr = sp_oageterrorinfo null, @source out, @description out
if @hr = 0
begin
select @output = ' source: ' + @source
print @output
select @output = ' description: ' + @description
print @output
end
else
begin
print ' sp_oageterrorinfo failed.'
return
end
end
exec @hr = sp_oadestroy @imsg

GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

Απ: Procedure στον SQL Server για αποστολή Mail

imanos — Thu, 26 Oct 2006 15:41:24 GMT

Νίκο ευχαριστώ που συμπλήρωσες την procedure αν και ήταν κάτι που ήθελα να κάνω σέ άλλο post.