西门子手机发短信的问题!(100分等着你)(100分)

  • 主题发起人 xiaojun2000
  • 开始时间
X

xiaojun2000

Unregistered / Unconfirmed
GUEST, unregistred user!
我看见网上有一个叫 《西门子手机工作室 V2.00》的软件,西门子6618的手机可用
数据线与电脑的COM口连接且可发短信,这是怎样实现的呢?
谢谢!
 
往COM口发AT指令控制手机收发短信。
 
能给一点例子或源码吗?
 
各位帮 UP 一下的了!
 
各位帮 UP 一下的了!
 
我用的是西门子6688,也想看一下类似的原码
 
例如短信息中心号码为深圳 +8613800755500
对方手机号码为 +8613612345678
要发送的信息为“中”
算法步骤:
一、地址部分,用字符串 addr 表示
1、将短信息中心号码去掉+号,看看长度是否为偶数,如果不是,最后添加F
即 addr = "+8613800755500"
=> addr = "8613800755500F"
2、将奇数位和偶数位交换。
=> addr = "683108705505F0"
3、将短信息中心号码前面加上字符91,91是国际化的意思
=> addr = "91683108705505F0"
4、算出 addr 长度,结果除2,格式化成2位的16进制字符串,16 / 2 = 8 => "08"
=> addr = "0891683108705505F0"
二、手机号码部分,用字符串 phone
1、将手机号码去掉+号,看看长度是否为偶数,如果不是,最后添加F
即 phone = "+8613612345678"
=> phone = "8613612345678F"
2、将手机号码奇数位和偶数位交换。
=> phone = "683116325476F8"
三、短信息部分,用字符串 msg 表示
1、转字符串转换为Unicode代码,例如“中”的unicode代码为 4E2D,
(好像是将中字的ASCII码分开,分别转成16进制)。因为我用DELPHI,
请vb朋友自己找例子,网上应该许多
function TfrmMain.str_Gb2UniCode( text: string ): String;
var
i,j,len:Integer;
cur:Integer;
t:String;
ws:WideString;
begin
Result:='';
ws := text;
len := Length(ws);
i := 1;
j := 0;
while i <= lendo
begin
cur := ord(ws);
FmtStr(t,'%4.4X',[cur]);
//BCD转换
Result := Result+t;
inc(i);
//移位计数达到7位的特别处理
j := (j+1) mod 7;
end;
end;

即 msg = "中"
即 msg = str_Gb2UniCode( msg )
=> msg = "4E2D"

2、将 msg 长度除2,保留两位16进制数,即 4E2D = 4 / 2 => "02",再加上 msg
=> msg = "024E2D"
四、组合
1、手机号码前加上字符串 11000D91,这是一些PDU代码,写死就行了,感兴趣可以参考相关PDU格式说明
即 phone = "11000D91" + phone
=> 11000D9168683116325476F8
2、手机号码后加上 000800 和刚才的短信息内容,000800也写死就可以了
即 phone = phone + "000800" + msg
即 11000D9168683116325476F8 + 000800 + 024E2D
=> phone = 11000D9168683116325476F8000800024E2D
3、phone 长度除以2,格式化成2位的十进制数
即 11000D9168683116325476F8000800024E2D => 36位 / 2 => 18
五、所以要发送的内容为
AT+CMGS=18<回车,ASCII为13>
addr+phone+<^Z>+换行回车<13和10>

即AT+CMGS=18<回车>0891683108705505F011000D91683116325476F8000800024E2D^Z换行回车
你先用AT指令试是 然后在用程序实现
 
[h4][red]tsedlinux:
谢谢!我先试一下,能否有一些具体详细的例子或代码呢?
我的手机是西门子6618能否操作它的电话簿及通讯录呢?或操作手机内的信息呢?[/red][/h4]
 
tsedlinux
你在深圳吗?我在深圳罗湖!
EMAIL: hellozxj@etang.com
 
此处下载此软件看一下:
http://www.sh-fm.com/fractal/download/MSTUDIO_T_1.84.zip
谢谢!
 
热心人能帮一下的了!
 
不好意思 我的机器不在身边 要过几天才能拿到
所以 对不起啊
 
发短信等手机通讯有三种方式:
1.移动、联通网关,一般是通过宽带网连接
2.通过在163、sohu、sina等网站注册手机,编写程序来发送短信
3.红外或串口与手机通信,分Text和PDU两种传送模式。其中,Nokia手机还可以分为需要数据套件、免数据套件(二进制)两种方式。
我的主页上有后两种Demo程序及源代码。http://wenjinshan.wx-e.com/index2.htm
 

Similar threads

D
回复
0
查看
767
DelphiTeacher的专栏
D
D
回复
0
查看
761
DelphiTeacher的专栏
D
D
回复
0
查看
700
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
653
DelphiTeacher的专栏
D
顶部