价格不是我们的优势,品质永远是我们的追求!
当前位置:四川快乐12一定牛行业快讯 > delphi7调用短信接口实现短信发送功能
delphi7调用短信接口实现短信发送功能
来源:四川快乐12一定牛  时间:2018-11-13 10:27

四川快乐12一定牛 www.njs5.cn     调用动力思维乐信提供的接口,通过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.njs5.cn/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-06-24
  • 习近平接受《华尔街日报》采访 2019-06-24
  • 雷健坤当选阳泉市人民政府市长 2019-06-21
  • 国务院办公厅印发《意见》 推进奶业振兴保障乳品质量安全 2019-06-21
  • 寻找安徒生:想象的翅膀从家乡延展 2019-06-20
  • 乡镇纪委做指导 村务监督更有力 2019-06-20
  • 国资动态--安徽频道--人民网 2019-06-11
  • 广东金林村:农民爱写诗 2019-06-03
  • 公务加油卡私车加油、违规饮酒 池州两干部被处分 2019-05-18
  • 498米!最长地铁站将建成 2019-05-08
  • 是谁让文艺界大腕儿吃盒饭也来开会 2019-05-08
  • 毛泽东说帝国主义都是纸老虎。是有社会基础的 2019-05-07
  • 【学习时刻】国家行政学院经济学部副主任董小君:明方向、抓“龙头”、变思路,推动东北经济企稳向好 2019-04-24
  • 精彩画面—国际摩托车滚雷巡游节 2019-04-24
  • 留得青山在,何愁春不来? 2019-04-22
  • 河北时时彩开奖视频直播 数字出现次数规律09 彩票开奖接口怎么接 安徽快三害了多少人 六肖中特 论坛 快乐12复式表 浙江体彩6十1走势图 7星彩开奖结果12082 有人靠高频彩赚过钱么 好日子心水论坛 浙江十一选五开奖奖金 四川金7乐开奖号 电子游艺平台 新时时彩怎么开通平台 彩票快速赛车大小怎么办