捐赠 | 广告 | 注册 | 发布 | 上传 | 关于我们    
  沪ICP备05001939号 DELPHI盒子 | 盒子论坛 | 盒子文章 | 盒子问答悬赏 | 最新更新 | 论坛检索 | 下载中心 | 高级搜索    
  精品专区 | 繁體中文 | 奖励公告栏 | 直通车账号登陆 | 关闭GOOGLE广告 | 临时留言    
盒子资源分类
全部展开 - 全部合拢
C转Delphi电信SMGP1.3/3.0 SMGP C 用户API开发包
关键字:电信短信协议 SmgpDll 用户API开发包
来 自:原创
平 台:Win9x,Win2k/XP/NT,Win2003 下载所需:0 火柴
深浅度:初级 完成时间:2007/1/9
发布者:hong9906 发布时间:2007/2/2
编辑器:DELPHI7 语  种:简体中文
分 类:网络 下载浏览:1/16042
加入到我的收藏
下载错误报错
登陆以后才能下载
 用户名:
 密 码:
自动登陆(30天有效)
无图片
电信SMGP1.3/3.0 SMGP C 用户API开发包,SmgpDll.dll自行在盒子下载.

我把他翻译成Delphi发到盒子上,让用Delphi的朋友们可以方便快捷的开发短信平台.

//**********
//**********honyet刀笑浪人2006.3**********
//电信SMGP1.3/3.0 SMGP C 用户API开发包 SmgpDll.dll 接口函数  C转Delphi
//**********
unit DllPorts;

interface

uses Windows,FMTBcd;

type
  PDeliverResp = ^TDeliverResp;  // packed
  TDeliverResp = packed Record
    //SmsgID: TBcd;
    SmsgID: array [1..11]of Char;   //短消息标识
    NmsgFormat:integer; //短消息格式(参照短消息格式代码表)。网关不做判定, 透明传输
    SsrcTermID:array [1..22]of char; //短消息发送用户号码
    NisReport,   //是否状态报告。代码含义:非状态报告0;是状态报告1
    NmsgLen:integer;   //消息长度
    sMsgContent:array [1..201]of char; //消息内容(若消息为状态报告则为状态报告内容)
    sDestTermID:array [1..21]of char; // CP的接入代码
    sRecvTime:array [1..15]of char;  //短消息接收时间
  end;

function InitSMGPAPI(pIniFile: string):DWORD; stdcall;external 'SmgpDll.dll';

function SMGPSendSingle( nNeedReport, //是否要求返回状态报告(0=不要求,1=要求)
      nMsgLevel: integer;  //优先级别,(0-9,0表示最低优先级)
      sServiceID: PChar;  //业务类型
      nMsgFormat: integer;    //短消息格式(参照附录短消息格式表)网关不做判定, 透明传输
        sFeeType,  //资费类别,参照附录短消息参数表
      sFeeCode,  //资费代码(以分为单位)
      sFixedFee,  //包月费/封顶费(以分为单位)
      sValidTime,  //存活有效期,格式遵循SMPP3.3协议
      sAtTime,  //定时发送时间,格式遵循SMPP3.3协议
      sChargeTermID, //计费号码
      sDestTermID: PChar; //短消息接收号码
      nMsgLen:integer;     //消息长度
      sMsgContent: PChar;  //短消息内容(nMsgLen=0时表示存放短消息的文件名)
      out sMsgID: string;    // PChar;返回的短消息标识
      //out sMsgID: TBcd;    //返回的短消息标识
      out pnErrorCode:int64; //错误代码(参照附录错误代码表)
      nMsgType: integer;  //短消息类型,参照附录短消息参数表
      sSrcTermID: PChar):DWORD; stdcall;external 'SmgpDll.dll';  //短消息发送号码。

function SMGPDeliver(nTimeout:integer;out DeliverResp: TDeliverResp):Dword;stdcall;external 'SmgpDll.dll';

function CMPPActiveTest(dwRetry:integer):integer;stdcall;external 'SmgpDll.dll';

function SMGPDisconnect():integer;stdcall;external 'SmgpDll.dll';

implementation

end.

如果翻译不正确,请高手们多多指点,由于商业机密问题,程序我就不发了,很容易,大家写写吧.
Google
 
本站原创作品,未经作者许可,严禁任何方式转载;转载作品,如果侵犯了您的权益,请联系我们
龙脉加密锁 15元起 Grid++Report 报表 申请支付@网
 相关文章
C转Delphi电信SMGP1.3/3.0 SMGP C 用户API开…
hong9906 2007/2/2 下+1/浏+16043 评+6
电信短信网关平台 v3.0
endo 2006/9/5 下+7065/浏+20990 评+10
任我赢公布的SGIP网关
myso 2006/8/31 下+1511/浏+12650 评+11
联通短信网关控件及演示
huiww 2006/8/2 下+1825/浏+14894 评+11
CNRENWY承诺公布的网关代码
myso 2006/1/5 下+1991/浏+12393 评+8
华为cmpp协议短信网关Delphi源码
mantousoft 2004/1/26 下+3149/浏+21047 评+8
相关评论
共有评论6条 当前显示最后6条评论
loner_meme 2008/10/11 16:23:01
请教大哥,用这个电信提供的API函数,就能开发短信收发程序吗?
收费吗?如何收费?
hong9906 2008/10/29 15:35:16
收费不收费就看电信局收不收你的费了
这只是他们提供DLL的一个接口
lwstar 2010/4/27 16:05:09
下载不到DLL啊!大哥
live100 2013/6/12 12:24:05
我有的最新源码,我花800块买的,谁要,我可送的
changhui_china 2014/4/3 10:01:46
请问,
SMGPDLL.DLL文件谁能发来一份啊
我的联系方式是 112411334@qq.com

会员 live100  能联系我吗?
gz818 2015/4/14 17:57:36
会员 live100 能送我最新源码吗?
我要发表评论 查看全部评论
 
  DELPHI盒子版权所有 1999-2023 V4.01 粤ICP备10103342号-1 更新RSS列表