免费短信平台函数说明

Posted 2020-08-05

此短信平台，支持法国wavecom短信猫.有VB及DELPHI示例程序

 

错误说明
0 成功
-1 连接短信平台失败
-2 命令执行失败
-3 无可读短信

function ConnectToServer(aServerName, aLogID, aPass: pchar): integer; stdcall;
函数说明：
连接平台的后台数据库
参数说明：
aServerName 平台的后台数据库所在的服务器名称
aLogID 登陆数据库服务器所需的用户名
aPass 登陆数据库服务器所需的密码

function DisConnectToServer: integer; stdcall;
函数说明：
断开平台的后台数据库连接

function CreateIniDb: integer; stdcall;
函数说明：
初始化平台的后台数据库脚本

function SendASms(aPhone, aContent, aremark: pchar): integer; stdcall;
函数说明：
写短信到平台的后台数据库
参数说明：
aPhone 接收短信的人
aContent 短信的内容
aremark 备注

function ReadASms(var aPhone, aContent, aSendDateTime: pchar): integer; stdcall;
函数说明：
从平台的后台数据库中读取一条未读短信
参数说明：
aPhone 发送短信的人
aContent 短信的内容
aSendDateTime 短信发送的时间

function GetSmsParams(var SendSmsCnt, HaveNotSendCnt, ReciveSmsCnt,
HaveNotReadSmsCnt: integer): integer; stdcall;
函数说明：
得到平台的相关参数
参数说明：
SendSmsCnt 发件箱的总短信数
HaveNotSendCnt 未发的短信数量
ReciveSmsCnt 收件箱中已收到短信的数量
HaveNotReadSmsCnt 未读短信的数量