HOW 2 SENDING SMS

السلام

اكيد مرت عليكم هالمشكلة من قبل

انا ابغى ارسل SMS تذكير بـــ APPOINTMENT بالضغط ع الــBUTTON

وبحثت الى وجدت الكود التالي

CREATE OR REPLACE PACKAGE SMS IS
 FUNCTION send(receiver_in IN VARCHAR2,
		sender_in   IN VARCHAR2,
	   text_in	IN VARCHAR2,
	   username   IN VARCHAR2,
	   password   IN VARCHAR2) RETURN VARCHAR2;

END SMS;
/
CREATE OR REPLACE PACKAGE BODY SMS AS
 FUNCTION send(receiver_in IN VARCHAR2,
		sender_in	 IN VARCHAR2,
	   text_in	IN VARCHAR2,
	   username   IN VARCHAR2,
	   password   IN VARCHAR2) RETURN VARCHAR2
 IS
	return_value VARCHAR2(10) := NULL;
  request	VARCHAR2(2000) := NULL;
  result	VARCHAR2(2000) := NULL;

 BEGIN
   BEGIN

  request := 'http://www.sendsms.com/send.asp?' ||
	  'mobile=' || receiver_in || '&' ||
	  'sender=' || sender_in || '&' ||
	  'msg=' || SUBSTR(text_in,1,160) || '&' ||
	  'username=' || username || '&' ||
	  'password=' || password;

  request := utl_url.escape(request);

  SELECT utl_http.request(request) INTO result FROM dual;

  IF SUBSTR(result,1,1) = '0' THEN
   return_value := 'OK';
  ELSE   
   return_value := 'FAIL';
  END IF;

   EXCEPTION
	 WHEN VALUE_ERROR
	 THEN
	   return_value := 'FAIL';
	 END;

   RETURN return_value;
 END send;



END SMS;
/

ولكنه ما مشى معاي

ارجو الافادة بليييييييييييييييييييييييز *-)