请教关于手机与delphi的接口问题!(在线等待......) (50分)

  • 主题发起人 主题发起人 l_lei_ly
  • 开始时间 开始时间
L

l_lei_ly

Unregistered / Unconfirmed
GUEST, unregistred user!
请问有没有手机与delphi的接口程序(如dll等),怎么才能从手机中把信息读出来??
 
各位富翁们,你们知道这个内容吗,请进来讨论讨论呀!
 
只能找厂家
 
还有没有哪位富翁知道呀,小弟很急的!
 
我这有一个,不知可不可以,不过你可以试一下,给我你的email
 
lost-planet@163.net
多谢
 
我自己作了个串口的监视的串口线,可以监视计算机与手机(T39mc)的数据交换。
 
是吗?我的email是l_lei_ly@sina.com
多谢!
 
dll库的说明都在这了试试用吧
邮件也发了
好运
关于new dll库的说明
本DLL库是用类的方式写出来的。他支持中/英文发送,提供VC等语言的接口,并完全支持消息触发模式。
项 目 发送部分SMS 接受方SMSR
NUMBER 对方手机号 发送方手机号
MESSAGE 短消息内容 短消息内容
EN TRUE 表示英文 表示英文
FALSE 表示中文 表示中文
TIME 短消息发送时间
WAITTIME 等待时间(返回OK)
MINDEX 设置接收第几条信息
OK TRUE 成功
FALSE 失败 无消息
SENDPRO 发送
RECPRO 接收
FLAG TRUE 执行完毕
FLASE 未执行完毕
CENTER 短消息中心号码 短消息中心号码
COMMOPEN 打开串口
CSQ 查询手机信号
MCOMMPORT 串口号码
MCOMMREV 接收消息触发
MCOMMTYPE 串口类型
MDELALL 完全删除短信
MDELETE 删除短信
MRSET 发送消息触发模式
MSET 系统更新(参数设置)
MSTATUS 是否在过程
WAITTIME 等待时间

本软件调用的参数如下:


详细调用说明:
Public mindex As Integer '接收的消息号
Public Number As String '手机号码
Public en As Boolean ' 中/英 文设定
Public time As String ' 时间
'Public val As Integer '
Public ok As Boolean '发送结果
Public Message As String '消息内容
Public center As String '中心号码
Public flag As Boolean '接受完成
Public waitTime As Integer '等待时间参数
Public mcommtype As Boolean ' 串口类型 false = '9600',true =19200
Public commopen As Boolean '串口打开否?
Public mcommport As Integer '串口号码
Public mcommrev As Boolean '接收消息触发
Public mdelete As Boolean '接收后是否删除
Public mstatus As Boolean '是否在过程中
'是否接收完毕
Public Event mreceieved(mgetmes As String, mgetnum As String, mgetcenter As String, mgettim As String)
'是否发送完毕
Public Event msend(data As String)
'信号接受完毕
Public Event msignal(data As String)
'
'Public Event delerror(mindex As Integer)
'收到消息机制的短消息
Public Event MCMTI(data As String)
'串口事件
Public Event mevmsg(data As String)
'串口错误
Public Event mermsg(data As String)
'删完短信
Public Event mdelmsg(data As String)

Public msignal As String
'参数设置过程
Public Function mset()
mstatus = True
MSComm1.CommPort = mcommport '设置端口号
If mcommtype = False Then
MSComm1.Settings = "9600,n,8,1" '设置端口速度
Sleep (20)
Else
MSComm1.Settings = "19200,n,8,1" '设置端口速度SEIMENS
Sleep (20)
End If
mstatus = False
End Function
Public Function mrset() '//进入消息触发模式
Public Function mdelall() '完全删除短信

Public Function csq() '查询手机信号
Public Function Sendpro() '发送过程

Function recpro() '接收过程
 
to zjh0910
谢谢你了,但是邮件没有收到,麻烦再发一遍
 
我们封装的dll可以支持最多256个串口后台接收短信,
动态分配流量,支持收发各1024个缓存,
 
刚才又发了一次,
您再试试
 
我也要,随便哪种手机都行吧?

Mailto: Delphi.com@163.com
 
我也想看看!!
麻烦你了!!
chmijun@sina.com.cn
 
也能给我吗?我也出100分 shermanxie@163.com
 
我也想看看!!
yanghai0437@sina.com
 
我也要!
adventure_king@163.com
 
给兄弟们一个帮朋友写的通过串口接收和发送手机短信的辕马,在Nokia 6150上完全测试过,
请你发个email给我,email:q_l@163.net
 
我也要一个,研究一下,麻烦了
haowave@21cn.com
 
我最近也在写这类软件,能否也给我一个
jacksoft@163.com
 
后退
顶部