• 燕赵晚报:“共享车位”是停车资源的“公约数” 2019-10-20
  • 京东18.3亿底价再拿北京亦庄地块 竞买条件较为苛刻 2019-10-17
  • 专注声乐培训 CZ昕格音乐基地为热爱音乐的你而生 2019-10-17
  • 提供南水北调七成中线水 陕西一江清水送北京 2019-10-10
  • 你的声音,说一句话就能被克隆 2019-10-08
  • 她主动借腹给我生儿子,中途又移情别恋 有故事的人 2019-10-07
  • 候选企业:安徽古井集团 2019-10-06
  • 智能手机冲击大 数码相机不服输 2019-10-06
  • 工信部:我国4G用户达10.6亿户 宽带提速效果显著 2019-10-01
  • 一条塔里木河 串起南疆各色景致与无限风光 2019-10-01
  • 消防车进商场——“小小消防员”的消防安全乐体验 2019-09-27
  • 《游侠索罗》:票房失意之作的连锁反应 2019-09-27
  • 万物互联开启智慧新图景 下一代互联网未来已来 2019-09-27
  • 朔州市人大常委会任免名单 2019-09-27
  • 置业指南:盘点沙坪坝在售楼盘 2019-09-26
  • 价格不是我们的优势,品质永远是我们的追求!
    当前位置:北京11选五和值走势图行业快讯 > delphi7调用短信接口实现短信发送功能
    delphi7调用短信接口实现短信发送功能
    来源:北京11选五和值走势图  时间:2018-11-13 10:27

    北京11选五和值走势图 www.tqjw.net     调用动力思维乐信提供的接口,通过post方式进行提交,用asp开发语言实现发送短信功能,以下为asp调用乐信短信接口代码:

    procedure btnSendSmsClick(Sender: TObject);
    var
      ParamLst: TStrings;
      ReMsg: WideString;
    begin
      btnSendSms.Enabled := False;
      Screen.Cursor := crHourGlass;
      ParamLst := TStringList.Create;
      try
    	
    	if Trim(edtTel.Text) = EmptyStr then Exit;
    	if Trim(mmoSmsCon.Text) = EmptyStr then Exit;
    					
    	begin
    	ParamLst.Add('accName=' + Trim(edtUserName.Text));
    	ParamLst.Add('accPwd=' + md5(edtPassword.Text));
    	ParamLst.Add('content=' + Trim(mmoSmsCon.Text));
    	ParamLst.Add('aimcodes=' + Trim(edtTel.Text));
    	ParamLst.Add('dataType' + 'string');
    					
    	ReMsg := UTF8Decode(IdHTTP.Post('//www.tqjw.net/sdk/send', ParamLst));
    					
    	mmoDisplay.Lines.Add('错误代码:' + ReMsg);
    					
    	IdHTTP.Disconnect;
    	IdHTTP.Request.Clear;
    					
    	edtTel.Clear;
    	mmoSmsCon.Clear;
    	end
      finally
    	btnSendSms.Enabled := True;
    	Screen.Cursor := crDefault;
    	ParamLst.Free;
      end;
    end;

       相关阅读:

        php短信接口代码示例

        java短信接口代码示例

        C#短信接口代码示例

        asp短信接口代码示例

  • 燕赵晚报:“共享车位”是停车资源的“公约数” 2019-10-20
  • 京东18.3亿底价再拿北京亦庄地块 竞买条件较为苛刻 2019-10-17
  • 专注声乐培训 CZ昕格音乐基地为热爱音乐的你而生 2019-10-17
  • 提供南水北调七成中线水 陕西一江清水送北京 2019-10-10
  • 你的声音,说一句话就能被克隆 2019-10-08
  • 她主动借腹给我生儿子,中途又移情别恋 有故事的人 2019-10-07
  • 候选企业:安徽古井集团 2019-10-06
  • 智能手机冲击大 数码相机不服输 2019-10-06
  • 工信部:我国4G用户达10.6亿户 宽带提速效果显著 2019-10-01
  • 一条塔里木河 串起南疆各色景致与无限风光 2019-10-01
  • 消防车进商场——“小小消防员”的消防安全乐体验 2019-09-27
  • 《游侠索罗》:票房失意之作的连锁反应 2019-09-27
  • 万物互联开启智慧新图景 下一代互联网未来已来 2019-09-27
  • 朔州市人大常委会任免名单 2019-09-27
  • 置业指南:盘点沙坪坝在售楼盘 2019-09-26
  • 3d走势图带连线专业版 西甲比赛用球 河北十一选五今日走势 快乐彩12 福建快三遗漏一定牛 快三豹子规律 黑马人工计划软件下载 江苏e球彩开奖数据 规律一肖中特 福彩3d开奖号码 湖北快3个位走势图 天津快乐10分走势 贵州篮球场地 2018三亚建赌场 赛马会彩票官方下载