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

新疆时时彩购彩 www.gnouw.com.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.gnouw.com.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-18
  • 乌鲁木齐一老人西湖边落水 5位小伙出手相救 2019-06-18
  • 《鼻子说》第13期:不同鼻涕不同病? 2019-06-18
  • 机场高速收费之争 春城壹网 七彩云南 一网天下 2019-06-17
  • 张颐武:让“古今中西”融会贯通 2019-06-17
  • 《大陆桥》杂志俄文版 2019-06-17
  • 人们想怎么话就怎么活,这就是所谓的“自由”吧。[微笑][微笑] 2019-06-16
  • 赵俊杰:G7不会轻易走向解体 2019-06-16
  • 凯恩率“三狮军团”艰难战胜突尼斯 2019-06-16
  • 人民日报驻美记者高石:美国急于将空袭打造为特朗普政府政绩 2019-06-15
  • “奥运新秀”亮相上海 亚帆联杯等你来看 2019-06-15
  • 美国又打出2000亿关税牌,中方这300字声明暗藏玄机! 2019-06-14
  • 日本卫生间竟然如此牛逼?!看完只能给满分了! 2019-06-14
  • 2018年两会第四场“部长通道” 2019-06-13
  • 让人才如“夏花般灿烂” 2019-06-13
  • 887| 517| 986| 717| 411| 230| 237| 373| 368| 728|