9号彩票

短信猫VC例程

更新:2018-1-23 10:53:20点击:
  • 品牌:博通
  • 型号:vc
  • 市场价:
  • 优惠价:购买设备免费提供 元 (已有 0 人购买)
  • 在线订购
产品介绍

      了解详情可联系客服或到下载中心下载

GSM MODEM 开发库使用手册
开发包文件:
Mysms.dll(Release 版)
Mysms.lib(Release 版)
开发包版本:
5.0.0.0
开发环境:
MS VC 6.0
Windows9.x/2000/NT
使用环境:
VC、VB、Jave、Delphi 等
开发包流程示意图
VC 开发说明:
// 需要添加以下代码连接短信息开发库
#pragma comment(lib,"Mysms.lib")
_declspec(dllexport) BOOL _stdcall InitModem(int comport, int baud);
_declspec(dllexport) BOOL _stdcall SendSms(int comport, int baud, char* sMessage, char*
sSendTo, BOOL bEnglishSm, BOOL bAlertSm, BOOL bSR);
_declspec(dllexport) BOOL _stdcall ReadSms(int comport, int baud, int nIndex, char* sMessage,
char* sFrom, char* sTime, BOOL bDel);
-2-
_declspec(dllexport) BOOL _stdcall Dail(int comport, int baud, char* sTo, char* sFile);
_declspec(dllexport) BOOL _stdcall HangUp(int comport, int baud);
_declspec(dllexport) BOOL _stdcall SendAtCommand(int comport, int baud, char* sCmd, char*
sEcho, int nLen);
_declspec(dllexport) BOOL _stdcall SendWapPush(int comport, int baud, char* strMessage, char*
strUrl, char* strSendTo);
初始化设备
//初始化设备
InitModem(端口号,波特率);
发送信息
SendSms(端口号,波特率,内容,对方号码,英文信息,免提信息,状态报告);
SendSms(3, 115200, "hi", "86139*******", FALSE, FALSE))
英文信息可容纳160 个英文字母,但不能发送中文。若要发送免提信息,则不能使用英文信
息标志。
读取信息
ReadSms(int 端口号, int 波特率, int 信息编号, char* 短信内容, char* 对方号码, char* 接受
时间BOOL 读取后是否删除)
信息编号一般取值范围1-25,一般应用可轮询前5 条(信息编码1-5)信息即可
振铃
Dail(int 端口, int 波特率, char* 对方号码, char * 音频文件)
挂机
HangUp(int 端口, int 波特率)
发送AT 指令
SendAtCommand(int 端口,int 波特率,char * AT 指令, char * 返回字符缓冲区, int 缓冲区
长度)
发送WapPush
SendWapPush(int comport, int baud, char* strMessage, char* strUrl, char* strSendTo)
发布:
确保Mysms.dll 发布在系统目录或者当前目录
VB 代码片断:
Private Declare Function InitModem Lib "Mysms.dll" (ByVal comport As Long, ByVal Baud As
Long) As Boolean
Private Declare Function SendSms Lib "Mysms.dll" (ByVal comport As Long, ByVal Baud As
Long, ByVal sMessage As String, ByVal sTo As String, ByVal bEnglish As Boolean, ByVal bAlert
As Boolean, ByVal bSr As Boolean) As Boolean
-3-
Private Declare Function ReadSms Lib "Mysms.dll" (ByVal comport As Long, ByVal Baud As
Long, ByVal Index As Long, ByVal sMessage As String, ByVal sFrom As String, ByVal bDel As
Boolean) As Boolean
Private Sub Reader_Click()
Dim Port
Dim Baud
Dim iIndex
Dim Result
Dim sMessage As String * 255
Dim sFrom As String * 255
Port = 1
Baud = 115200
iIndex = 3
Result = ReadSms(Port, Baud, iIndex, sMessage, sFrom, False)
MsgBox (sMessage)
End Sub
Private Sub SENDER_Click()
Dim Port
Dim Baud
Dim Result
Port = 1
Baud = 115200
Result = InitModem(Port, Baud)
Result = SendSms(Port, Baud, "你好, VB 调用有DLL 测试", "13651478222", False, False, False)
End Sub
要点:
1、 InitModem 函数用来监测和初始化GSM/GPRS MODEM 设备,使之处于正确的工作状
态,用户设计程序时在程序初始化时调用此函数检测和初始化设备即可。
2、 串口和GSM/GPRS 设备是串行设备,用户再多线程/进程中不能同时对一个GSM/GPRS
设备进行操作,必须使用互斥元或者临界点对GSM/GPRS 设备访问。
3、 本开发库使用Block(阻塞)操作模式,用户设计程序时一般须将收发信息函数调用放
入专门的工作线程/进程。
4、 Char * 字符缓冲区的使用。本开发库多处使用char * 字符缓冲区,用户在调用函数时
需为字符缓冲分配号空间,并清零初始化和赋值。例如:调用SendSms 函数中需要char
* sTo 作为参数之一,则用户需要首先为sTo 申请足够大的字符空间,然后为sTo 字符串
赋值,并将sTo 缓冲区的指针作为参数带入SendSms 函数。

更多产品
友情链接:丰亿彩票  必发彩票  葡京彩票  金福彩票  永利彩票  

免责声明: 本站资料及图片来源互联网文章,本网不承担任何由内容信息所引起的争议和法律责任。所有作品版权归原创作者所有,与本站立场无关,如用户分享不慎侵犯了您的权益,请联系我们告知,我们将做删除处理!