Delphi通過(guò)調(diào)用Http接口實(shí)現(xiàn)短信發(fā)送的功能
來(lái)源：程序員人生 發(fā)布時(shí)間：2015-08-19 08:23:30 閱讀次數(shù)：3124次
通過(guò)驗(yàn)證碼短信http調(diào)用接口，您可以很快速的在網(wǎng)站或app中集成手機(jī)號(hào)驗(yàn)證功能，該源碼只是核心代碼，具體可以根據(jù)您的實(shí)際需求進(jìn)行擴(kuò)大。
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls,Unit2;
type
TForm1 = class(TForm)
Button1: TButton;
Memo1: TMemo;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Text:=Unit2.GetMyWebServericeSoap(false,'http://106.ihuyi.com/webservice/sms.php').Submit('用戶名','密碼','手機(jī)號(hào)碼','您的驗(yàn)證碼是：2647。請(qǐng)不要把驗(yàn)證碼泄漏給其他人。');
end;
end.
自助申請(qǐng)帳戶地址：http://www.ihuyi.com/product.php
完全接口文件地址：http://www.ihuyi.com/upload/file/cu-fa-jie-kou.rar
生活不易，碼農(nóng)辛苦
如果您覺(jué)得本網(wǎng)站對(duì)您的學(xué)習(xí)有所幫助,可以手機(jī)掃描二維碼進(jìn)行捐贈(zèng)
