吉信通（融合通信）短信开发包

注意引用 uses comobj //_________________________________HTTP通信函数返回信息 function HTTPwebservice(url:string):string; var responseText: WideString; xmlHttp: OLEVariant; begin try xmlHttp:=CreateOleObject('Msxml2.XMLHTTP'); xmlHttp.open('GET',url,false); xmlHttp.send(); responseText:=xmlHttp.responseText; if xmlHttp.status='200' then begin HTTPwebservice:=responseText; end; xmlHttp := Unassigned; except exit; end; end; //______________________________ //使用时调用即可 bdata:=HTTPwebservice('http://service.winic.org/sys_port/gateway/?id='+uid.Text+'&pwd='+pwd.Text+'&to='+mobstr+'&content='+content.Text+'&time='); =================================================== 发短信公共接口 http://service.winic.org/sys_port/gateway/?id=[id]&pwd=[pwd]&to=[to]&content=[countent]&time=[time] [id]=用户名称 [pwd]=用户密码 [to]=接收手机号(100个以内) 以 , 号分隔 [countent]=短信内容 70个字符 [time]=定时发