Francis A
30 de Octubre del 2007

Hola! necesito saber como puedo enviar correos electronicos en sql server sin usar sql mail

Dabiz
30 de Octubre del 2007

Hola, prueba con esto. Tienes que tener ASP Mail instalado en el servidor.

CREATE PROCEDURE EnvioCorreo
@DireccionRemitente varchar(100),
@DireccionDestinatario varchar(100),
@Asunto varchar(200),
@Mensaje varchar(8000)
AS
BEGIN
SET NOCOUNT ON

DECLARE
@ObjCorreo integer, -- Referencia a objeto
@CodigoRes integer,
@SMTPHost varchar(200)

EXEC @CodigoRes = sp_OACreate \'Persits.MailSender\', @ObjCorreo OUTPUT

-- Si el objeto está disponible, procede al envío
IF @CodigoRes = 0
BEGIN
SELECT @SMTPHost = MailHost
FROM Sistema

EXEC @CodigoRes = sp_OASetProperty @ObjCorreo, \'Host\', @SMTPHost
EXEC @CodigoRes = sp_OASetProperty @ObjCorreo, \'FromName\', \'SGCOL\'
EXEC @CodigoRes = sp_OASetProperty @ObjCorreo, \'From\', @DireccionRemitente

EXEC @CodigoRes = sp_OAMethod @ObjCorreo, \'AddAddress\', NULL, @DireccionDestinatario
EXEC @CodigoRes = sp_OASetProperty @ObjCorreo, \'Subject\', @Asunto
EXEC @CodigoRes = sp_OASetProperty @ObjCorreo, \'Body\', @Mensaje

EXEC @CodigoRes = sp_OAMethod @ObjCorreo, \'Send\', NULL

EXEC sp_OADestroy @ObjCorreo
END

SET NOCOUNT OFF
END

Francis A
30 de Octubre del 2007

Hola! perodona el abuso! pero no hay otra opcion? lo que pasa es que tengo problemas con el servidor