最新动态

工业物联网通讯专家!
认真做好每一件事,设计简单、可靠、价格合理的产品!

使用AT指令发送短信的实践 text和PUD模式

1、使用调试助手,三句话就可以发短信出去 TC35I短信猫 AT命令详解

AT+CMGF=1
AT+CMGS="+86xxxxxxxxxxx"
> test msg!
 (CTRL+Z = 0x1A)
OK


1、首先确保你的硬件正确,方法是输入at加回车,发给模块,会收到at 回车 ok,根据设置不同,可能会收不到at,只收到ok,可以发送ATE1设置回显命令。

2、发送AT+CMGF=1表示以文本方式发送短信,收到命令返回和OK

3、AT+CMGS="+86xxxxxxxxxxx" 发送至的手机号码,收到命令返回和OK,收到短信输入提示符">"

4、输入要发送的短信内容,只能是ascii码

5、发送CTRL+Z 及十六进制 0x1A,收到结束提示符号""

6、发送回车,返回OK,发送完成。

 

二、一个简单的VB程序 发送短信

Mscomm1.Settings=”9600,N,8,1” ‘9600波特,无奇偶校验,8位数据,一个停止位
    Mscomm1.InputLen=0 ‘读入整个缓冲区
    Mscomm1.Portopen=True ‘打开端口
发送短消息的代码如下:
    MSComm1.Output = "AT+CMGF=1" + vbCr ‘设置发送的模式,注意:一定要加上   vbCr
    MSComm1.Output = "AT+CSCA=" & Chr$(34) & "8613010341500" & Chr$(34) & ",129" + vbCr ‘8613010341500是短消息中心,各地的号码不一样,必须设置当地的短消息号码
    MSComm1.Output = "AT+CMGS=" & Chr$(34) & "13057575064" & Chr$(34) & ",129" + vbCr   ‘13057575064是对方手机号
    MSComm1.Output = "test" & Chr$(26) ‘chr$(26)是Ctr+ Z
    以上是简单实现短消息,你可以根据AT指令集结合VB的串口控件开发出更加完善的程序和功能丰富的应用程序,如接收短消息,拨号等等.
 

三、使用PHP操作串口来完成短信发送 windows下

注意几点:

1.必须要有php_dio.dll这个文件,原来我的php 是5.2.1的,因为php在5.0的时候已经把dio给去掉了,所有不能用串口了,说是放在pecl库里了,哎,网上找了半天,才找到php5.2.6 和pecl5.2.6,把自己的版本也更新到5.2.6,这样就可以调用串口了

2.发中文遇乱码的问题,在测试的时候都是乱码,后来发现我的文件是utf-8的,改成gb2312就好了

以下是我的程序,我把一些不要的东西去掉了,但可以发短信,在xp+apache+php5.2.6测试成功!

 

<?php
function gb2unicode($str) {
    return iconv("gb2312", "UCS-2", $str);
}
function hex2str($hexstring) {
$str = '';
for($i=0; $i<strlen($hexstring); $i++){
  $str .= sprintf("%02X",ord(substr($hexstring,$i,1)));
}
return $str;
}

function InvertNumbers($msisdn) {
$len = strlen($msisdn);
if ( 0 != fmod($len, 2) ) {
  $msisdn .= "F";
  $len = $len + 1;
}

for ($i=0; $i<$len; $i+=2) {
  $t = $msisdn[$i];
  $msisdn[$i] = $msisdn[$i+1];
  $msisdn[$i+1] = $t;
}
return $msisdn;
}

/*---------------主程序--------------*/
set_time_limit(0);
$DEBUG = 0;

exec('mode COM2: baud=9600 data=8 stop=1 parity=n xon=off');

$fd = dio_open('COM2:', O_RDWR);//opens the file for both reading and writing.

if(!$fd)
{
    die("打开串口COM2失败");
}

$ff = dio_stat($fd);
print_r($ff);

echo "GSMAT is start on COM2\n";

$smsc = "8613800531500";// 短信中心号码(我用的是杭州的,自己改)

$max_len = 280;// 短信最大长70个汉字,Unicode表示需280个字?
$invert_smsc = InvertNumbers($smsc);//683108501705F0
$len = 1; $s = chr(13);//'空格'


$msisdn = "86".'13864129404';//(接收的号码)
$sms_text = '中文字符能用吗?';//短信内容


$pdu_text = hex2str(gb2unicode($sms_text));
$invert_msisdn = InvertNumbers($msisdn);

// 拆分发送超?0汉字的短?todo: 没有判断全英文的情况)
do {
  $pdu_len = strlen($pdu_text);
  if ( $pdu_len > $max_len ) {
  $pdu_text1 = substr($pdu_text, 0, $max_len);
  $pdu_text = substr($pdu_text, $max_len, $pdu_len - $max_len);
  } else {
  $pdu_text1 = $pdu_text;
  $pdu_text = "";
  }

  $pdu_len1 = sprintf("%02X", strlen($pdu_text1)/2);
  $pdu_text1 = $pdu_len1 . $pdu_text1;

  $pdu_text1 = "11000D91" . $invert_msisdn ."000800" . $pdu_text1;

  $atcmd = "AT+CMGS=" . sprintf("%d", strlen($pdu_text1)/2) . chr(13);
  $l = strlen($atcmd);
  $ll = @dio_write($fd,$atcmd);//Returns the number of bytes written to fd.

  sleep(1);

  $pdu_text1 = "0891" . $invert_smsc . $pdu_text1 . chr(26).chr(13);//ctrl+z 和 回车
  $l = strlen($pdu_text1);
  $ll = @dio_write($fd,$pdu_text1);

} while ( $pdu_text != "" );


dio_close($fd);

?>



上一篇: 没有了
下一篇: 日本实现无线充电 2012年设置无线充电网点

发表评论