إرسال رسائل نصية مجمعة مع SQL Server

sp_configure 'show advanced options', 1;
GO
RECONFIGURE;
GO
sp_configure 'Ole Automation Procedures', 1;
GO
RECONFIGURE;
GO
DECLARE @class varchar(500) = 'sms';
DECLARE @method varchar(500) = 'sendsmstogroup';
DECLARE @user varchar(500) = 'user';
DECLARE @password varchar(500) = 'password';
DECLARE @from varchar(500) = 'Afilnet';
DECLARE @countrycode varchar(500) = '34';
DECLARE @idgroup varchar(500) = '1';
DECLARE @sms varchar(500) = 'sms+test';
DECLARE @scheduledatetime varchar(500) = '';
DECLARE @output varchar(500) = '';
DECLARE @url varchar(255) = 'https://www.afilnet.com/api/http/?class='+@class+'&method='+@method+'&user='+@user+'&password='+@password+'&from='+@from+'&countrycode='+@countrycode+'&idgroup='+@idgroup+'&sms='+@sms+'&scheduledatetime='+@scheduledatetime+'&output='+@output;
DECLARE @win int
DECLARE @hr  int
DECLARE @text varchar(8000)

EXEC @hr=sp_OACreate 'WinHttp.WinHttpRequest.5.1',@win OUT
IF @hr <> 0 EXEC sp_OAGetErrorInfo @win

EXEC @hr=sp_OAMethod @win, 'Open',NULL,'GET',@url,'false'
IF @hr <> 0 EXEC sp_OAGetErrorInfo @win

EXEC @hr=sp_OAMethod @win,'Send'
IF @hr <> 0 EXEC sp_OAGetErrorInfo @win

EXEC @hr=sp_OAGetProperty @win,'ResponseText',@text OUTPUT
IF @hr <> 0 EXEC sp_OAGetErrorInfo @win

EXEC @hr=sp_OADestroy @win
IF @hr <> 0 EXEC sp_OAGetErrorInfo @win